Index: openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml	9 Oct 2003 13:43:14 -0000	1.12
+++ openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml	13 Oct 2003 17:16:08 -0000	1.13
@@ -7,6 +7,7 @@
   <msg key="Add_File">Add File</msg>
   <msg key="Add_pretty_name">Add %pretty_name%</msg>
   <msg key="Author">Author</msg>
+  <msg key="back_to_folder_view">&lt;a href=&quot;%folder_view_url%&quot;&gt;Back&lt;/a&gt; to folder view</msg>
   <msg key="Change_Name">Change Name</msg>
   <msg key="Copy">Copy</msg>
   <msg key="Create">Create</msg>
@@ -25,26 +26,40 @@
   <msg key="Edit_Folder">Edit Folder</msg>
   <msg key="Edit_URL">Edit URL</msg>
   <msg key="file">file</msg>
+  <msg key="file_delete_page_title">Delete %title%</msg>
+  <msg key="file_edit_page_title">Rename %title%</msg>
+  <msg key="file_edit_page_title_1">Edit %pretty_name%</msg>
+  <msg key="file_page_file_title_label">Title: %title%</msg>
+  <msg key="file_page_owner_label">Owner: %owner%</msg>
   <msg key="folder">folder</msg>
+  <msg key="folder_delete_page_title">Delete %folder_name%</msg>
   <msg key="Folder_ID">Folder ID</msg>
   <msg key="Folder_Name">Folder Name:</msg>
   <msg key="folder_type_pretty_name">folder</msg>
+  <msg key="index_page_navigate_up_folder">Up to %up_name%</msg>
   <msg key="item">item</msg>
   <msg key="items">items</msg>
   <msg key="Last_Modified">Last Modified</msg>
   <msg key="lt_administer_permission">administer permissions</msg>
+  <msg key="lt_All_Versions_of_title">All Versions of &quot;%title%&quot;</msg>
   <msg key="lt_Are_you_sure_that_you">Are you sure that you want to delete this version &quot;%version_name%&quot; of &quot;%title%&quot;?
 This action cannot be reversed.</msg>
   <msg key="lt_bad_folder_id_folder_">missing folder id</msg>
+  <msg key="lt_Comments_on_this_file">Comments on this file:</msg>
+  <msg key="lt_contentscontent_size_">%contents.content_size_pretty% bytes</msg>
   <msg key="lt_delete_file">Are you sure you want to delete the file &quot;%title%&quot; and all of its versions?  This action cannot be reversed.</msg>
   <msg key="lt_delete_folder">Are you sure you want to delete the folder &quot;%folder_name%&quot; and all the items it contains?  This action cannot be reversed.</msg>
   <msg key="lt_Delete_this_file_incl">Delete this file (including all versions)</msg>
+  <msg key="lt_Download_an_archive_o">Download an archive of the contents of this folder</msg>
   <msg key="lt_Either_there_is_alrea">Either there is already a folder with the name &quot;%folder_name%&quot; or you clicked on the button more than once.  You can use the Back button to return and choose a new name, or &lt;a href=&quot;%directory_url%&quot;&gt;return to the directory listing&lt;/a&gt; to see if your folder is there.</msg>
   <msg key="lt_Folder_folder_name_is">Folder %folder_name% is empty.</msg>
   <msg key="lt_It_appears_that_there">It appears that there is already a file with that name in this folder (although possibly you clicked more than once on the submit button.)</msg>
+  <msg key="lt_Live_version_of_title">Live version of &quot;%title%&quot;</msg>
   <msg key="lt_Modify_permissions_on">Modify permissions on this file</msg>
   <msg key="lt_Modify_permissions_on_1">Modify permissions on this folder</msg>
   <msg key="lt_Please_enter_the_new_">Please enter the new name for this file:</msg>
+  <msg key="lt_Select_the_folder_tha">Select the folder that you would like to copy &quot;%file_name%&quot; to</msg>
+  <msg key="lt_Select_the_folder_tha_1">Select the folder that you would like to move &quot;%file_name%&quot; under</msg>
   <msg key="lt_Show_files_modified_i">Show files modified in the past</msg>
   <msg key="lt_show_only_live_versio">show only live version</msg>
   <msg key="lt_The_folder_link_you_s">The %folder_link% you selected already contains a file with the same name.</msg>
