From: Gurusamy Sarathy Date: Fri, 17 Sep 1999 21:13:55 +0000 (+0000) Subject: fix typo X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=df4447340939b80bd74b2a62bd47699af5016621;p=p5sagit%2Fp5-mst-13.2.git fix typo p4raw-id: //depot/perl@4187 --- diff --git a/t/io/open.t b/t/io/open.t index 0329c31..80fa0b5 100755 --- a/t/io/open.t +++ b/t/io/open.t @@ -79,7 +79,7 @@ print "ok 23\n"; unlink("afile"); } -if ($Is_VMS) { for (24..46) { print "ok $_ # skipped: not Unix fork\n"; { +if ($Is_VMS) { for (24..46) { print "ok $_ # skipped: not Unix fork\n"; } else { print "# \$!='$!'\nnot " unless open(my $f, '-|', <<'EOC'); ./perl -e "print qq(a row\n); print qq(another row\n)"