Commit ef1a396a authored by Xavier Guimard's avatar Xavier Guimard

Test backends before usage (#595)

parent 4606e773
......@@ -357,6 +357,7 @@ handler_test: handler
@$(MAKE) -C ${SRCHANDLERDIR} test FULLPERL="$(PERL) -I../${SRCCOMMONDIR}/blib/lib/"
portal_test: portal
env|sort
@$(MAKE) -C ${SRCPORTALDIR} test FULLPERL="$(PERL) -I../${SRCCOMMONDIR}/blib/lib/ -I../${SRCHANDLERDIR}/blib/lib/"
manager_test: manager
......
......@@ -246,6 +246,7 @@ sub checkXSSAttack {
sub extractFormInfo {
my ( $self, $req ) = @_;
return PE_ERROR unless ( $self->_authentication );
my $ret = $self->_authentication->extractFormInfo($req);
if ( $ret == PE_OK and not( $req->user or $req->continue ) ) {
$self->logger->error(
......@@ -273,6 +274,7 @@ sub extractFormInfo {
sub getUser {
my ( $self, $req ) = @_;
return PE_ERROR unless ( $self->_userDB );
return $self->_userDB->getUser($req);
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment