YA sync with mainline

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

diff --git a/t/lib/io_poll.t b/t/lib/io_poll.t
index a0d081b..68ad7b7 100755 (executable)
--- a/t/lib/io_poll.t
+++ b/t/lib/io_poll.t
@@ -3,10 +3,15 @@
 BEGIN {
     unless(grep /blib/, @INC) {
         chdir 't' if -d 't';
-        @INC = '../lib' if -d '../lib';
+        unshift @INC, '../lib' if -d '../lib';
     }
 }
 
+if ($^O eq 'mpeix') {
+    print "1..0 # Skip: broken on MPE/iX\n";
+    exit 0;
+}
+
 select(STDERR); $| = 1;
 select(STDOUT); $| = 1;