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.11 -r1.12
--- openacs-4/packages/calendar/tcl/calendar-display-procs.tcl 29 Mar 2002 20:08:31 -0000 1.11
+++ openacs-4/packages/calendar/tcl/calendar-display-procs.tcl 1 Apr 2002 23:46:18 -0000 1.12
@@ -69,7 +69,7 @@
ad_proc -public one_week_display {
{-calendar_id_list ""}
- {-day_template "\$day"}
+ {-day_template "\$day - \$pretty_date"}
{-item_template "\$item"}
{-item_add_template ""}
{-date ""}
@@ -105,7 +105,9 @@
if { [string length $status_summary] > 0 } {
append item " $status_summary "
}
- ns_set put $items $start_date $item
+ ns_log Notice "CALENDAR-WEEK: one item $item"
+
+ ns_set put $items $start_date_julian $item
}
}