Not quite so relicy as thought in #11651 (op/concat #4 and #5

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

diff --git a/lib/FileHandle.t b/lib/FileHandle.t
index eaddf49..c994c8b 100755 (executable)
--- a/lib/FileHandle.t
+++ b/lib/FileHandle.t
@@ -8,6 +8,10 @@ BEGIN {
        print "1..0\n";
        exit 0;
     }
+    if ($^O eq 'mpeix') {
+       print "1..0 # Skip: broken on MPE/iX\n";
+       exit 0;
+    }
 }
 
 use FileHandle;