Index: openacs-4/packages/acs-templating/tcl/widget-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/widget-procs.tcl,v
diff -u -N -r1.59 -r1.60
--- openacs-4/packages/acs-templating/tcl/widget-procs.tcl	23 Apr 2018 16:58:39 -0000	1.59
+++ openacs-4/packages/acs-templating/tcl/widget-procs.tcl	25 Apr 2018 19:23:26 -0000	1.60
@@ -173,7 +173,7 @@
     } else {
         # we need to return a select list
 
-        set options [list]
+        set options {}
 
         if { [llength $persons] > 0 } {
             set options $persons
@@ -662,7 +662,7 @@
 
     set output {}
     if { $mode ne "edit" } {
-        set selected_list [list]
+        set selected_list {}
 
         foreach option $options_list {
             lassign $option label value