Index: openacs-4/packages/calendar/www/cal-item-create.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/Attic/cal-item-create.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/calendar/www/cal-item-create.tcl	23 Apr 2001 23:09:38 -0000	1.1
+++ openacs-4/packages/calendar/www/cal-item-create.tcl	15 Sep 2001 07:14:32 -0000	1.2
@@ -20,7 +20,7 @@
 } 
 
 if { $date == "now" } {
-    set date [dt_sysdate]
+    set date [dt_sysdate] 
 }
 
 
@@ -29,8 +29,10 @@
 #
 
 set start_datetime [calendar_make_datetime [array get event_date] [array get start_time]]
+
 set end_datetime [calendar_make_datetime [array get event_date] [array get end_time]]
 
+
 #-----------------------------------------------------------------
 # validate time interval ( start_time <= end_time )
 
@@ -146,4 +148,3 @@
 
 
 
-