Missing std block.

p4raw-id: //depot/perl@9671

diff --git a/t/lib/lc-all.t b/t/lib/lc-all.t
index d34feca..ed93c5a 100644 (file)
--- 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 e71103d..359cdfc 100644 (file)
--- 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 535291e..4234d1e 100644 (file)
--- 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 f66353c..55a04db 100644 (file)
--- 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 b9c25f1..6a70b79 100644 (file)
--- 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 98f71d2..948e2d1 100644 (file)
--- 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 846b3ac..bb6e9ba 100644 (file)
--- 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;