Index: openacs-4/packages/acs-authentication/tcl/driver-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/driver-procs.tcl,v
diff -u -N -r1.12 -r1.13
--- openacs-4/packages/acs-authentication/tcl/driver-procs.tcl	25 Apr 2018 19:23:25 -0000	1.12
+++ openacs-4/packages/acs-authentication/tcl/driver-procs.tcl	9 May 2018 15:33:28 -0000	1.13
@@ -52,7 +52,7 @@
     @author Simon Carstensen (simon@collaboraid.biz)
     @creation-date 2003-08-27
 } {
-    array set param {}
+    array set param [list]
 
     db_foreach select_values {
         select key, value
@@ -64,7 +64,7 @@
     }
 
     # We need to ensure that the driver gets all the parameters it is asking for, and nothing but the ones it is asking for
-    set params {}
+    set params [list]
     foreach { name desc } [get_parameters -impl_id $impl_id] {
         if { [info exists param($name)] } {
             lappend params $name $param($name)