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 -r1.35 -r1.36
--- openacs-4/packages/workflow/tcl/case-procs.tcl	21 Dec 2004 14:30:00 -0000	1.35
+++ openacs-4/packages/workflow/tcl/case-procs.tcl	13 Jan 2005 13:58:53 -0000	1.36
@@ -586,7 +586,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]