Revision history for Perl extension Catalyst::Plugin::Authentication
+ - Don't load password when password_type is 'none',
+ for example when used for authorization
+
0.10023 11 Jan 2013
- Add Howto on using the auth from the proxy server with
::Credential::Remote (Robert Rothenberg)
if ($self->_config->{'password_type'} eq 'self_check') {
return $user->check_password($authinfo->{$self->_config->{'password_field'}});
} else {
+ return 1
+ if $self->_config->{'password_type'} eq 'none';
+
my $password = $authinfo->{$self->_config->{'password_field'}};
my $storedpassword = $user->get($self->_config->{'password_field'});
- if ($self->_config->{'password_type'} eq 'none') {
- return 1;
- } elsif ($self->_config->{'password_type'} eq 'clear') {
+ if ($self->_config->{'password_type'} eq 'clear') {
# FIXME - Should we warn in the $storedpassword undef case,
# as the user probably fluffed the config?
return unless defined $storedpassword;