Index: openacs-4/packages/general-comments/tcl/general-comments-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/tcl/general-comments-procs.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/general-comments/tcl/general-comments-procs.tcl	13 Jan 2005 13:58:21 -0000	1.16
+++ openacs-4/packages/general-comments/tcl/general-comments-procs.tcl	24 Jan 2005 00:29:38 -0000	1.17
@@ -131,6 +131,8 @@
     
     set html ""
     db_foreach get_comments {} {
+        set pretty_date [lc_time_fmt $creation_date %x]
+        set pretty_date2 [lc_time_fmt $creation_date "%q %X"]
         # call on helper proc to print out comment
         append html [general_comments_print_comment $comment_id $title $mime_type \
                 $creation_user $author $pretty_date $pretty_date2 $content \