Index: openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl,v diff -u -r1.12 -r1.13 --- openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl 29 Mar 2002 18:52:51 -0000 1.12 +++ openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl 16 Apr 2002 05:16:29 -0000 1.13 @@ -48,11 +48,7 @@ set current_date $date set date_format "YYYY-MM-DD HH24:MI" -if {$create_p} { - set item_template "\$item" -} else { - set item_template "\$item" -} +set item_template "\$item" if {$create_p} { set hour_template "\$hour" @@ -69,15 +65,17 @@ -item_template $item_template \ -hour_template $hour_template \ -date $current_date -start_hour 7 -end_hour 22 \ - -calendar_id_list $list_of_calendar_ids] + -calendar_id_list $list_of_calendar_ids \ + -url_stub_callback "calendar_portlet_display::get_url_stub"] } if {$view == "week"} { set cal_stuff [calendar::one_week_display \ -item_template $item_template \ -date $current_date \ - -calendar_id_list $list_of_calendar_ids] + -calendar_id_list $list_of_calendar_ids \ + -url_stub_callback "calendar_portlet_display::get_url_stub"] } if {$view == "month"} { @@ -86,14 +84,16 @@ -day_template "\$day_number" \ -date $current_date \ -item_add_template $item_add_template \ - -calendar_id_list $list_of_calendar_ids] + -calendar_id_list $list_of_calendar_ids \ + -url_stub_callback "calendar_portlet_display::get_url_stub"] } if {$view == "list"} { set cal_stuff [calendar::list_display \ - -item_template {$item} \ + -item_template $item_template \ -date $current_date \ - -calendar_id_list $list_of_calendar_ids] + -calendar_id_list $list_of_calendar_ids \ + -url_stub_callback "calendar_portlet_display::get_url_stub"] }