Index: openacs-4/packages/calendar/tcl/cal-item-2-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/Attic/cal-item-2-procs.tcl,v
diff -u -N -r1.8 -r1.9
--- openacs-4/packages/calendar/tcl/cal-item-2-procs.tcl	21 Jul 2003 19:21:36 -0000	1.8
+++ openacs-4/packages/calendar/tcl/cal-item-2-procs.tcl	11 Aug 2003 12:14:15 -0000	1.9
@@ -62,18 +62,28 @@
         }
         
         db_1row $query_name {} -column_array row
+        
+        # Timezonize
 
+
+        set row(start_date_ansi) [lc_time_utc_to_local $row(start_date_ansi)]
+        set row(end_date_ansi) [lc_time_utc_to_local $row(end_date_ansi)]
+
         # Localize
-        set row(start_time) [lc_time_fmt $row(ansi_start_date) "%X"]
+        set row(start_time) [lc_time_fmt $row(start_date_ansi) "%X"]
+
         # Unfortunately, SQL has weekday starting at 1 = Sunday
-        set row(day_of_week) [expr [lc_time_fmt $row(ansi_start_date) "%w"] + 1]
-        set row(pretty_day_of_week) [lc_time_fmt $row(ansi_start_date) "%A"]
-        set row(day_of_month) [lc_time_fmt $row(ansi_start_date) "%d"]
-        set row(pretty_short_start_date) [lc_time_fmt $row(ansi_start_date) "%x"]
-        set row(full_start_date) [lc_time_fmt $row(ansi_start_date) "%x"]
-        set row(full_end_date) [lc_time_fmt $row(ansi_end_date) "%x"]
+        set row(start_date) [lc_time_fmt $row(start_date_ansi) "%Y-%m-%d"]
+        set row(end_date) [lc_time_fmt $row(end_date_ansi) "%Y-%m-%d"]
 
-        set row(end_time) [lc_time_fmt $row(ansi_end_date) "%X"]
+        set row(day_of_week) [expr [lc_time_fmt $row(start_date_ansi) "%w"] + 1]
+        set row(pretty_day_of_week) [lc_time_fmt $row(start_date_ansi) "%A"]
+        set row(day_of_month) [lc_time_fmt $row(start_date_ansi) "%d"]
+        set row(pretty_short_start_date) [lc_time_fmt $row(start_date_ansi) "%x"]
+        set row(full_start_date) [lc_time_fmt $row(start_date_ansi) "%x"]
+        set row(full_end_date) [lc_time_fmt $row(end_date_ansi) "%x"]
+
+        set row(end_time) [lc_time_fmt $row(end_date_ansi) "%X"]
     }
         
     ad_proc -public add_recurrence {