@@ -68,6 +83,8 @@
   <msg key="lt_You_probably_clicked_">You probably clicked on the Add button more than once. Check if the file is properly loaded on the %folder_link% you want, or you can use the Back button to return and re-enter the version file.</msg>
   <msg key="lt_Your_file_is_larger_t">Your file is larger than the maximum file size allowed on this system (%number_of_bytes% bytes)</msg>
   <msg key="lt_Your_file_is_larger_t_1">Your file is larger than the maximum file size allowed on this system (%max_number_of_bytes% bytes)</msg>
+  <msg key="lt_Your_search_on_query_">Your search on &quot;%query%&quot; did not return any results.</msg>
+  <msg key="lt_Your_search_on_query__1">Your search on &quot;%query%&quot; returned the following files:</msg>
   <msg key="Modified">Modified</msg>
   <msg key="Move">Move</msg>
   <msg key="Name">Name</msg>
@@ -81,8 +98,10 @@
   <msg key="Search_again">Search again:</msg>
   <msg key="Search_Results">Search Results</msg>
   <msg key="show_all_versions">show all versions</msg>
+  <msg key="simple_add_page_title">Create %pretty_name%</msg>
   <msg key="Size">Size</msg>
   <msg key="Size_bytes">Size (bytes)</msg>
+  <msg key="this_may_take_a_while">&lt;strong&gt;Note:&lt;/strong&gt; This may take a while, please be patient.</msg>
   <msg key="Title">Title:</msg>
   <msg key="Title_">Title :</msg>
   <msg key="Type">Type</msg>
@@ -93,6 +112,8 @@
   <msg key="Upload_New_File">Upload New File</msg>
   <msg key="Upload_New_Version">Upload New Version</msg>
   <msg key="URL">URL:</msg>
+  <msg key="version_add_page_title">Upload New Version of %title%</msg>
+  <msg key="version_delete_page_title">Delete %version_name%</msg>
   <msg key="Version_filename">Version filename</msg>
   <msg key="Version_filename_">Version filename :</msg>
   <msg key="Version_filename_1">Version filename:</msg>
Index: openacs-4/packages/file-storage/www/file-copy.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/file-copy.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/file-storage/www/file-copy.adp	22 May 2003 14:55:53 -0000	1.6
+++ openacs-4/packages/file-storage/www/file-copy.adp	13 Oct 2003 17:16:08 -0000	1.7
@@ -2,7 +2,7 @@
 <property name="title">#file-storage.Copy#</property>
 <property name="context">@context;noquote@</property>
 
-<P>Select the folder that you would like to copy "@file_name@" to
+<P>#file-storage.lt_Select_the_folder_tha#
 
 <form method=GET action="file-copy-2">
 <input type=hidden name=file_id value="@file_id@">
@@ -13,3 +13,4 @@
 </form>
 
 
+
Index: openacs-4/packages/file-storage/www/file-delete.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/file-delete.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/file-storage/www/file-delete.adp	22 May 2003 14:55:53 -0000	1.6
+++ openacs-4/packages/file-storage/www/file-delete.adp	13 Oct 2003 17:16:08 -0000	1.7
@@ -1,5 +1,5 @@
 <master>
-<property name="title">Delete @title;noquote@</property>
+<property name="title">@page_title;noquote@</property>
 <property name="context">@context;noquote@</property>
 
 <if @blocked_p@ eq "t">
@@ -22,5 +22,3 @@
 </form>
 
 </else>
-
-
Index: openacs-4/packages/file-storage/www/file-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/file-delete.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/file-storage/www/file-delete.tcl	5 Nov 2002 17:19:59 -0000	1.6
+++ openacs-4/packages/file-storage/www/file-delete.tcl	13 Oct 2003 17:16:08 -0000	1.7
@@ -58,3 +58,6 @@
 
     set context [fs_context_bar_list -final "[_ file-storage.Delete]" $file_id]
 }
+
+# Variable title used by message lookup
+set page_title [_ file-storage.file_delete_page_title]
Index: openacs-4/packages/file-storage/www/file-edit.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file-edit.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/file-storage/www/file-edit.adp	22 May 2003 14:55:53 -0000	1.6
+++ openacs-4/packages/file-storage/www/file-edit.adp	13 Oct 2003 17:16:08 -0000	1.7
@@ -1,6 +1,6 @@
 <master>
-<property name="title">Rename @title;noquote@</property>
-<property name="header">Rename @title;noquote@</property>
+<property name="title">@page_title;noquote@</property>
+<property name="header">@page_title;noquote@</property>
 <property name="context">@context;noquote@</property>
 
 <form method=POST action=file-edit-2.tcl>
