1 files changed, 7 insertions, 0 deletions
diff --git a/lib/base/t/warnings.t b/lib/base/t/warnings.t
index 51e91741ea..631cc37b7f 100644
--- a/lib/base/t/warnings.t
+++ b/lib/base/t/warnings.t
@@ -1,5 +1,12 @@
 #!/usr/bin/perl -w
 
+BEGIN {
+   if( $ENV{PERL_CORE} ) {
+        chdir 't' if -d 't';
+        @INC = qw(../lib);
+    }
+}
+
 use strict;
 
 use Test::More tests => 1;