Bad usage of getModule (#595)
This commit is contained in:
parent
3db4967853
commit
f6665c2d41
|
@ -10,13 +10,7 @@ our $VERSION = '2.0.0';
|
||||||
|
|
||||||
sub init {
|
sub init {
|
||||||
my ($self) = @_;
|
my ($self) = @_;
|
||||||
if ( $self->p->getModule( undef, 'auth' ) eq 'Demo' ) {
|
return $self->SUPER::init;
|
||||||
return $self->SUPER::init;
|
|
||||||
}
|
|
||||||
else {
|
|
||||||
$self->lmLog( "Use PasswordDBDemo only with AuthDemo", 'error' );
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
|
|
||||||
sub confirm {
|
sub confirm {
|
||||||
|
|
|
@ -41,12 +41,6 @@ has demoAccounts => (
|
||||||
|
|
||||||
# Check AuthDemo use
|
# Check AuthDemo use
|
||||||
sub init {
|
sub init {
|
||||||
my $self = shift;
|
|
||||||
|
|
||||||
unless ( $self->p->getModule( undef, 'auth' ) =~ /Demo/ ) {
|
|
||||||
$self->p->error("Use UserDB::Demo only with Auth::Demo");
|
|
||||||
}
|
|
||||||
|
|
||||||
1;
|
1;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -21,13 +21,6 @@ has vars => (
|
||||||
# INITIALIZATION
|
# INITIALIZATION
|
||||||
|
|
||||||
sub init {
|
sub init {
|
||||||
my ($self) = @_;
|
|
||||||
unless ( $self->p->getModule( undef, 'auth' ) =~ /^Facebook/ ) {
|
|
||||||
$self->error(
|
|
||||||
"UserDB::Facebook isn't useable unless authentication module is set to Facebook"
|
|
||||||
);
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
return 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -16,12 +16,6 @@ extends 'Lemonldap::NG::Common::Module',
|
||||||
|
|
||||||
sub init {
|
sub init {
|
||||||
my ($self) = @_;
|
my ($self) = @_;
|
||||||
unless ( $self->p->getModule( undef, 'auth' ) =~ /^OpenID\b/ ) {
|
|
||||||
$self->error(
|
|
||||||
'UserDBOpenID isn\'t useable unless authentication module is set to OpenID'
|
|
||||||
);
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
return 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -19,11 +19,6 @@ extends 'Lemonldap::NG::Common::Module', 'Lemonldap::NG::Portal::Lib::SAML';
|
||||||
sub init {
|
sub init {
|
||||||
my ($self) = @_;
|
my ($self) = @_;
|
||||||
|
|
||||||
unless ( $self->p->getModule( undef, 'auth' ) =~ /^SAML/ ) {
|
|
||||||
$self->error( "SAML user module requires SAML authentication" );
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
# SAML service has been already loaded
|
# SAML service has been already loaded
|
||||||
$self->lassoServer(
|
$self->lassoServer(
|
||||||
$self->p->loadedModules->{'Lemonldap::NG::Portal::Auth::SAML'}
|
$self->p->loadedModules->{'Lemonldap::NG::Portal::Auth::SAML'}
|
||||||
|
|
|
@ -15,13 +15,6 @@ our $VERSION = '2.0.0';
|
||||||
# INITIALIZATION
|
# INITIALIZATION
|
||||||
|
|
||||||
sub init {
|
sub init {
|
||||||
my $self = shift;
|
|
||||||
unless ( $self->p->getModule( undef, 'auth' ) =~ /^WebID/ ) {
|
|
||||||
$self->error(
|
|
||||||
"UserDB::WebID isn't useable unless authentication module is set to WebID"
|
|
||||||
);
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
1;
|
1;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user