Index: openacs-4/packages/file-storage/www/file-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file-edit.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/file-storage/www/file-edit.tcl	5 Nov 2002 17:19:59 -0000	1.4
+++ openacs-4/packages/file-storage/www/file-edit.tcl	13 Oct 2003 17:16:08 -0000	1.5
@@ -30,4 +30,7 @@
 
 set context [fs_context_bar_list -final "[_ file-storage.Rename]" $file_id]
 
+# Variable title used by message lookup
+set page_title [_ file-storage.file_edit_page_title]
+
 ad_return_template
Index: openacs-4/packages/file-storage/www/file-move.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/file-move.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/file-storage/www/file-move.adp	22 May 2003 14:55:53 -0000	1.6
+++ openacs-4/packages/file-storage/www/file-move.adp	13 Oct 2003 17:16:08 -0000	1.7
@@ -2,7 +2,7 @@
 <property name="title">#file-storage.Move#</property>
 <property name="context">@context;noquote@</property>
 
-<P>Select the folder that you would like to move "@file_name@" under
+<P>#file-storage.lt_Select_the_folder_tha_1#
 
 <form method=GET action="file-move-2">
 <input type=hidden name=file_id value="@file_id@">
@@ -13,3 +13,4 @@
 </form>
 
 
+
Index: openacs-4/packages/file-storage/www/file.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file.adp,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/file-storage/www/file.adp	10 Oct 2003 09:58:38 -0000	1.15
+++ openacs-4/packages/file-storage/www/file.adp	13 Oct 2003 17:16:08 -0000	1.16
@@ -4,8 +4,8 @@
 <property name="context">@context;noquote@</property>
 
 <ul>
-  <li>Title: @title@ <if @write_p@ true>(<a href="file-edit?file_id=@file_id@">#file-storage.edit#</a>)</if>
-  <li>Owner: @owner@
+  <li>#file-storage.file_page_file_title_label# <if @write_p@ true>(<a href="file-edit?file_id=@file_id@">#file-storage.edit#</a>)</if>
+  <li>#file-storage.file_page_owner_label#
 <p>
   <li>#file-storage.Actions# 
   <if @show_all_versions_p@ true>
@@ -28,7 +28,7 @@
     | <a href="file-delete?file_id=@file_id@">#file-storage.lt_Delete_this_file_incl#</a>
   </if>
  <if @gc_comments@ not nil>
- <li>Comments on this file:
+ <li>#file-storage.lt_Comments_on_this_file#
  <ul>
  @gc_comments;noquote@
  </ul>
@@ -38,13 +38,13 @@
  </if>
 </ul>
 
-<a href="index?folder_id=@folder_id@">Back</a> to folder view
+#file-storage.back_to_folder_view#
 <p>
 <table border=1 cellspacing=2 cellpadding=2>
   <tr>
     <td colspan=7>
-      <if @show_all_versions_p@ true>All Versions of "@title@"</if>
-      <else>Live version of "@title@"</else>.
+      <if @show_all_versions_p@ true>#file-storage.lt_All_Versions_of_title#</if>
+      <else>#file-storage.lt_Live_version_of_title#</else>.
     </td>
   </tr>
   <tr>
@@ -87,3 +87,4 @@
 </table>
 
 
+
Index: openacs-4/packages/file-storage/www/file.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/file-storage/www/file.tcl	28 Aug 2003 09:41:54 -0000	1.13
+++ openacs-4/packages/file-storage/www/file.tcl	13 Oct 2003 17:16:08 -0000	1.14
@@ -75,3 +75,5 @@
 
 # get folder id so we can implement a back link
 set folder_id [db_string get_folder ""]
+
+set folder_view_url "index?folder_id=$folder_id"
Index: openacs-4/packages/file-storage/www/folder-chunk.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-chunk.adp,v
diff -u -r1.21 -r1.22
--- openacs-4/packages/file-storage/www/folder-chunk.adp	1 Oct 2003 15:05:19 -0000	1.21
+++ openacs-4/packages/file-storage/www/folder-chunk.adp	13 Oct 2003 17:16:08 -0000	1.22
@@ -66,7 +66,7 @@
 	  <td>
 	    <small><a href="@fs_url@file?file_id=@contents.object_id@">#file-storage.view_details#</a></small>
 	  </td>
-          <td align="right">@contents.content_size_pretty@ byte<if @contents.content_size@ ne 1>s</if></td>
+          <td align="right">#file-storage.lt_contentscontent_size_#</td>
 	  <td>@contents.type@</td>
 	  <td>@contents.last_modified_pretty@</td>
 	</else>
@@ -78,13 +78,14 @@
   <if @content_size_total@ gt 0>
     <p>
       <a href="@fs_url@download-archive/index?object_id=@folder_id@">
-        Download an archive of the contents of this folder
+        #file-storage.lt_Download_an_archive_o#
       </a>
       <br>
-      <small><i><strong>Note:</strong> This may take a while, please be patient.</i></small>
+      <small><i>#file-storage.this_may_take_a_while#</i></small>
     </p>
   </if>
 </if>
 <else>
   <p><blockquote><i>#file-storage.lt_Folder_folder_name_is#</i></blockquote></p>
 </else>
+
Index: openacs-4/packages/file-storage/www/folder-create-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/folder-create-2.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/file-storage/www/folder-create-2.tcl	12 Nov 2002 08:36:44 -0000	1.5
+++ openacs-4/packages/file-storage/www/folder-create-2.tcl	13 Oct 2003 17:16:08 -0000	1.6
@@ -46,7 +46,7 @@
 
 } on_error {
 
-    ad_return_complaint 1 [_ file-storage.lt_Either_there_is_alrea] [list folder_name $folder_name directory_url "index?folder_id=$parent_id"]]
+    ad_return_complaint 1 [_ file-storage.lt_Either_there_is_alrea [list folder_name $folder_name directory_url "index?folder_id=$parent_id"]]
     
      ad_script_abort
 }
