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 -r1.6.6.4 -r1.6.6.5
--- openacs-4/packages/file-storage/www/download-zip.tcl	28 Sep 2014 15:55:41 -0000	1.6.6.4
+++ openacs-4/packages/file-storage/www/download-zip.tcl	1 Oct 2014 09:48:05 -0000	1.6.6.5
@@ -42,7 +42,7 @@
 
 # create the archive
 with_catch errmsg {
-    util::zip_file -source $in_path -destination $out_file
+    util::zip -source $in_path -destination $out_file
 } {
     # some day we'll do something useful here
     file delete -force $in_path