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.18 -r1.19 --- openacs-4/packages/calendar/tcl/calendar-display-procs.tcl 26 Apr 2002 21:43:08 -0000 1.18 +++ openacs-4/packages/calendar/tcl/calendar-display-procs.tcl 28 Apr 2002 20:22:35 -0000 1.19 @@ -210,17 +210,18 @@ set item_details "$calendar_name - $item_type" } + set item $name + set item_subst [subst $item_template] + 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 item "$item_subst ($item_details)" set ns_set_pos "X" } else { - set item "$pretty_start_date - $pretty_end_date: $name ($item_details)" + set item "$pretty_start_date - $pretty_end_date: $item_subst ($item_details)" set ns_set_pos $start_hour } - set item [subst $item_template] - if { [string length $status_summary] > 0 } { append item " $status_summary " }