From 261e207c1170cf374467cc422bd76a861110b8ab Mon Sep 17 00:00:00 2001
From: "jocuri%softhome.net" <>
Date: Wed, 3 Mar 2004 13:19:28 +0000
Subject: Patch for bug 123077; improve the ValidatePassword sub so that a
 password change is no longer accepted with a blank second field; r=kiko,
 a=justdave.

---
 userprefs.cgi | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'userprefs.cgi')

diff --git a/userprefs.cgi b/userprefs.cgi
index 017c7c94d..9a1a93717 100755
--- a/userprefs.cgi
+++ b/userprefs.cgi
@@ -97,9 +97,8 @@ sub SaveAccount {
 
         if ($pwd1 ne "" || $pwd2 ne "")
         {
-            ($pwd1 eq $pwd2) || ThrowUserError("passwords_dont_match");
             $::FORM{'new_password1'} || ThrowUserError("new_password_missing");
-            ValidatePassword($pwd1);
+            ValidatePassword($pwd1, $pwd2);
         
             my $cryptedpassword = SqlQuote(Crypt($pwd1));
             SendSQL("UPDATE profiles 
-- 
cgit v1.2.3-24-g4f1b