Correct bug introduced by r2981, authenticate() must not call AuthSSL::authenticate()
This commit is contained in:
parent
2b5de50614
commit
a9c201476f
|
@ -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__
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user