Index: openacs-4/packages/attachments/www/attach.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/attachments/www/attach.tcl,v diff -u -r1.14.2.1 -r1.14.2.2 --- openacs-4/packages/attachments/www/attach.tcl 25 Jun 2019 15:55:24 -0000 1.14.2.1 +++ openacs-4/packages/attachments/www/attach.tcl 25 Jun 2019 15:59:12 -0000 1.14.2.2 @@ -32,7 +32,7 @@ # Load up file storage information if {$folder_id eq ""} { set folder_id [attachments::get_root_folder] -} +} # sanity check if {$folder_id eq ""} { @@ -63,8 +63,6 @@ } set action_url [export_vars -base "attach-2" {{item_id $object_id} {object_id $to_object_id} return_url pretty_object_name}] } - - } set passthrough_vars "object_id=$to_object_id&return_url=[ns_urlencode $return_url]&pretty_object_name=[ns_urlencode $pretty_object_name]"