Index: openacs-4/packages/acs-authentication/tcl/local-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/local-procs.tcl,v
diff -u -r1.42 -r1.43
--- openacs-4/packages/acs-authentication/tcl/local-procs.tcl	29 Dec 2017 11:22:07 -0000	1.42
+++ openacs-4/packages/acs-authentication/tcl/local-procs.tcl	25 Apr 2018 19:23:25 -0000	1.43
@@ -143,7 +143,7 @@
     Implements the Authenticate operation of the auth_authentication
     service contract for the local account implementation.
 } {
-    array set auth_info [list]
+    array set auth_info {}
 
     if {$authority_id eq ""} {
         set authority_id [auth::authority::local]
@@ -630,7 +630,7 @@
     service contract for the local account implementation.
 } {
 
-    set results [list]
+    set results {}
     db_foreach user_search {} {
         lappend results $user_id
     }