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 -r1.5 -r1.6 --- openacs-4/packages/file-storage/www/simple-add.tcl 5 Nov 2002 17:19:59 -0000 1.5 +++ openacs-4/packages/file-storage/www/simple-add.tcl 12 Nov 2002 08:36:44 -0000 1.6 @@ -32,7 +32,7 @@ return -code error "[_ file-storage.No_such_type]" } -set context [fs_context_bar_list -final [_ [ad_conn locale] file-storage.Add_pretty_name "" [list pretty_name $pretty_name]]" $folder_id] +set context [fs_context_bar_list -final [_ 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 @@ -42,4 +42,3 @@ if {[empty_string_p $title]} { set lock_title_p 0 } -