Index: openacs-4/packages/calendar/tcl/calendar-display-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/Attic/calendar-display-procs.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/calendar/tcl/calendar-display-procs.tcl	16 Apr 2002 05:30:24 -0000	1.15
+++ openacs-4/packages/calendar/tcl/calendar-display-procs.tcl	26 Apr 2002 19:51:07 -0000	1.16
@@ -199,7 +199,7 @@
                     set item_details "$calendar_name - $item_type"
                 }
 
-                if {$pretty_start_date == "00:00 AM" && $pretty_end_date == "00:00 AM"} {
+                if {[dt_no_time_p -start_time $pretty_start_date -end_time $pretty_end_date} {
                     # Hack for no-time items
                     set item "$name ($item_details)"
                     set ns_set_pos "X"