Index: openacs-4/packages/acs-authentication/tcl/password-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/password-procs.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/acs-authentication/tcl/password-procs.tcl	26 Jan 2004 15:39:41 -0000	1.11
+++ openacs-4/packages/acs-authentication/tcl/password-procs.tcl	12 Jul 2004 14:49:34 -0000	1.12
@@ -699,7 +699,8 @@
                 -call_args [list $username \
                                  $old_password \
                                  $new_password \
-                                 $parameters]]
+                                 $parameters \
+			         $authority_id]]
 }
 
 ad_proc -private auth::password::RetrievePassword {
@@ -763,5 +764,6 @@
                 -impl_id $impl_id \
                 -operation ResetPassword \
                 -call_args [list $username \
-                                 $parameters]]
+				$parameters \
+			        $authority_id]]
 }