Index: openacs-4/packages/file-storage/www/folder-zip-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-zip-add.tcl,v diff -u -r1.8 -r1.9 --- openacs-4/packages/file-storage/www/folder-zip-add.tcl 7 Aug 2017 23:48:11 -0000 1.8 +++ openacs-4/packages/file-storage/www/folder-zip-add.tcl 7 Apr 2018 19:13:11 -0000 1.9 @@ -64,7 +64,7 @@ {upload_file:file {label \#file-storage.Upload_a_file\#} {html "size 30"}} } -if {([info exists return_url] && $return_url ne "")} { +if {[info exists return_url] && $return_url ne ""} { ad_form -extend -name file_add -form { {return_url:text(hidden) {value $return_url}} } @@ -222,7 +222,7 @@ } -after_submit { - if {([info exists return_url] && $return_url ne "")} { + if {[info exists return_url] && $return_url ne ""} { ad_returnredirect $return_url } else { ad_returnredirect [export_vars -base ./ {folder_id}]