dani
/
lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix Perl dependencies (see RT#129960)

This commit is contained in:
Xavier Guimard 2019-07-02 08:55:56 +02:00
parent f8e65cb6d8
commit f370255c3a
22 changed files with 57 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lemonldap-ng-portal/Makefile.PL
View File

@ -27,6 +27,7 @@ WriteMakefile(
'Net::OpenID::Consumer' => 0,
'Net::OpenID::Server' => 0,
'SOAP::Lite' => 0,
'Text::Unidecode' => 0,
'Unicode::String' => 0,
'Web::ID' => 0,
},
@ -55,6 +56,9 @@ WriteMakefile(
'MIME::Entity' => 0,
'SOAP::Lite' => 0,
'String::Random' => 0,
'Text::Unidecode' => 0,
'XML::LibXML' => 0,
'XML::Simple' => 0,
},
PREREQ_PM => {
'Clone' => 0,

3
lemonldap-ng-portal/t/31-Auth-and-issuer-CAS-Logout-20.t
View File

@ -14,6 +14,9 @@ my $debug = 'error';
my ( $issuer, $sp, $res );
my %handlerOR = ( issuer => [], sp => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
# Redefine LWP methods for tests
LWP::Protocol::PSGI->register(
sub {

3
lemonldap-ng-portal/t/31-Auth-and-issuer-CAS-Logout-30.t
View File

@ -14,6 +14,9 @@ my $debug = 'error';
my ( $issuer, $sp, $res );
my %handlerOR = ( issuer => [], sp => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
# Redefine LWP methods for tests
LWP::Protocol::PSGI->register(
sub {

3
lemonldap-ng-portal/t/31-Auth-and-issuer-CAS-XSS-on-logout.t
View File

@ -14,6 +14,9 @@ my $debug = 'error';
my ( $issuer, $sp, $res );
my %handlerOR = ( issuer => [], sp => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
# Redefine LWP methods for tests
LWP::Protocol::PSGI->register(
sub {

3
lemonldap-ng-portal/t/31-Auth-and-issuer-CAS-declared-app-userattr.t
View File

@ -14,6 +14,9 @@ my $debug = 'error';
my ( $issuer, $sp, $res );
my %handlerOR = ( issuer => [], sp => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
# Redefine LWP methods for tests
LWP::Protocol::PSGI->register(
sub {

3
lemonldap-ng-portal/t/31-Auth-and-issuer-CAS-declared-app.t
View File

@ -14,6 +14,9 @@ my $debug = 'error';
my ( $issuer, $sp, $res );
my %handlerOR = ( issuer => [], sp => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
# Redefine LWP methods for tests
LWP::Protocol::PSGI->register(
sub {

3
lemonldap-ng-portal/t/31-Auth-and-issuer-CAS-declared-apps.t
View File

@ -14,6 +14,9 @@ my $debug = 'error';
my ( $issuer, $sp, $res );
my %handlerOR = ( issuer => [], sp => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
# Redefine LWP methods for tests
LWP::Protocol::PSGI->register(
sub {

3
lemonldap-ng-portal/t/31-Auth-and-issuer-CAS-default.t
View File

@ -14,6 +14,9 @@ my $debug = 'error';
my ( $issuer, $sp, $res );
my %handlerOR = ( issuer => [], sp => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
# Redefine LWP methods for tests
LWP::Protocol::PSGI->register(
sub {

3
lemonldap-ng-portal/t/31-Auth-and-issuer-CAS-gateway.t
View File

@ -14,6 +14,9 @@ my $debug = 'error';
my ( $issuer, $sp, $res );
my %handlerOR = ( issuer => [], sp => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
# Redefine LWP methods for tests
LWP::Protocol::PSGI->register(
sub {

3
lemonldap-ng-portal/t/31-Auth-and-issuer-CAS-proxied.t
View File

@ -14,6 +14,9 @@ my $debug = 'error';
my ( $issuer, $sp, $res );
my %handlerOR = ( issuer => [], sp => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
# Redefine LWP methods for tests
LWP::Protocol::PSGI->register(
sub {

3
lemonldap-ng-portal/t/31-Auth-and-issuer-CAS-with-choice-and-cancel.t
View File

@ -16,6 +16,9 @@ my $debug = 'error';
my ( $issuer, $sp, $res );
my %handlerOR = ( issuer => [], sp => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
# Redefine LWP methods for tests
LWP::Protocol::PSGI->register(
sub {

3
lemonldap-ng-portal/t/31-Auth-and-issuer-CAS-with-choice.t
View File

@ -16,6 +16,9 @@ my $debug = 'error';
my ( $issuer, $sp, $res );
my %handlerOR = ( issuer => [], sp => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
# Redefine LWP methods for tests
LWP::Protocol::PSGI->register(
sub {

3
lemonldap-ng-portal/t/32-CAS-10.t
View File

@ -14,6 +14,9 @@ my $debug = 'error';
my ( $issuer, $res );
my %handlerOR = ( issuer => [] );
eval { require XML::Simple };
plan skip_all => "Missing dependencies: $@" if ($@);
ok( $issuer = issuer(), 'Issuer portal' );
count(1);
switch ('issuer');

4
lemonldap-ng-portal/t/37-CAS-App-to-SAML-IdP-POST-with-WAYF.t
View File

@ -58,9 +58,9 @@ LWP::Protocol::PSGI->register(
);
SKIP: {
eval "use Lasso";
eval "use Lasso;use XML::Simple";
if ($@) {
skip 'Lasso not found', $maintests;
skip 'Lasso or XML::Simple not found', $maintests;
}
# Initialization

4
lemonldap-ng-portal/t/37-CAS-App-to-SAML-IdP-POST.t
View File

@ -58,9 +58,9 @@ LWP::Protocol::PSGI->register(
);
SKIP: {
eval "use Lasso";
eval "use Lasso;use XML::Simple";
if ($@) {
skip 'Lasso not found', $maintests;
skip 'Lasso or XML::Simple not found', $maintests;
}
# Initialization

4
lemonldap-ng-portal/t/37-SAML-SP-POST-to-CAS-server-with-Choice.t
View File

@ -58,9 +58,9 @@ LWP::Protocol::PSGI->register(
);
SKIP: {
eval "use Lasso";
eval "use Lasso;use XML::Simple";
if ($@) {
skip 'Lasso not found', $maintests;
skip 'Lasso or XML::Simple not found', $maintests;
}
# Initialization

4
lemonldap-ng-portal/t/37-SAML-SP-POST-to-CAS-server.t
View File

@ -58,9 +58,9 @@ LWP::Protocol::PSGI->register(
);
SKIP: {
eval "use Lasso";
eval "use Lasso;use XML::Simple";
if ($@) {
skip 'Lasso not found', $maintests;
skip 'Lasso or XML::Simple not found', $maintests;
}
# Initialization

2
lemonldap-ng-portal/t/42-Register-Demo-with-captcha.t
View File

@ -15,7 +15,7 @@ my $mailSend = 0;
SKIP: {
eval
'require Email::Sender::Simple;use GD::SecurityImage;use Image::Magick;';
'require Email::Sender::Simple;use GD::SecurityImage;use Image::Magick;use Text::Unidecode';
if ($@) {
skip 'Missing dependencies', $maintests;
}

2
lemonldap-ng-portal/t/42-Register-Demo-with-token.t
View File

@ -13,7 +13,7 @@ my $maintests = 12;
my ( $res, $user, $pwd );
SKIP: {
eval 'require Email::Sender::Simple';
eval 'require Email::Sender::Simple;use Text::Unidecode';
if ($@) {
skip 'Missing dependencies', $maintests;
}

2
lemonldap-ng-portal/t/42-Register-Demo.t
View File

@ -13,7 +13,7 @@ my $maintests = 9;
my ( $res, $user, $pwd );
SKIP: {
eval 'require Email::Sender::Simple';
eval 'require Email::Sender::Simple; use Text::Unidecode';
if ($@) {
skip 'Missing dependencies', $maintests;
}

2
lemonldap-ng-portal/t/42-Register-Security.t
View File

@ -13,7 +13,7 @@ my $maintests = 5;
my ( $res, $user, $pwd );
SKIP: {
eval 'require Email::Sender::Simple';
eval 'require Email::Sender::Simple;use Text::Unidecode';
if ($@) {
skip 'Missing dependencies', $maintests;
}

6
lemonldap-ng-portal/t/70-2F-TOTP-with-TTL-and-XML.t
View File

@ -7,7 +7,11 @@ my $maintests = 20;
my $file = '20190616_dwho_Tm90aWZpY2F0aW9uX1NG.json';
SKIP: {
eval { require Convert::Base32 };
eval {
require Convert::Base32;
require XML::LibXML;
require XML::LibXSLT;
};
if ($@) {
skip 'Convert::Base32 is missing', $maintests;
}