From: Artur Bergman <sky@nanisky.com>
Date: Sat, 7 Jun 2003 12:42:28 +0000 (+0000)
Subject: Work in non core env.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=974ec8aabf7e88f4525f977f303f53cf975a56ac;p=p5sagit%2Fp5-mst-13.2.git

Work in non core env.

p4raw-id: //depot/perl@19705
---

diff --git a/ext/threads/t/basic.t b/ext/threads/t/basic.t
index 4236bf6..c228d70 100755
--- a/ext/threads/t/basic.t
+++ b/ext/threads/t/basic.t
@@ -15,7 +15,7 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    @INC = '../lib';
+    push @INC, '../lib';
     require Config; import Config;
     unless ($Config{'useithreads'}) {
 	print "1..0 # Skip: no useithreads\n";
diff --git a/ext/threads/t/end.t b/ext/threads/t/end.t
index f3dd92c..dd26042 100644
--- a/ext/threads/t/end.t
+++ b/ext/threads/t/end.t
@@ -4,7 +4,7 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    @INC = '../lib';
+    push @INC, '../lib';
     require Config; import Config;
     unless ($Config{'useithreads'}) {
         print "1..0 # Skip: no useithreads\n";
diff --git a/ext/threads/t/join.t b/ext/threads/t/join.t
index 5ffc6c9..bcd813d 100644
--- a/ext/threads/t/join.t
+++ b/ext/threads/t/join.t
@@ -1,6 +1,6 @@
 BEGIN {
     chdir 't' if -d 't';
-    @INC = '../lib';
+    push @INC, '../lib';
     require Config; import Config;
     unless ($Config{'useithreads'}) {
         print "1..0 # Skip: no useithreads\n";
diff --git a/ext/threads/t/libc.t b/ext/threads/t/libc.t
index 409945a..f0567ba 100644
--- a/ext/threads/t/libc.t
+++ b/ext/threads/t/libc.t
@@ -1,7 +1,7 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    @INC = '../lib';
+    push @INC, '../lib';
     require Config; import Config;
     unless ($Config{'useithreads'}) {
         print "1..0 # Skip: no useithreads\n";
diff --git a/ext/threads/t/list.t b/ext/threads/t/list.t
index 60bf209..193546f 100644
--- a/ext/threads/t/list.t
+++ b/ext/threads/t/list.t
@@ -1,7 +1,7 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    @INC = '../lib';
+    push @INC, '../lib';
     require Config; import Config;
     unless ($Config{'useithreads'}) {
         print "1..0 # Skip: no useithreads\n";
diff --git a/ext/threads/t/problems.t b/ext/threads/t/problems.t
index a7b6c34..7d0ee2f 100644
--- a/ext/threads/t/problems.t
+++ b/ext/threads/t/problems.t
@@ -1,7 +1,7 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    @INC = '../lib';
+    push @INC, '../lib';
     require Config; import Config;
     unless ($Config{'useithreads'}) {
 	print "1..0 # Skip: no useithreads\n";
diff --git a/ext/threads/t/stress_cv.t b/ext/threads/t/stress_cv.t
index eb2bab1..407a7fd 100644
--- a/ext/threads/t/stress_cv.t
+++ b/ext/threads/t/stress_cv.t
@@ -1,6 +1,6 @@
 BEGIN {
     chdir 't' if -d 't';
-    @INC = '../lib';
+    push @INC, '../lib';
     require Config; import Config;
     unless ($Config{'useithreads'}) {
 	print "1..0 # Skip: no useithreads\n";
diff --git a/ext/threads/t/stress_re.t b/ext/threads/t/stress_re.t
index e5daf90..aa89b19 100644
--- a/ext/threads/t/stress_re.t
+++ b/ext/threads/t/stress_re.t
@@ -1,6 +1,6 @@
 BEGIN {
     chdir 't' if -d 't';
-    @INC = '../lib';
+    push @INC, '../lib';
     require Config; import Config;
     unless ($Config{'useithreads'}) {
 	print "1..0 # Skip: no useithreads\n";
diff --git a/ext/threads/t/stress_string.t b/ext/threads/t/stress_string.t
index 23449d2..3cd1e8e 100644
--- a/ext/threads/t/stress_string.t
+++ b/ext/threads/t/stress_string.t
@@ -1,6 +1,6 @@
 BEGIN {
     chdir 't' if -d 't';
-    @INC = '../lib';
+    push @INC, '../lib';
     require Config; import Config;
     unless ($Config{'useithreads'}) {
 	print "1..0 # Skip: no useithreads\n";
diff --git a/ext/threads/t/thread.t b/ext/threads/t/thread.t
index d03975a..f0d8936 100644
--- a/ext/threads/t/thread.t
+++ b/ext/threads/t/thread.t
@@ -1,7 +1,7 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    @INC = qw(../lib .);
+    push @INC, '../lib';
     require Config; import Config;
     unless ($Config{'useithreads'}) {
         print "1..0 # Skip: no useithreads\n";