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.43 -r1.44
--- openacs-4/packages/acs-authentication/tcl/local-procs.tcl	25 Apr 2018 19:23:25 -0000	1.43
+++ openacs-4/packages/acs-authentication/tcl/local-procs.tcl	9 May 2018 15:33:28 -0000	1.44
@@ -143,7 +143,7 @@
     Implements the Authenticate operation of the auth_authentication
     service contract for the local account implementation.
 } {
-    array set auth_info {}
+    array set auth_info [list]
 
     if {$authority_id eq ""} {
         set authority_id [auth::authority::local]
@@ -630,7 +630,7 @@
     service contract for the local account implementation.
 } {
 
-    set results {}
+    set results [list]
     db_foreach user_search {} {
         lappend results $user_id
     }