Index: openacs-4/packages/acs-tcl/tcl/admin-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/admin-procs.tcl,v diff -u -r1.26 -r1.27 --- openacs-4/packages/acs-tcl/tcl/admin-procs.tcl 25 Apr 2018 19:23:26 -0000 1.26 +++ openacs-4/packages/acs-tcl/tcl/admin-procs.tcl 9 May 2018 15:33:28 -0000 1.27 @@ -55,7 +55,7 @@ Takes an ns_set of key/value pairs and produces a human-readable description of the class of users specified. } { - set clauses {} + set clauses [list] set pretty_description "" # turn all the parameters in the ns_set into Tcl vars @@ -193,7 +193,7 @@ in the user_state finite state machine. If the nohtml switch is set, then a list of lists will be returned (url label). } { - set user_finite_states {} + set user_finite_states [list] switch -- $member_state { "approved" { lappend user_finite_states \