Index: openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml,v
diff -u -r1.23.2.5 -r1.23.2.6
--- openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml	21 Jul 2004 22:37:17 -0000	1.23.2.5
+++ openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml	5 Aug 2004 23:31:18 -0000	1.23.2.6
@@ -143,4 +143,9 @@
   <msg key="view_details">view details</msg>
   <msg key="Yes_Delete">Yes, Delete</msg>
   <msg key="Yes_Delete_It">Yes, Delete It</msg>
+  <msg key="Configure_File_Upload_Limit">Configure File Upload Limit</msg>
+  <msg key="Upload_Limit">Upload Limit (bytes)</msg>
+  <msg key="Change_upload_limit">Change upload limit</msg>
+  <msg key="Upload_limit_error">Upload limit must be less than</msg>
+  <msg key="Upload_limit_error_2">bytes. Increase the upload limit in your AOLserver's Tcl configuration file.</msg>
 </message_catalog>
Index: openacs-4/packages/file-storage/www/admin/upload-size-limit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/admin/upload-size-limit.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/file-storage/www/admin/upload-size-limit.tcl	14 Jul 2004 19:38:54 -0000	1.1.2.1
+++ openacs-4/packages/file-storage/www/admin/upload-size-limit.tcl	5 Aug 2004 23:31:19 -0000	1.1.2.2
@@ -12,20 +12,23 @@
 } 
 
 set max_size [ns_config "ns/server/[ns_info server]/module/nssock" maxinput]
+if { [string equal max_size ""] } {
+    set max_size 0
+}
 
-set title "Configure File Upload Limit"
-set context [list "Configure File Upload Limit"]
+set title "#file-storage.Configure_File_Upload_Limit#"
+set context [list $title]
 
 set upload_limit [parameter::get -parameter "MaximumFileSize"]
 
 ad_form -name upload_limit_size -export folder_id -form {
-    {new_size:integer(text) {label "Upload Limit (bytes) $max_size"} {value $upload_limit} {html { maxlength 8}}}
+    {new_size:integer(text) {label "#file-storage.Upload_Limit# $max_size"} {value $upload_limit} {html { maxlength 8}}}
     {return_url:text(hidden) {value $return_url}}
-    {submit:text(submit) {label "Change upload limit"}}
+    {submit:text(submit) {label "[_ file-storage.Change_upload_limit]"}}
 } -validate {
  {new_size
     { $new_size <= $max_size }
-         "Upload limit must be less than $max_size bytes"}
+         "#file-storage.Upload_limit_error# $max_size #file-storage.Upload_limit_error_2#  "}
 
 } -on_submit {
     parameter::set_value  -parameter "MaximumFileSize" -value $new_size