From: Mark Bixby <mark@bixby.org>
Date: Mon, 4 Jan 1999 13:34:58 +0000 (-0800)
Subject: t/op/sysio.t for MPE/iX
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=57af3f31e412bc462f94524ad8bb0848263c0cc6;p=p5sagit%2Fp5-mst-13.2.git

t/op/sysio.t for MPE/iX

To: perlbug@perl.com
Message-Id: <199901042134.NAA18852@spock.dis.cccd.edu>

p4raw-id: //depot/cfgperl@2574
---

diff --git a/t/op/sysio.t b/t/op/sysio.t
index 0318fed..22e60e3 100755
--- a/t/op/sysio.t
+++ b/t/op/sysio.t
@@ -6,7 +6,8 @@ chdir('op') || die "sysio.t: cannot look for myself: $!";
 
 open(I, 'sysio.t') || die "sysio.t: cannot find myself: $!";
 
-$reopen = ($^O eq 'VMS' || $^O eq 'os2' || $^O eq 'MSWin32' || $^O eq 'dos');
+$reopen = ($^O eq 'VMS' || $^O eq 'os2' || $^O eq 'MSWin32' || $^O eq 'dos' ||
+	   $^O eq 'mpeix');
 
 $x = 'abc';