Correct bug introduced by r2981, authenticate() must not call AuthSSL::authenticate()

This commit is contained in:
Xavier Guimard 2013-10-18 04:44:11 +00:00
parent 2b5de50614
commit a9c201476f

View File

@ -88,11 +88,21 @@ sub extractFormInfo {
# 5. Verify FOAF document
return PE_BADCREDENTIALS unless ( $self->{_webid}->valid() );
$self->{_webIdAuthDone}++;
# 6. OK, access granted
return PE_OK;
}
## @apmethod int authenticate()
# Just test that authentication has been done: job is done in
# extractFormInfo() else launch extractFormInfo()
# @return Lemonldap::NG::Portal constant
sub authenticate {
my $self = shift;
return $self->{_webIdAuthDone} ? PE_OK : $self->{extractFormInfo};
}
1;
__END__