Index: openacs-4/packages/file-storage/www/folder-delete.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-delete.adp,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/file-storage/www/folder-delete.adp	22 May 2003 14:55:53 -0000	1.5
+++ openacs-4/packages/file-storage/www/folder-delete.adp	13 Oct 2003 17:16:08 -0000	1.6
@@ -1,5 +1,5 @@
 <master>
-<property name="title">Delete @folder_name;noquote@</property>
+<property name="title">@page_title;noquote@</property>
 <property name="context">@context;noquote@</property>
 
 <if @blocked_p@ eq "t">
Index: openacs-4/packages/file-storage/www/folder-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-delete.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/file-storage/www/folder-delete.tcl	5 Nov 2002 17:19:59 -0000	1.5
+++ openacs-4/packages/file-storage/www/folder-delete.tcl	13 Oct 2003 17:16:08 -0000	1.6
@@ -65,4 +65,7 @@
     select label from cr_folders where folder_id = :folder_id"]
 
     set context [fs_context_bar_list -final "[_ file-storage.Delete]" $folder_id]
-}
\ No newline at end of file
+}
+
+# Message lookup uses variable folder_name
+set page_title [_ file-storage.folder_delete_page_title]
\ No newline at end of file
Index: openacs-4/packages/file-storage/www/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/index.adp,v
diff -u -r1.21 -r1.22
--- openacs-4/packages/file-storage/www/index.adp	9 Jul 2003 16:39:08 -0000	1.21
+++ openacs-4/packages/file-storage/www/index.adp	13 Oct 2003 17:16:08 -0000	1.22
@@ -39,7 +39,7 @@
 
         <if @up_url@ not nil>
           &nbsp;|&nbsp;
-          <a href="@up_url@">Up to @up_name@</a>
+          <a href="@up_url@">#file-storage.index_page_navigate_up_folder#</a>
         </if>
   
       </td>
@@ -50,3 +50,4 @@
 
 
 <include src="folder-chunk" folder_id=@folder_id;noquote@ viewing_user_id=@user_id;noquote@ n_past_days=@n_past_days;noquote@>
+
Index: openacs-4/packages/file-storage/www/search.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/search.adp,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/file-storage/www/search.adp	22 May 2003 14:55:53 -0000	1.5
+++ openacs-4/packages/file-storage/www/search.adp	13 Oct 2003 17:16:08 -0000	1.6
@@ -3,10 +3,10 @@
 <property name="context">@context;noquote@</property>
 
 <if @results:rowcount@ eq 0>
-<p>Your search on "@query@" did not return any results.
+<p>#file-storage.lt_Your_search_on_query_#
 </if>
 <else>
-<p>Your search on "@query@" returned the following files:
+<p>#file-storage.lt_Your_search_on_query__1#
 
 <ul>
 <multiple name="results">
@@ -22,3 +22,4 @@
 
 
 
