From: Steffen Mueller <smueller@cpan.org>
Date: Sun, 30 Aug 2009 20:18:42 +0000 (+0200)
Subject: Fix Test::ParseWords' test (remove PERL_CORE boilerplate)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4a503f371e8f1d4e174172c023c18046ee5b1a22;p=p5sagit%2Fp5-mst-13.2.git

Fix Test::ParseWords' test (remove PERL_CORE boilerplate)
---

diff --git a/ext/Text-ParseWords/t/taint.t b/ext/Text-ParseWords/t/taint.t
index 029f27d..959ba79 100644
--- a/ext/Text-ParseWords/t/taint.t
+++ b/ext/Text-ParseWords/t/taint.t
@@ -1,19 +1,6 @@
 #!./perl -Tw
 # [perl #33173] shellwords.pl and tainting
 
-BEGIN {
-    if ( $ENV{PERL_CORE} ) {
-        chdir 't' if -d 't';
-        @INC = '../lib';
-        require Config;
-        no warnings 'once';
-        if ($Config::Config{extensions} !~ /\bList\/Util\b/) {
-            print "1..0 # Skip: Scalar::Util was not built\n";
-            exit 0;
-        }
-    }
-}
-
 use Text::ParseWords qw(shellwords old_shellwords);
 use Scalar::Util qw(tainted);