Index: openacs-4/packages/ajax-filestorage-ui/www/xmlhttp/add-file-flash.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ajax-filestorage-ui/www/xmlhttp/add-file-flash.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ajax-filestorage-ui/www/xmlhttp/add-file-flash.tcl	26 Nov 2007 12:52:45 -0000	1.1
+++ openacs-4/packages/ajax-filestorage-ui/www/xmlhttp/add-file-flash.tcl	19 Dec 2007 15:17:40 -0000	1.2
@@ -46,7 +46,7 @@
 
 set unzip_binary [string trim [parameter::get -package_id $package_id -parameter UnzipBinary]]
 
-if { $unpack_p && ![empty_string_p $unzip_binary] && [file extension [template::util::file::get_property filename $Filedata]] eq ".zip"  } {
+if { $unpack_p && ![empty_string_p $unzip_binary] && [file extension $Filedata] eq ".zip"  } {
     
     set path [ns_tmpnam]
     file mkdir $path