SYN SYN

[p5sagit/p5-mst-13.2.git] / t / pragma / diagnostics.t

diff --git a/t/pragma/diagnostics.t b/t/pragma/diagnostics.t
index 15cd6b5..14014f6 100755 (executable)
--- a/t/pragma/diagnostics.t
+++ b/t/pragma/diagnostics.t
@@ -1,8 +1,8 @@
 #!./perl
 
 BEGIN {
-    chdir '..' if -d '../pod';
-    unshift @INC, './lib' if -d './lib';
+    chdir '..' if -d '../pod' && -d '../t';
+    @INC = 'lib';
 }