Index: openacs-4/packages/file-storage/www/simple-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/simple-add.tcl,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/file-storage/www/simple-add.tcl	10 Sep 2002 22:22:56 -0000	1.4
+++ openacs-4/packages/file-storage/www/simple-add.tcl	5 Nov 2002 17:19:59 -0000	1.5
@@ -13,7 +13,7 @@
 } -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_]"
 	}
     }
 } -properties {
@@ -29,10 +29,10 @@
 
 set pretty_name [fs::simple_get_type_pretty_name -type $type]
 if {[empty_string_p $pretty_name]} {
-    return -code error "No such type"
+    return -code error "[_ file-storage.No_such_type]"
 }
 
-set context [fs_context_bar_list -final "Add $pretty_name" $folder_id]
+set context [fs_context_bar_list -final [_ [ad_conn locale] file-storage.Add_pretty_name "" [list pretty_name $pretty_name]]" $folder_id]
 
 # Should probably generate the item_id and version_id now for
 # double-click protection