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.26.2.11 -r1.26.2.12
--- openacs-4/packages/calendar/www/cal-item-new.tcl	2 Aug 2006 10:40:49 -0000	1.26.2.11
+++ openacs-4/packages/calendar/www/cal-item-new.tcl	16 Aug 2006 17:20:33 -0000	1.26.2.12
@@ -173,7 +173,7 @@
 	set end_time "{} {} {} [expr $start_hour + 1] 0 {} {HH24:MI}"
 	set time_p 1 
     } else {
-	set time_p 1
+	set time_p 0 
 	set start_hour $start_time
 	set start_time "{} {} {} 0 0 {} {HH24:MI}"
 	set end_time "{} {} {} 0 0 {} {HH24:MI}"