Index: openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl,v
diff -u -r1.63.2.2 -r1.63.2.3
--- openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl	29 Apr 2004 10:36:06 -0000	1.63.2.2
+++ openacs-4/packages/acs-authentication/tcl/authentication-procs.tcl	9 Jul 2004 22:00:09 -0000	1.63.2.3
@@ -1567,7 +1567,7 @@
                 -error \
                 -impl_id $impl_id \
                 -operation Authenticate \
-                -call_args [list $username $password $parameters]]
+                -call_args [list $username $password $parameters $authority_id]]
 }
 
 #####