Fix error in inheritance path (#1440)

This commit is contained in:
Xavier Guimard 2018-06-01 17:22:27 +02:00
parent 7b2a98d7f3
commit 19bd3a8597
3 changed files with 3 additions and 3 deletions

View File

@ -48,7 +48,7 @@ sub run {
return $class->REDIRECT;
}
}
return $class->Lemonldap::NG::Handler::Main::Run::run( $req, $rule, $protection );
return $class->Lemonldap::NG::Handler::Main::run( $req, $rule, $protection );
}
## @rmethod protected hash getCDAInfos(id)

View File

@ -33,7 +33,7 @@ BEGIN {
sub run {
my $class = shift;
my $r = $_[0];
my $ret = $class->Lemonldap::NG::Handler::Main::Run::run($r);
my $ret = $class->Lemonldap::NG::Handler::Main::run($r);
# Continue only if user is authorized
return $ret unless ( $ret == $class->OK );

View File

@ -16,7 +16,7 @@ our $VERSION = '2.0.0';
# Overload main run method
sub run {
my ( $class, $req ) = @_;
my $ret = $class->Lemonldap::NG::Handler::Main::Run::run($req);
my $ret = $class->Lemonldap::NG::Handler::Main::run($req);
# Continue only if user is authorized
return $ret unless ( $ret == $class->OK );