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 -N -r1.15 -r1.16
--- openacs-4/packages/acs-authentication/tcl/local-procs.tcl	18 Sep 2003 17:12:17 -0000	1.15
+++ openacs-4/packages/acs-authentication/tcl/local-procs.tcl	24 Sep 2003 17:22:54 -0000	1.16
@@ -243,6 +243,10 @@
         return [array get result]
     }
 
+    # Invalidate existing login tokens
+    # TODO: We probably need to re-cookie the user, then ...
+    # sec_change_user_auth_token $user_id
+
     set result(password_status) "ok"
 
     if { [parameter::get -parameter EmailAccountOwnerOnPasswordChangeP -package_id [ad_acs_kernel_id] -default 1] } {
@@ -423,7 +427,6 @@
 
     # Set user's password
     set user_id [acs_user::get_by_username -username $username]
-    ns_log Notice "LARS: Setting user_id $user_id's password to $password -- username = $username"
     ad_change_password $user_id $password
 
     # Used in messages below
Index: openacs-4/packages/acs-authentication/tcl/sync-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/sync-procs.tcl,v
diff -u -N -r1.17 -r1.18
--- openacs-4/packages/acs-authentication/tcl/sync-procs.tcl	17 Sep 2003 14:29:21 -0000	1.17
+++ openacs-4/packages/acs-authentication/tcl/sync-procs.tcl	24 Sep 2003 17:22:54 -0000	1.18
@@ -622,8 +622,6 @@
         snapshot_p f
     }
     
-    ns_log Notice "LARS: parameters = $parameters"
-
     array set param $parameters
     
     if { ![empty_string_p $param(SnapshotURL)] && [string equal [clock format [clock seconds] -format "%d"] "01"] } {