+
Index: openacs-4/packages/file-storage/www/simple-add.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/simple-add.adp,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/file-storage/www/simple-add.adp	22 May 2003 14:55:53 -0000	1.7
+++ openacs-4/packages/file-storage/www/simple-add.adp	13 Oct 2003 17:16:08 -0000	1.8
@@ -1,5 +1,5 @@
 <master>
-<property name="title">Create @pretty_name;noquote@</property>
+<property name="title">@page_title;noquote@</property>
 <property name="context">@context;noquote@</property>
 
 <form method=POST action="simple-add-2">
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.8 -r1.9
--- openacs-4/packages/file-storage/www/simple-add.tcl	25 Sep 2003 12:28:14 -0000	1.8
+++ openacs-4/packages/file-storage/www/simple-add.tcl	13 Oct 2003 17:16:08 -0000	1.9
@@ -41,3 +41,6 @@
 if {[empty_string_p $title]} {
     set lock_title_p 0
 }
+
+# Message lookup uses variable pretty_name
+set page_title [_ file-storage.simple_add_page_title]
Index: openacs-4/packages/file-storage/www/simple-edit.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/simple-edit.adp,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/file-storage/www/simple-edit.adp	22 May 2003 14:55:53 -0000	1.5
+++ openacs-4/packages/file-storage/www/simple-edit.adp	13 Oct 2003 17:16:08 -0000	1.6
@@ -1,5 +1,5 @@
 <master>
-<property name="title">Edit @pretty_name;noquote@</property>
+<property name="title">@page_title;noquote@</property>
 <property name="context">@context;noquote@</property>
 
 <form method=POST action="simple-edit-2">
Index: openacs-4/packages/file-storage/www/simple-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/simple-edit.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/file-storage/www/simple-edit.tcl	17 May 2003 10:39:54 -0000	1.4
+++ openacs-4/packages/file-storage/www/simple-edit.tcl	13 Oct 2003 17:16:08 -0000	1.5
@@ -17,5 +17,7 @@
 set pretty_name "$name"
 set context [fs_context_bar_list -final "[_ file-storage.Edit_URL]" $folder_id]
 
-ad_return_template
+# Message lookup uses variable pretty_name
+set page_title [_ file-storage.file_edit_page_title_1]
 
+ad_return_template
Index: openacs-4/packages/file-storage/www/version-add.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/version-add.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/file-storage/www/version-add.adp	22 May 2003 14:55:53 -0000	1.6
+++ openacs-4/packages/file-storage/www/version-add.adp	13 Oct 2003 17:16:08 -0000	1.7
@@ -1,5 +1,5 @@
 <master>
-<property name="title">Upload New Version of @title;noquote@</property>
+<property name="title">@page_title;noquote@</property>
 <property name="context">@context;noquote@</property>
 
 <form enctype=multipart/form-data method=POST action=version-add-2>
Index: openacs-4/packages/file-storage/www/version-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/version-add.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/file-storage/www/version-add.tcl	5 Nov 2002 17:19:59 -0000	1.4
+++ openacs-4/packages/file-storage/www/version-add.tcl	13 Oct 2003 17:16:08 -0000	1.5
@@ -33,4 +33,7 @@
 
 set context [fs_context_bar_list -final "[_ file-storage.Upload_New_Version]" $file_id]
 
+# Message lookup uses variable title
+set page_title [_ file-storage.version_add_page_title]
+
 ad_return_template
Index: openacs-4/packages/file-storage/www/version-delete.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/version-delete.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/file-storage/www/version-delete.adp	22 May 2003 14:55:53 -0000	1.6
+++ openacs-4/packages/file-storage/www/version-delete.adp	13 Oct 2003 17:16:08 -0000	1.7
@@ -1,5 +1,5 @@
 <master>
-<property name="title">Delete @version_name;noquote@</property>
+<property name="title">@page_title;noquote@</property>
 <property name="context">@context;noquote@</property>
 
 <form method=POST action=version-delete>
Index: openacs-4/packages/file-storage/www/version-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/version-delete.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/file-storage/www/version-delete.tcl	5 Nov 2002 17:19:59 -0000	1.7
+++ openacs-4/packages/file-storage/www/version-delete.tcl	13 Oct 2003 17:16:08 -0000	1.8
@@ -71,3 +71,6 @@
 
     set context [fs_context_bar_list -final [_ file-storage.Delete_Version] $item_id]
 }
+
+# Message lookup uses variable version_name
+set page_title [_ file-storage.version_delete_page_title]