allow MIME::QuotePrint to handle ASCII code numbers on EBCDIC machines

[p5sagit/p5-mst-13.2.git] / t / pod / find.t

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;