Index: openacs-4/packages/calendar/www/view-list-display.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view-list-display.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/calendar/www/view-list-display.tcl	2 Oct 2003 15:42:38 -0000	1.13
+++ openacs-4/packages/calendar/www/view-list-display.tcl	21 Oct 2003 14:05:44 -0000	1.14
@@ -54,15 +54,15 @@
 }
 
 if {[empty_string_p $start_date] && ![empty_string_p $end_date]} {
-    set title "[_ acs-datetime.to] [util_AnsiDatetoPrettyDate $end_date]"
+    set title "[_ acs-datetime.to] [lc_time_fmt $end_date "%q"]"
 }
 
 if {![empty_string_p $start_date] && [empty_string_p $end_date]} {
-    set title "[_ acs-datetime.Items_from] [util_AnsiDatetoPrettyDate $start_date]"
+    set title "[_ acs-datetime.Items_from] [lc_time_fmt $start_date "%q"]"
 }
 
 if {![empty_string_p $start_date] && ![empty_string_p $end_date]} {
-    set title "[_ acs-datetime.Items_from] [util_AnsiDatetoPrettyDate $start_date] [_ acs-datetime.to] [util_AnsiDatetoPrettyDate $end_date]"
+    set title "[_ acs-datetime.Items_from] [lc_time_fmt $start_date "%q"] [_ acs-datetime.to] [lc_time_fmt $end_date "%q"]"
 }
 
 set today_date [dt_sysdate]