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.13 -r1.14
--- openacs-4/packages/calendar/www/cal-item-new.tcl	18 Aug 2003 07:32:11 -0000	1.13
+++ openacs-4/packages/calendar/www/cal-item-new.tcl	18 Aug 2003 19:41:19 -0000	1.14
@@ -133,13 +133,8 @@
     set item_type $cal_item(item_type)
     set item_type_id $cal_item(item_type_id)
     set calendar_id $cal_item(calendar_id)
+    set time_p $cal_item(time_p)
 
-    if {[string equal $start_time "12:00 AM"] && [string equal $end_time "12:00 AM"]} {
-        set time_p 0
-    } else {
-        set time_p 1
-    }
-
     if {[empty_string_p $repeat_p]} {
         set repeat_p 0
     } else {