Index: openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.en_US.ISO-8859-1.xml
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.en_US.ISO-8859-1.xml,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.en_US.ISO-8859-1.xml	5 Nov 2002 17:21:22 -0000	1.1
+++ openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.en_US.ISO-8859-1.xml	14 Nov 2002 11:23:59 -0000	1.2
@@ -1,27 +1,29 @@
 <?xml version="1.0"?>
-<!-- Generated by lang::catalog::export_package_to_files on 2002 November 05 18:09 -->
+<!-- Generated by lang::catalog::export_package_to_files on 2002 November 14 13:55 -->
 <message_catalog package_key="dotlrn-fs" locale="en_US" charset="ISO-8859-1">
 
-  <msg key="lt_new_values_Shared_Fil">%new_value%'s Shared Files</msg>
-  <msg key="lt_community_names_Files">%community_name%'s Files</msg>
-  <msg key="Size_bytes">Size (bytes)</msg>
-  <msg key="lt_community_names_Publi">%community_name%'s Public Files</msg>
-  <msg key="Type">Type</msg>
-  <msg key="new_values_Files">%new_value%'s Files</msg>
-  <msg key="Size">Size</msg>
-  <msg key="user_names_Files">%user_name%'s Files</msg>
-  <msg key="Folder">Folder</msg>
-  <msg key="lt_Showing_files_modifie">Showing files modified within the past %n_past_days% %days_singular_or_plural%.</msg>
-  <msg key="Top_Offenders">Top Offenders</msg>
-  <msg key="day">day</msg>
-  <msg key="lt_user_names_Shared_Fil">%user_name%'s Shared Files</msg>
-  <msg key="lt_No_top_offending_fold">No top offending folders to display</msg>
-  <msg key="days">days</msg>
   <msg key="All">All</msg>
-  <msg key="Name">Name</msg>
   <msg key="All_items">All items</msg>
+  <msg key="Folder">Folder</msg>
   <msg key="Last_Modified">Last Modified</msg>
-  <msg key="User_Folders">User Folders</msg>
+  <msg key="Name">Name</msg>
   <msg key="No_contents_found">No contents found.</msg>
   <msg key="Order_By">Order By</msg>
+  <msg key="Size">Size</msg>
+  <msg key="Size_bytes">Size (bytes)</msg>
+  <msg key="Top_Offenders">Top Offenders</msg>
+  <msg key="Type">Type</msg>
+  <msg key="User_Folders">User Folders</msg>
+  <msg key="applet_pretty_name">File Storage</msg>
+  <msg key="day">day</msg>
+  <msg key="days">days</msg>
+  <msg key="lt_No_top_offending_fold">No top offending folders to display</msg>
+  <msg key="lt_Showing_files_modifie">Showing files modified within the past %n_past_days% %days_singular_or_plural%.</msg>
+  <msg key="lt_community_names_Files">%community_name%'s Files</msg>
+  <msg key="lt_community_names_Publi">%community_name%'s Public Files</msg>
+  <msg key="lt_new_values_Shared_Fil">%new_value%'s Shared Files</msg>
+  <msg key="lt_user_names_Shared_Fil">%user_name%'s Shared Files</msg>
+  <msg key="new_values_Files">%new_value%'s Files</msg>
+  <msg key="user_folder_pretty_name">User's Folders</msg>
+  <msg key="user_names_Files">%user_name%'s Files</msg>
 </message_catalog>
Index: openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl,v
diff -u -N -r1.78 -r1.79
--- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	5 Nov 2002 17:21:23 -0000	1.78
+++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	14 Nov 2002 11:23:59 -0000	1.79
@@ -68,7 +68,7 @@
             ]
 
             set folder_id [fs::get_root_folder -package_id $package_id]
-            fs::rename_folder -folder_id $folder_id -name {User's Folders}
+            fs::rename_folder -folder_id $folder_id -name [_ dotlrn-fs.user_folder_pretty_name]
 
             set node_id [site_node::get_node_id_from_object_id -object_id $package_id]
             site_node_object_map::new -object_id $folder_id -node_id $node_id
@@ -86,7 +86,7 @@
             dotlrn_applet::add_applet_to_dotlrn -applet_key [applet_key] -package_key [my_package_key]
 
             # Mount the package
-            dotlrn_applet::mount -package_key [my_package_key] -url fs -pretty_name "File Storage"
+            dotlrn_applet::mount -package_key [my_package_key] -url fs -pretty_name [_ dotlrn-fs.applet_pretty_name]
         }
     }