Index: openacs-4/packages/acs-authentication/lib/local-search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/lib/local-search.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/acs-authentication/lib/local-search.tcl	8 May 2018 22:37:18 -0000	1.5
+++ openacs-4/packages/acs-authentication/lib/local-search.tcl	9 May 2018 15:33:28 -0000	1.6
@@ -18,7 +18,7 @@
     set orderby ""
 }
 set search_text [string tolower $search_text]
-set search_terms {}
+set search_terms [list]
 foreach term [split $search_text] {
     lappend search_terms $term
 }
@@ -47,7 +47,7 @@
 or lower(email) like '%' || :search_text || '%'
 " {
 
-set status {}
+set status [list]
 if {[info exists object_id]} {
     set group_member_p [permission::permission_p -object_id $object_id -party_id $user_id -privilege $privilege]
     set status ""