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
|
# 5. Verify FOAF document
|
||||||
return PE_BADCREDENTIALS unless ( $self->{_webid}->valid() );
|
return PE_BADCREDENTIALS unless ( $self->{_webid}->valid() );
|
||||||
|
$self->{_webIdAuthDone}++;
|
||||||
|
|
||||||
# 6. OK, access granted
|
# 6. OK, access granted
|
||||||
return PE_OK;
|
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;
|
1;
|
||||||
__END__
|
__END__
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user