Index: openacs-4/contrib/packages/simulation/lib/case-history.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/lib/Attic/case-history.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/contrib/packages/simulation/lib/case-history.tcl	15 Mar 2004 14:07:02 -0000	1.3
+++ openacs-4/contrib/packages/simulation/lib/case-history.tcl	20 Apr 2004 21:12:22 -0000	1.4
@@ -17,18 +17,18 @@
     -name log \
     -elements {
         timestamp {
-            label "Time"
+            label {[_ simulation.Time]}
             display_eval {[lc_time_fmt $creation_date_ansi "%x %X"]}
         }
         role_pretty {
-            label "Role"
+            label {[_ simulation.Role]}
         }
         user_name {
-            label "User"
+            label {[_ simulation.User]}
             link_url_eval {[ad_decode $creation_user "" "" [acs_community_member_url -user_id $creation_user]]}
         }
         action_pretty {
-            label "Task"
+            label {[_ simulation.Task]}
             link_url_col action_url
         }
     }
@@ -72,27 +72,27 @@
     }
 
     if { [empty_string_p $creation_user] } {
-        set user_name "Timeout"
+        set user_name [_ simulation.Timeout]
     }
 }
 
 template::list::create \
     -name documents \
-    -no_data "No documents" \
+    -no_data [_ simulation.No_documents] \
     -elements {
         timestamp {
-            label "Time"
+            label {[_ simulation.Time]}
             display_eval {[lc_time_fmt $creation_date_ansi "%x %X"]}
         }
         role_pretty {
-            label "Role"
+            label {[_ simulation.Role]}
         }
         user_name {
-            label "User"
+            label {[_ simulation.User]}
             link_url_eval {[acs_community_member_url -user_id $creation_user]}
         }
         document_pretty {
-            label "Document"
+            label {[_ simulation.Document]}
             link_url_col document_url
         }        
     }