Index: openacs-4/packages/calendar/www/cal-item.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/Attic/cal-item.adp,v diff -u -r1.4 -r1.5 --- openacs-4/packages/calendar/www/cal-item.adp 18 Feb 2002 15:14:56 -0000 1.4 +++ openacs-4/packages/calendar/www/cal-item.adp 25 Feb 2002 22:14:20 -0000 1.5 @@ -86,12 +86,18 @@ + + @force_calendar_name@ + + + + Index: openacs-4/packages/calendar/www/cal-item.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/Attic/cal-item.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/calendar/www/cal-item.tcl 11 Feb 2002 06:07:39 -0000 1.5 +++ openacs-4/packages/calendar/www/cal-item.tcl 25 Feb 2002 22:14:20 -0000 1.6 @@ -15,6 +15,7 @@ {start_time "now"} {end_time "now"} {return_url ""} + {force_calendar_id ""} } -properties { cal_item_id:onevalue @@ -123,6 +124,10 @@ db_multirow calendars list_calendars {} + if {![empty_string_p $force_calendar_id]} { + set force_calendar_name [calendar_get_name $force_calendar_id] + } + } ad_return_template Index: openacs-4/packages/calendar/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/index.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/calendar/www/index.tcl 11 Feb 2002 06:07:39 -0000 1.4 +++ openacs-4/packages/calendar/www/index.tcl 25 Feb 2002 22:14:20 -0000 1.5 @@ -14,6 +14,7 @@ {julian_date ""} {calendar_list:multiple,optional {}} {return_url ""} + {force_calendar_id ""} } -properties { package_id:onevalue user_id:onevalue