Don't let Module::AutoInstall run interactively

This commit is contained in:
Dennis Kaarsemaker
2011-08-19 09:23:00 +02:00
parent b3723347b2
commit a84c2839ce

View File

@@ -819,6 +819,7 @@ for my $file (@args) {
# TODO It's possible these need to be listed instead of just detected.
my $scripts=(grep /^(?:bin|scripts)\//, @files);
my $uses_autoinstall = grep /Module\/AutoInstall.pm/, @files;
my (%build_requires,%requires);
my ($yml,$meta);
if (grep /^META\.yml$/, @files
@@ -1115,6 +1116,12 @@ END
\%build
END
if($uses_autoinstall) {
print $spec <<END
export PERL_AUTOINSTALL="--skipdeps"
END
}
if ($usebuildpl) {
print $spec <<END;
\%{__perl} Build.PL installdirs=vendor@{[$noarch ? '' : qq{ optimize="$macro{optimize}"} ]}