X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FExporter.t;h=2fbfcfa43bae2830f5159b78fcfdcaf2f95fa4ce;hb=55f4245edad4e38b1869f0a6467a997a59257a0f;hp=c90a4608d9dad11d51aed0c907c40c3cdf83bce8;hpb=57ddaf2acd83324bde010fedf6d86f70fe4ec09e;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/Exporter.t b/lib/Exporter.t
index c90a460..2fbfcfa 100644
--- a/lib/Exporter.t
+++ b/lib/Exporter.t
@@ -1,8 +1,10 @@
-#!./perl -w
+#!perl -w
 
 BEGIN {
-    chdir 't' if -d 't';
-    @INC = '../lib';
+   if( $ENV{PERL_CORE} ) {
+        chdir 't' if -d 't';
+        @INC = '../lib';
+    }
 }
 
 # Can't use Test::Simple/More, they depend on Exporter.