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 -r1.37 -r1.38
--- openacs-4/packages/acs-authentication/tcl/local-procs.tcl	8 Oct 2009 14:33:46 -0000	1.37
+++ openacs-4/packages/acs-authentication/tcl/local-procs.tcl	27 Oct 2014 16:39:01 -0000	1.38
@@ -367,7 +367,7 @@
     }
 
     # Reset the password
-    if {[exists_and_not_null new_password]} {
+    if { $new_password ne "" } {
 	set password $new_password
     } else {
 	set password [ad_generate_random_string]