Index: openacs-4/packages/file-storage/www/download-zip.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/download-zip.tcl,v diff -u -N -r1.9.2.1 -r1.9.2.2 --- openacs-4/packages/file-storage/www/download-zip.tcl 14 Feb 2019 16:15:01 -0000 1.9.2.1 +++ openacs-4/packages/file-storage/www/download-zip.tcl 21 Jul 2020 14:06:40 -0000 1.9.2.2 @@ -39,7 +39,7 @@ set out_path [ad_tmpnam] file mkdir $out_path -set out_file [file join ${out_path} ${download_name}] +set out_file [ad_file join ${out_path} ${download_name}] # create the archive ad_try { @@ -54,7 +54,7 @@ # return the archive to the connection. ns_set put [ad_conn outputheaders] Content-Disposition "attachment;filename=\"$download_name\"" ns_set put [ad_conn outputheaders] Content-Type "application/zip" -ns_set put [ad_conn outputheaders] Content-Size "[file size $out_file]" +ns_set put [ad_conn outputheaders] Content-Size "[ad_file size $out_file]" ns_returnfile 200 application/octet-stream $out_file # clean everything up