Index: openacs-4/packages/file-storage/www/file-add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/file-add-2.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/file-storage/www/file-add-2.tcl	18 Sep 2002 12:09:59 -0000	1.6
+++ openacs-4/packages/file-storage/www/file-add-2.tcl	5 Nov 2002 17:19:59 -0000	1.7
@@ -13,15 +13,15 @@
 } -validate {
     valid_folder -requires {folder_id:integer} {
 	if ![fs_folder_p $folder_id] {
-	    ad_complain "The specified parent folder is not valid."
+	    ad_complain "[_ file-storage.lt_The_specified_parent_]"
 	}
     }
 
     max_size -requires {upload_file} {
 	set n_bytes [file size ${upload_file.tmpfile}]
 	set max_bytes [ad_parameter "MaximumFileSize"]
 	if { $n_bytes > $max_bytes } {
-	    ad_complain "Your file is larger than the maximum file size allowed on this system ([util_commify_number $max_bytes] bytes)"
+	    ad_complain [_ [ad_conn locale] file-storage.lt_Your_file_is_larger_t_1] "" [list max_number_of_bytes [util_commify_number $max_bytes]]]
 	}
     }
 } 
@@ -95,7 +95,9 @@
 #	<pre>$errmsg</pre>"
 #    }
  
-       ad_return_complaint 1 "You probably clicked on the Add button more than once. Check if the file is properly loaded on the <a href=\"index?folder_id?$folder_id\">folder</a> you wan, or you can use the Back button to return and re-enter the version file."      
+       set folder_name "[_ file-storage.folder]"
+       set folder_link "<a href=\"index?folder_id?$folder_id\">$folder_name</a>"
+       ad_return_complaint 1 "[_ [ad_conn locale] file-storage.lt_You_probably_clicked_ "" [list folder_link $folder_link]]"
 
        ad_script_abort
 }