Limit PE_* imports (#595)
This commit is contained in:
parent
37ec0b0f9c
commit
232ab78860
|
@ -5,7 +5,8 @@ package Lemonldap::NG::Portal::Auth::AD;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants;
|
use Lemonldap::NG::Portal::Main::Constants
|
||||||
|
qw(PE_OK PE_PP_PASSWORD_EXPIRED PE_PP_CHANGE_AFTER_RESET);
|
||||||
|
|
||||||
our $VERSION = '2.0.0';
|
our $VERSION = '2.0.0';
|
||||||
|
|
||||||
|
|
|
@ -2,13 +2,14 @@ package Lemonldap::NG::Portal::Auth::Apache;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants;
|
use Lemonldap::NG::Portal::Main::Constants qw(PE_ERROR PE_OK);
|
||||||
|
|
||||||
our $VERSION = '0.1';
|
our $VERSION = '0.1';
|
||||||
|
|
||||||
extends 'Lemonldap::NG::Portal::Auth::Base';
|
extends 'Lemonldap::NG::Portal::Auth::Base';
|
||||||
|
|
||||||
sub init {
|
sub init {
|
||||||
|
PE_ERROR;
|
||||||
1;
|
1;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -2,7 +2,7 @@ package Lemonldap::NG::Portal::Auth::DBI;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants;
|
use Lemonldap::NG::Portal::Main::Constants qw(PE_OK PE_BADCREDENTIALS);
|
||||||
|
|
||||||
our $VERSION = '2.0.0';
|
our $VERSION = '2.0.0';
|
||||||
|
|
||||||
|
|
|
@ -7,7 +7,7 @@ package Lemonldap::NG::Portal::Auth::Demo;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants;
|
use Lemonldap::NG::Portal::Main::Constants qw(PE_OK PE_BADCREDENTIALS);
|
||||||
|
|
||||||
extends qw(Lemonldap::NG::Portal::Auth::_WebForm);
|
extends qw(Lemonldap::NG::Portal::Auth::_WebForm);
|
||||||
|
|
||||||
|
|
|
@ -2,7 +2,8 @@ package Lemonldap::NG::Portal::Auth::LDAP;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants;
|
use Lemonldap::NG::Portal::Main::Constants
|
||||||
|
qw(PE_OK PE_LDAPCONNECTFAILED PE_PP_CHANGE_AFTER_RESET PE_PP_PASSWORD_EXPIRED);
|
||||||
|
|
||||||
our $VERSION = '2.0.0';
|
our $VERSION = '2.0.0';
|
||||||
|
|
||||||
|
|
|
@ -7,7 +7,8 @@ package Lemonldap::NG::Portal::Auth::_WebForm;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants;
|
use Lemonldap::NG::Portal::Main::Constants
|
||||||
|
qw(PE_OK PE_FIRSTACCESS PE_FORMEMPTY PE_PASSWORDFORMEMPTY PE_CAPTCHAEMPTY PE_CAPTCHAERROR);
|
||||||
|
|
||||||
our $VERSION = '2.0.0';
|
our $VERSION = '2.0.0';
|
||||||
|
|
||||||
|
|
|
@ -4,7 +4,7 @@ use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
|
|
||||||
use Lemonldap::NG::Common::Conf::Constants;
|
use Lemonldap::NG::Common::Conf::Constants;
|
||||||
use Lemonldap::NG::Portal::Main::Constants;
|
use Lemonldap::NG::Portal::Main::Constants ':all';
|
||||||
use Lemonldap::NG::Portal::Main::Request;
|
use Lemonldap::NG::Portal::Main::Request;
|
||||||
use Lemonldap::NG::Portal::Main::Plugins;
|
use Lemonldap::NG::Portal::Main::Plugins;
|
||||||
use Lemonldap::NG::Portal::Main::Init;
|
use Lemonldap::NG::Portal::Main::Init;
|
||||||
|
|
|
@ -122,7 +122,7 @@ use constant {
|
||||||
};
|
};
|
||||||
|
|
||||||
# EXPORTER PARAMETERS
|
# EXPORTER PARAMETERS
|
||||||
our @EXPORT = qw( PE_IMG_NOK PE_IMG_OK PE_INFO PE_REDIRECT PE_DONE PE_OK
|
our @EXPORT_OK = qw( PE_IMG_NOK PE_IMG_OK PE_INFO PE_REDIRECT PE_DONE PE_OK
|
||||||
PE_SESSIONEXPIRED PE_FORMEMPTY PE_WRONGMANAGERACCOUNT PE_USERNOTFOUND
|
PE_SESSIONEXPIRED PE_FORMEMPTY PE_WRONGMANAGERACCOUNT PE_USERNOTFOUND
|
||||||
PE_BADCREDENTIALS PE_LDAPCONNECTFAILED PE_LDAPERROR PE_APACHESESSIONERROR
|
PE_BADCREDENTIALS PE_LDAPCONNECTFAILED PE_LDAPERROR PE_APACHESESSIONERROR
|
||||||
PE_FIRSTACCESS PE_BADCERTIFICATE PE_PP_ACCOUNT_LOCKED PE_PP_PASSWORD_EXPIRED
|
PE_FIRSTACCESS PE_BADCERTIFICATE PE_PP_ACCOUNT_LOCKED PE_PP_PASSWORD_EXPIRED
|
||||||
|
@ -153,8 +153,8 @@ our @EXPORT = qw( PE_IMG_NOK PE_IMG_OK PE_INFO PE_REDIRECT PE_DONE PE_OK
|
||||||
PM_OIDC_SCOPE_PHONE PM_OIDC_SCOPE_OTHER PM_OIDC_CONFIRM_LOGOUT
|
PM_OIDC_SCOPE_PHONE PM_OIDC_SCOPE_OTHER PM_OIDC_CONFIRM_LOGOUT
|
||||||
HANDLER
|
HANDLER
|
||||||
);
|
);
|
||||||
our %EXPORT_TAGS = ( 'all' => [ @EXPORT, 'import' ], );
|
our %EXPORT_TAGS = ( 'all' => [ @EXPORT_OK, 'import' ], );
|
||||||
|
|
||||||
our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
|
our @EXPORT = qw(import PE_OK);
|
||||||
|
|
||||||
1;
|
1;
|
||||||
|
|
|
@ -23,7 +23,7 @@ package Lemonldap::NG::Portal::Main::Request;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants;
|
use Lemonldap::NG::Portal::Main::Constants ':all';
|
||||||
|
|
||||||
extends 'Lemonldap::NG::Common::PSGI::Request';
|
extends 'Lemonldap::NG::Common::PSGI::Request';
|
||||||
|
|
||||||
|
|
|
@ -2,7 +2,7 @@ package Lemonldap::NG::Portal::UserDB::DBI;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants;
|
use Lemonldap::NG::Portal::Main::Constants qw(PE_OK PE_ERROR PE_BADCREDENTIALS);
|
||||||
|
|
||||||
extends 'Lemonldap::NG::Portal::Lib::DBI';
|
extends 'Lemonldap::NG::Portal::Lib::DBI';
|
||||||
|
|
||||||
|
|
|
@ -7,7 +7,7 @@ package Lemonldap::NG::Portal::UserDB::Demo;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants;
|
use Lemonldap::NG::Portal::Main::Constants qw(PE_OK PE_USERNOTFOUND);
|
||||||
|
|
||||||
extends 'Lemonldap::NG::Portal::Main::Module';
|
extends 'Lemonldap::NG::Portal::Main::Module';
|
||||||
|
|
||||||
|
|
|
@ -2,7 +2,8 @@ package Lemonldap::NG::Portal::UserDB::LDAP;
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants;
|
use Lemonldap::NG::Portal::Main::Constants
|
||||||
|
qw(PE_OK PE_LDAPCONNECTFAILED PE_LDAPERROR PE_BADCREDENTIALS);
|
||||||
use Lemonldap::NG::Portal::Lib::LDAP;
|
use Lemonldap::NG::Portal::Lib::LDAP;
|
||||||
|
|
||||||
extends 'Lemonldap::NG::Portal::Main::Module';
|
extends 'Lemonldap::NG::Portal::Main::Module';
|
||||||
|
|
Loading…
Reference in New Issue
Block a user