Index: openacs-4/packages/file-storage/www/file-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file-add.tcl,v
diff -u -r1.4 -r1.4.2.1
--- openacs-4/packages/file-storage/www/file-add.tcl	5 Nov 2002 17:19:59 -0000	1.4
+++ openacs-4/packages/file-storage/www/file-add.tcl	9 Dec 2003 09:19:05 -0000	1.4.2.1
@@ -36,3 +36,5 @@
 if {[empty_string_p $title]} {
     set lock_title_p 0
 }
+
+set unpack_available_p [expr ![empty_string_p [string trim [parameter::get -parameter UnzipBinary]]]]