integrate cfgperl contents into mainline

[p5sagit/p5-mst-13.2.git] / t / op / tr.t

diff --git a/t/op/tr.t b/t/op/tr.t
index aa1f9b2..4e6667c 100755 (executable)
--- a/t/op/tr.t
+++ b/t/op/tr.t
@@ -1,7 +1,9 @@
 # tr.t
 
-chdir 't' if -d 't';
-@INC = "../lib";
+BEGIN {
+    chdir 't' if -d 't';
+    unshift @INC, "../lib";
+}
 
 print "1..4\n";