Index: openacs-4/packages/curriculum-portlet/www/curriculum-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/curriculum-portlet/www/curriculum-portlet.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/curriculum-portlet/www/curriculum-portlet.tcl 16 Jun 2003 22:24:04 -0000 1.1 +++ openacs-4/packages/curriculum-portlet/www/curriculum-portlet.tcl 20 Apr 2004 21:13:12 -0000 1.2 @@ -12,11 +12,7 @@ array set config $cf set shaded_p $config(shaded_p) -set list_of_package_ids $config(package_id) +set list_of_package_ids [lsort $config(package_id)] +set one_instance_p [ad_decode [llength $list_of_package_ids] 1 1 0] -if {[llength $list_of_package_ids] > 1} { - # We have a problem! - return -code error "There should be only one instance of curriculum for admin purposes" -} - ad_return_template