Index: openacs-4/packages/acs-tcl/tcl/security-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/security-procs.tcl,v
diff -u -r1.13.2.4 -r1.13.2.5
--- openacs-4/packages/acs-tcl/tcl/security-procs.tcl	30 Apr 2003 14:21:15 -0000	1.13.2.4
+++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl	6 Jun 2003 08:48:50 -0000	1.13.2.5
@@ -224,8 +224,7 @@
     # this and still support old users by changing the salt below.
     set salt [sec_random_token]
     set new_password [ns_sha1 "$new_password$salt"]
-    db_dml password_update "update users set password = :new_password, salt = :salt where user_id = :user_id"
-    
+    db_dml password_update {}
 }
 
 ad_proc -private sec_setup_session { new_user_id } {