3DPrinting/PrusaSlicer-NonPlainar
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Have SLIC3R_NO_AUTO check dependencies before requiring cpanm, and don't skip tests if all prerequisites are there

Browse Source
This commit is contained in:
Alessandro Ranellucci 2013-06-24 16:32:03 +02:00
parent 9e927ffaf9
commit ddc8727b70
1 changed files with 18 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
Build.PL
View File

@ -32,6 +32,21 @@ my %recommends = qw(
# removed:
# Wx 0.9901
my $skip_tests = 0;
if ($ENV{SLIC3R_NO_AUTO}) {
foreach my $module (sort keys %prereqs) {
my $version = $prereqs{$module};
next if eval "use $module $version; 1";
$skip_tests = 1 if exists $prereqs{$module};
print "Missing prerequisite $module $version\n";
}
foreach my $module (sort keys %recommends) {
my $version = $recommends{$module};
next if eval "use $module $version; 1";
print "Missing optional $module $version\n";
}
}
my @try = (
$ENV{CPANM} // (),
File::Spec->catfile($Config{sitebin}, 'cpanm'),
@ -69,16 +84,11 @@ EOF
my %modules = (%prereqs, %recommends);
foreach my $module (sort keys %modules) {
my $version = $modules{$module};
if ($ENV{SLIC3R_NO_AUTO}) {
print "Missing prerequisite $module $version\n"
if !eval "use $module $version; 1";
} else {
system $cpanm, "$module~$version";
my $res = system $cpanm, "$module~$version";
$skip_tests = 1 if $res != 0;
}
}
exit if $ENV{SLIC3R_NO_AUTO};
if (eval "use App::Prove; 1") {
if (eval "use App::Prove; 1" && !$skip_tests) {
App::Prove->new->run;
}