Index: openacs-4/packages/acs-tcl/tcl/defs-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/defs-procs.tcl,v diff -u -r1.20 -r1.21 --- openacs-4/packages/acs-tcl/tcl/defs-procs.tcl 7 Oct 2002 14:56:13 -0000 1.20 +++ openacs-4/packages/acs-tcl/tcl/defs-procs.tcl 18 Nov 2002 18:02:06 -0000 1.21 @@ -36,7 +36,7 @@ set year [string range $release_date 0 3] set month [string range $release_date 4 5] set day [string range $release_date 6 7] - return [util_AnsiDatetoPrettyDate "$year-$month-$day"] + return [lc_time_fmt "$year-$month-$day" "%q"] } else { return "not released" }