Missing std block.

p4raw-id: //depot/perl@9671

7 files changed, 37 insertions, 0 deletions

diff --git a/t/lib/lc-all.t b/t/lib/lc-all.t
index d34feca472..ed93c5a856 100644
--- a/t/lib/lc-all.t
+++ b/t/lib/lc-all.t
@@ -11,6 +11,11 @@
 # starting with list of languages/countries/currencies.
 #
 
+BEGIN {
+        chdir 't' if -d 't';
+        @INC = '../lib';
+}
+
 use Locale::Country;
 use Locale::Language;
 use Locale::Currency;
diff --git a/t/lib/lc-constants.t b/t/lib/lc-constants.t
index e71103d0f0..359cdfc7a5 100644
--- a/t/lib/lc-constants.t
+++ b/t/lib/lc-constants.t
@@ -3,6 +3,11 @@
 # constants.t - tests for Locale::Constants
 #
 
+BEGIN {
+        chdir 't' if -d 't';
+        @INC = '../lib';
+}
+
 use Locale::Constants;
 
 print "1..3\n";
diff --git a/t/lib/lc-country.t b/t/lib/lc-country.t
index 535291e10c..4234d1e6a7 100644
--- a/t/lib/lc-country.t
+++ b/t/lib/lc-country.t
@@ -3,6 +3,11 @@
 # country.t - tests for Locale::Country
 #
 
+BEGIN {
+        chdir 't' if -d 't';
+        @INC = '../lib';
+}
+
 use Locale::Country;
 
 #-----------------------------------------------------------------------
diff --git a/t/lib/lc-currency.t b/t/lib/lc-currency.t
index f66353c465..55a04db9fb 100644
--- a/t/lib/lc-currency.t
+++ b/t/lib/lc-currency.t
@@ -2,6 +2,12 @@
 #
 # currency.t - tests for Locale::Currency
 #
+
+BEGIN {
+        chdir 't' if -d 't';
+        @INC = '../lib';
+}
+
 use Locale::Currency;
 
 #-----------------------------------------------------------------------
diff --git a/t/lib/lc-language.t b/t/lib/lc-language.t
index b9c25f1f5b..6a70b79ef9 100644
--- a/t/lib/lc-language.t
+++ b/t/lib/lc-language.t
@@ -2,6 +2,12 @@
 #
 # language.t - tests for Locale::Language
 #
+
+BEGIN {
+	chdir 't' if -d 't';
+	@INC = '../lib';
+}
+
 use Locale::Language;
 
 #-----------------------------------------------------------------------
diff --git a/t/lib/lc-uk.t b/t/lib/lc-uk.t
index 98f71d242a..948e2d1af2 100644
--- a/t/lib/lc-uk.t
+++ b/t/lib/lc-uk.t
@@ -3,6 +3,11 @@
 # uk.t - tests for Locale::Country with "uk" aliases to "gb"
 #
 
+BEGIN {
+	chdir 't' if -d 't';
+	@INC = '../lib';
+}
+
 use Locale::Country;
 
 Locale::Country::_alias_code('uk' => 'gb');
diff --git a/t/pod/find.t b/t/pod/find.t
index 846b3accb3..bb6e9ba205 100644
--- a/t/pod/find.t
+++ b/t/pod/find.t
@@ -1,6 +1,11 @@
 # Testing of Pod::Find
 # Author: Marek Rouchal <marek@saftsack.fs.uni-bayreuth.de>
 
+BEGIN {
+        chdir 't' if -d 't';
+        @INC = '../lib';
+}
+
 $| = 1;
 
 use Test;