Index: openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl,v diff -u -r1.44.2.5 -r1.44.2.6 --- openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl 21 Mar 2023 17:41:54 -0000 1.44.2.5 +++ openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl 6 Jun 2023 13:39:19 -0000 1.44.2.6 @@ -43,8 +43,12 @@ if {$view eq ""} { set view $config(default_view) } -set list_of_calendar_ids $config(calendar_id) +# +# Cleanup empty strings from the id list +# +set list_of_calendar_ids [lsearch -all -inline -not -exact $config(calendar_id) {}] + set ad_conn_url [ad_conn url] set calendar_url [ad_conn package_url]calendar/ Index: openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl,v diff -u -r1.20.2.1 -r1.20.2.2 --- openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl 21 Mar 2023 15:27:03 -0000 1.20.2.1 +++ openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl 6 Jun 2023 13:39:19 -0000 1.20.2.2 @@ -44,8 +44,12 @@ if {$view eq ""} { set view $config(default_view) } -set list_of_calendar_ids $config(calendar_id) +# +# Cleanup empty strings from the id list +# +set list_of_calendar_ids [lsearch -all -inline -not -exact $config(calendar_id) {}] + # Set the first list entry to calendar_id. Will not be used if under # dotlrn. Otherwise the list will actually contain only one calendar_id # (the first one, though) 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.39.2.1 -r1.39.2.2 --- openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl 17 Apr 2019 19:42:59 -0000 1.39.2.1 +++ openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl 6 Jun 2023 13:39:19 -0000 1.39.2.2 @@ -42,7 +42,12 @@ # get stuff out of the config array array set config $cf set view $config(default_view) -set list_of_calendar_ids $config(calendar_id) + +# +# Cleanup empty strings from the id list +# +set list_of_calendar_ids [lsearch -all -inline -not -exact $config(calendar_id) {}] + set calendar_url [ad_conn package_url]calendar/ if {[llength $list_of_calendar_ids] > 1} {