[patch: perl@8211]VMS: add -Duseperlio capacity to configure.com

[p5sagit/p5-mst-13.2.git] / t / op / sysio.t

diff --git a/t/op/sysio.t b/t/op/sysio.t
index 0318fed..e43f850 100755 (executable)
--- a/t/op/sysio.t
+++ b/t/op/sysio.t
@@ -2,11 +2,12 @@
 
 print "1..39\n";
 
-chdir('op') || die "sysio.t: cannot look for myself: $!";
+chdir('op') || chdir('t/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';