Index: openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl,v diff -u -r1.3.12.2 -r1.3.12.3 --- openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl 20 Nov 2006 20:00:15 -0000 1.3.12.2 +++ openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl 22 Nov 2006 10:03:12 -0000 1.3.12.3 @@ -21,8 +21,6 @@ @author Arjun Sanyal (arjun@openforce.net) @author Ben Adida (ben@openforce.net) @cvs_id $Id$ -} { - {period_days:optional} } -properties { } @@ -32,15 +30,6 @@ set view $config(default_view) set list_of_calendar_ids $config(calendar_id) -set calendar_id [lindex $list_of_calendar_ids 0] -db_0or1row select_calendar_package_id {select package_id from calendars where calendar_id=:calendar_id} - -if { ![info exists period_days] } { - set period_days [parameter::get -package_id $package_id -parameter DefaultPeriodDays] -} else { - parameter::set_value -package_id $package_id -parameter DefaultPeriodDays -value $period_days -} - if {[llength $list_of_calendar_ids] > 1} { return -code error "shouldn't be more than one calendar in admin!" }