Index: openacs-4/packages/workflow/tcl/case-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/case-procs.tcl,v
diff -u -N -r1.29.2.2 -r1.29.2.3
--- openacs-4/packages/workflow/tcl/case-procs.tcl	18 Mar 2004 13:44:12 -0000	1.29.2.2
+++ openacs-4/packages/workflow/tcl/case-procs.tcl	9 Dec 2004 17:58:49 -0000	1.29.2.3
@@ -580,7 +580,10 @@
             -contract_name $contract_name]
 
     # First, we build up a multirow so we have all the data in memory, which lets us peek ahead at the contents
-    db_multirow -extend {comment} -local entries select_log {} { set comment $comment_string }
+    db_multirow -extend {comment} -local entries select_log {} {
+       set comment $comment_string
+       set action_pretty_past_tense [lang::util::localize $action_pretty_past_tense]
+    }
 
     
     set rowcount [template::multirow -local size entries]