This also avoids shadowing the $User variable.
Signed-off-by: Francois Gouget fgouget@codeweavers.com --- testbot/web/ResetPassword.pl | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/testbot/web/ResetPassword.pl b/testbot/web/ResetPassword.pl index 65dcdd539d..b6c0ae9cb5 100644 --- a/testbot/web/ResetPassword.pl +++ b/testbot/web/ResetPassword.pl @@ -118,8 +118,8 @@ sub OnChangePassword($) return !1; }
- ($ErrMessage, my $User) = $Users->Authenticate($self->GetParam("Name"), - $self->GetParam("Password1")); + ($ErrMessage, my $_User) = $Users->Authenticate($self->GetParam("Name"), + $self->GetParam("Password1")); if (defined $ErrMessage) { $self->AddError($ErrMessage, "Name"); @@ -127,8 +127,7 @@ sub OnChangePassword($) }
my $Sessions = CreateSessions(); - ($ErrMessage, my $Session) = $Sessions->NewSession($User, - defined($self->GetParam("AutoLogin"))); + ($ErrMessage, my $_Session) = $Sessions->NewSession($User, defined $self->GetParam("AutoLogin")); if ($ErrMessage) { $self->AddError($ErrMessage, "Name");