Index: openacs-4/packages/calendar/tcl/cal-item-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/cal-item-procs.tcl,v
diff -u -N -r1.11 -r1.12
--- openacs-4/packages/calendar/tcl/cal-item-procs.tcl	30 Nov 2002 17:27:51 -0000	1.11
+++ openacs-4/packages/calendar/tcl/cal-item-procs.tcl	11 Aug 2003 12:14:15 -0000	1.12
@@ -85,6 +85,10 @@
     # set the date_format
     set date_format "YYYY-MM-DD HH24:MI"
 
+    # Convert from user timezone to system timezone
+    set start_date [lc_time_local_to_utc $start_date]
+    set end_date [lc_time_local_to_utc $end_date]        
+
     # find out the timespan_id
     set timespan_id [db_exec_plsql insert_timespan {
 	begin
@@ -159,6 +163,10 @@
     # set the date_format
     set date_format "YYYY-MM-DD HH24:MI"
 
+    # Convert from user timezone to system timezone
+    set start_date [lc_time_local_to_utc $start_date]
+    set end_date [lc_time_local_to_utc $end_date]        
+
     # update the events
     db_dml update_event ""