Fix tests of Filter::Simple 0.82 in the core
Rafael Garcia-Suarez [Mon, 27 Jun 2005 13:48:26 +0000 (13:48 +0000)]
p4raw-id: //depot/perl@24991

lib/Filter/Simple/t/data.t
lib/Filter/Simple/t/export.t
lib/Filter/Simple/t/filter.t
lib/Filter/Simple/t/filter_only.t
lib/Filter/Simple/t/import.t

index b8db6d8..4fbae32 100644 (file)
@@ -1,7 +1,7 @@
 BEGIN {
     if( $ENV{PERL_CORE} ) {
         chdir 't';
-        @INC = '../lib';
+        @INC = ('../lib', '.');
     }
     else {
         unshift @INC, 't/lib/';
index d72fcfa..f9f1501 100644 (file)
@@ -1,7 +1,7 @@
 BEGIN {
     if( $ENV{PERL_CORE} ) {
         chdir 't';
-        @INC = '../lib';
+        @INC = ('../lib', '.');
     }
     else {
         unshift @INC, 't/lib/';
index b0de707..59478f9 100644 (file)
@@ -1,7 +1,7 @@
 BEGIN {
     if( $ENV{PERL_CORE} ) {
         chdir 't';
-        @INC = '../lib';
+        @INC = ('../lib', '.');
     }
     else {
         unshift @INC, 't/lib/';
index 2fc425b..591cb38 100644 (file)
@@ -1,7 +1,7 @@
 BEGIN {
     if( $ENV{PERL_CORE} ) {
         chdir 't';
-        @INC = '../lib';
+        @INC = ('../lib', '.');
     }
     else {
         unshift @INC, 't/lib/';
index 2bc7760..a2454bf 100644 (file)
@@ -1,7 +1,7 @@
 BEGIN {
     if( $ENV{PERL_CORE} ) {
         chdir 't';
-        @INC = '../lib';
+        @INC = ('../lib', '.');
     }
     else {
         unshift @INC, 't/lib';