More VMS tweaks from Craig A. Berry.

[p5sagit/p5-mst-13.2.git] / t / lib / lc-language.t

diff --git a/t/lib/lc-language.t b/t/lib/lc-language.t
index b9c25f1..9facd35 100644 (file)
--- a/t/lib/lc-language.t
+++ b/t/lib/lc-language.t
@@ -2,8 +2,16 @@
 #
 # language.t - tests for Locale::Language
 #
+
+BEGIN {
+       chdir 't' if -d 't';
+       @INC = '../lib';
+}
+
 use Locale::Language;
 
+no utf8; # so that the naked 8-bit characters won't gripe under use utf8
+
 #-----------------------------------------------------------------------
 # This is an array of tests. Each test is eval'd as an expression.
 # If it evaluates to FALSE, then "not ok N" is printed for the test,