Index: openacs-4/packages/acs-templating/www/resources/xinha-nightly/plugins/OacsFs/popups/file-selector.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/www/resources/xinha-nightly/plugins/OacsFs/popups/file-selector.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/acs-templating/www/resources/xinha-nightly/plugins/OacsFs/popups/file-selector.tcl	10 Jan 2007 21:22:13 -0000	1.3
+++ openacs-4/packages/acs-templating/www/resources/xinha-nightly/plugins/OacsFs/popups/file-selector.tcl	29 Dec 2008 21:53:02 -0000	1.4
@@ -85,18 +85,18 @@
 	  break
 	}
 
-	# check quota
-	set maximum_folder_size [ad_parameter "MaximumFolderSize"]
+        if {[info exists folder_size]} {
+          # check quota
+          set maximum_folder_size [parameter::get -parameter "MaximumFolderSize"]
+          if { $maximum_folder_size ne "" } {
+            if { $folder_size + [file size ${upload_file.tmpfile}] > $maximum_folder_size } {
+              template::form::set_error upload_form upload_file \
+                  [_ file-storage.out_of_space]
+              break
+            }
+          }
+        }	 
 	
-	if { $maximum_folder_size ne "" } {
-	  set max [ad_parameter "MaximumFolderSize"]
-	  if { $folder_size+[file size ${upload_file.tmpfile}] > $max } {
-	    template::form::set_error upload_form upload_file \
-		[_ file-storage.out_of_space]
-	    break
-	  }
-	}	 
-	
 	set file_name [template::util::file::get_property filename $upload_file]
 	set upload_tmpfile [template::util::file::get_property tmp_filename $upload_file]
 	set mime_type [template::util::file::get_property mime_type $upload_file]