From 5d96dbec6453abd4af3ccc5ff5f93aeae2f56c5b Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Mon, 27 Jun 2005 13:48:26 +0000
Subject: [PATCH] Fix tests of Filter::Simple 0.82 in the core

p4raw-id: //depot/perl@24991
---
 lib/Filter/Simple/t/data.t        | 2 +-
 lib/Filter/Simple/t/export.t      | 2 +-
 lib/Filter/Simple/t/filter.t      | 2 +-
 lib/Filter/Simple/t/filter_only.t | 2 +-
 lib/Filter/Simple/t/import.t      | 2 +-
 5 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/lib/Filter/Simple/t/data.t b/lib/Filter/Simple/t/data.t
index b8db6d8..4fbae32 100644
--- a/lib/Filter/Simple/t/data.t
+++ b/lib/Filter/Simple/t/data.t
@@ -1,7 +1,7 @@
 BEGIN {
     if( $ENV{PERL_CORE} ) {
         chdir 't';
-        @INC = '../lib';
+        @INC = ('../lib', '.');
     }
     else {
         unshift @INC, 't/lib/';
diff --git a/lib/Filter/Simple/t/export.t b/lib/Filter/Simple/t/export.t
index d72fcfa..f9f1501 100644
--- a/lib/Filter/Simple/t/export.t
+++ b/lib/Filter/Simple/t/export.t
@@ -1,7 +1,7 @@
 BEGIN {
     if( $ENV{PERL_CORE} ) {
         chdir 't';
-        @INC = '../lib';
+        @INC = ('../lib', '.');
     }
     else {
         unshift @INC, 't/lib/';
diff --git a/lib/Filter/Simple/t/filter.t b/lib/Filter/Simple/t/filter.t
index b0de707..59478f9 100644
--- a/lib/Filter/Simple/t/filter.t
+++ b/lib/Filter/Simple/t/filter.t
@@ -1,7 +1,7 @@
 BEGIN {
     if( $ENV{PERL_CORE} ) {
         chdir 't';
-        @INC = '../lib';
+        @INC = ('../lib', '.');
     }
     else {
         unshift @INC, 't/lib/';
diff --git a/lib/Filter/Simple/t/filter_only.t b/lib/Filter/Simple/t/filter_only.t
index 2fc425b..591cb38 100644
--- a/lib/Filter/Simple/t/filter_only.t
+++ b/lib/Filter/Simple/t/filter_only.t
@@ -1,7 +1,7 @@
 BEGIN {
     if( $ENV{PERL_CORE} ) {
         chdir 't';
-        @INC = '../lib';
+        @INC = ('../lib', '.');
     }
     else {
         unshift @INC, 't/lib/';
diff --git a/lib/Filter/Simple/t/import.t b/lib/Filter/Simple/t/import.t
index 2bc7760..a2454bf 100644
--- a/lib/Filter/Simple/t/import.t
+++ b/lib/Filter/Simple/t/import.t
@@ -1,7 +1,7 @@
 BEGIN {
     if( $ENV{PERL_CORE} ) {
         chdir 't';
-        @INC = '../lib';
+        @INC = ('../lib', '.');
     }
     else {
         unshift @INC, 't/lib';
-- 
2.7.4