Index: openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl,v
diff -u -r1.20 -r1.21
--- openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl	26 Apr 2018 08:56:37 -0000	1.20
+++ openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl	9 May 2018 15:33:29 -0000	1.21
@@ -18,7 +18,7 @@
 set list_of_package_ids $config(package_id)
 
 set one_instance_p [ad_decode [llength $list_of_package_ids] 1 1 0]
-set elements {}
+set elements [list]
 if {!$one_instance_p} {
     set elements [list community_name \
                       [list \
@@ -104,7 +104,7 @@
 }
 
 
-set elements {}
+set elements [list]
 if {!$one_instance_p} {
     set elements [list community_name \
 		      [list \