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.23 -r1.24
--- openacs-4/packages/calendar/www/cal-item-new.tcl	15 Feb 2004 12:16:23 -0000	1.23
+++ openacs-4/packages/calendar/www/cal-item-new.tcl	26 Feb 2004 15:29:03 -0000	1.24
@@ -167,7 +167,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}"