Index: openacs-4/packages/calendar/www/cal-item-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/cal-item-new.tcl,v
diff -u -r1.20.2.3 -r1.20.2.4
--- openacs-4/packages/calendar/www/cal-item-new.tcl	25 Nov 2003 00:07:19 -0000	1.20.2.3
+++ openacs-4/packages/calendar/www/cal-item-new.tcl	12 Feb 2004 09:50:43 -0000	1.20.2.4
@@ -166,7 +166,7 @@
 	set end_time "{} {} {} [expr $start_hour + 1] 0 {} {HH24:MI}"
 	set time_p 1 
     } else {
-	set time_p 0
+	set time_p 1
 	set start_hour $start_time
 	set start_time "{} {} {} 0 0 {} {HH24:MI}"
 	set end_time "{} {} {} 0 0 {} {HH24:MI}"