Index: openacs-4/packages/acs-authentication/tcl/authority-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authority-procs.tcl,v
diff -u -N -r1.39.2.1 -r1.39.2.2
--- openacs-4/packages/acs-authentication/tcl/authority-procs.tcl	10 Apr 2019 20:38:38 -0000	1.39.2.1
+++ openacs-4/packages/acs-authentication/tcl/authority-procs.tcl	10 Apr 2019 21:35:57 -0000	1.39.2.2
@@ -540,7 +540,7 @@
         select     [join $columns ",\n                   "]
         from       auth_authorities
         where      authority_id = :authority_id
-    } -column_array row
+    }] -column_array row
 
     return [array get row]
 }