Index: openacs-4/packages/attachments/www/simple-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/attachments/www/simple-add.tcl,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/attachments/www/simple-add.tcl	17 Sep 2002 21:08:38 -0000	1.4
+++ openacs-4/packages/attachments/www/simple-add.tcl	7 Nov 2002 15:11:50 -0000	1.5
@@ -16,7 +16,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 "[_ attachments.lt_The_specified_parent_]"
 	}
     }
 } -properties {
@@ -32,12 +32,8 @@
 
 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 "[_ attachments.lt_No_such_typeset_conte]" $folder_id]
 
-set context {{Attach URL}}
-set fs_context_bar [fs_context_bar_list -final "Add $pretty_name" $folder_id]
-
 # Should probably generate the item_id and version_id now for
 # double-click protection
 
@@ -46,4 +42,3 @@
 if {[empty_string_p $title]} {
     set lock_title_p 0
 }
-