Index: openacs-4/packages/file-storage/www/file-copy-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/file-copy-2.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/file-storage/www/file-copy-2.tcl 18 Sep 2002 12:09:59 -0000 1.7 +++ openacs-4/packages/file-storage/www/file-copy-2.tcl 5 Nov 2002 17:19:59 -0000 1.8 @@ -10,13 +10,13 @@ } -validate { valid_file -requires {file_id} { if ![fs_file_p $file_id] { - ad_complain "The specified file is not valid." + ad_complain "[_ file-storage.lt_The_specified_file_is]" } } valid_folder -requires {parent_id} { if ![fs_folder_p $parent_id] { - ad_complain "The specified parent folder is not valid." + ad_complain "[_ file-storage.lt_The_specified_parent_]" } } } @@ -47,7 +47,9 @@ } on_error { - ad_return_complaint 1 "The <a href=\"index?folder_id=$parent_id\">folder</a> you selected already contains a file with the same name. " + set folder_name "[_ file-storage.folder]" + set folder_link "<a href=\"index?folder_id=$parent_id\">$folder_name</a>" + ad_return_complaint 1 "[_ file-storage.lt_The_folder_link_you_s]" # <pre>$errmsg</pre>