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.3 -r1.4
--- openacs-4/packages/acs-authentication/lib/local-search.tcl	7 Aug 2017 23:47:46 -0000	1.3
+++ openacs-4/packages/acs-authentication/lib/local-search.tcl	26 Apr 2018 08:56:37 -0000	1.4
@@ -18,7 +18,7 @@
     set orderby ""
 }
 set search_text [string tolower $search_text]
-set search_terms [list]
+set search_terms {}
 foreach term [split $search_text] {
     lappend search_terms $term
 }
@@ -47,7 +47,7 @@
 or lower(email) like '%' || :search_text || '%'
 " {
 
-set status [list]
+set status {}
 if {[info exists object_id]} {
     set group_member_p [permission::permission_p -object_id $object_id -party_id $user_id -privilege $privilege]
     set status ""