about summary refs log tree commit
diff options
context:
space:
mode:
authorSteve Hay <steve.m.hay@googlemail.com>2014-10-10 23:58:45 +0100
committerSteve Hay <steve.m.hay@googlemail.com>2014-10-10 23:58:45 +0100
commit98f70c35042a35f95ab49f880c61f60dbee8d66a (patch)
tree4597023db037d3aa0e380ac7a0e54ecafd3c1dc2
parent2c160b441ccc609bf4397ad7dd783c68b8cac4c2 (diff)
downloadperl-libnet-98f70c35042a35f95ab49f880c61f60dbee8d66a.tar.gz
Don't run interactive prompt() in Makefile.PL when in PERL_CORE
-rw-r--r--Changes1
-rw-r--r--Makefile.PL2
2 files changed, 2 insertions, 1 deletions
diff --git a/Changes b/Changes
index 82b9b4e..475f6b4 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,6 @@
 libnet 3.02  -- TODO
 
+  * Don't run interactive prompt() in Makefile.PL when in PERL_CORE.
   * Fix $smtp->auth($sasl) to try the AUTH mechanism (if present) in the
     Authen::SASL object before falling back on other mechanisms. [Resolves
     CPAN RT#99415]
diff --git a/Makefile.PL b/Makefile.PL
index c034b31..e6ac185 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -47,7 +47,7 @@ MAIN: {
     $prereq_pms{'Convert::EBCDIC'} = '0.06' if $^O eq 'os390';
 
     my $xt = 'n';
-    if (not running_under_cpan()) {
+    if (not running_under_cpan() and not $ENV{PERL_CORE}) {
         $xt = prompt("Should I do external tests?\n" .
                      "These tests will fail if there is no internet" .
                      " connection or if a firewall\n" .