Chris/webperl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix for HTML-encoded special characters in passwords.

Browse Source
This commit is contained in:
Chris 2012-10-09 12:33:30 +01:00
parent 79725b405b
commit 8b4cc1e5f6
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Auth.pm
View File

@ -35,6 +35,8 @@ package Auth;
use strict; use strict;
use base qw(SystemModule); use base qw(SystemModule);
use HTML::Entities;
# Custom module imports # Custom module imports
use AuthMethods; use AuthMethods;
@ -215,6 +217,9 @@ sub valid_user {
my $valid = 0; my $valid = 0;
my $methodimpl; my $methodimpl;
# clean up the password
$password = decode_entities($password);
$self -> clear_error(); $self -> clear_error();
# Is the user disabled? # Is the user disabled?