diff --git a/Webperl/AppUser.pm b/Webperl/AppUser.pm index 60e4ce6..0144854 100644 --- a/Webperl/AppUser.pm +++ b/Webperl/AppUser.pm @@ -319,6 +319,7 @@ sub pre_authenticate { sub post_authenticate { my $self = shift; my $username = shift; + my $password = shift; my $auth = shift; my $authmethod = shift;