More correct now, but actually the two new tests

need to be moved, since they are perlio-only...

p4raw-id: //depot/perl@15497

diff --git a/t/io/open.t b/t/io/open.t
index fc4ca43..d85c9c5 100755 (executable)
--- a/t/io/open.t
+++ b/t/io/open.t
@@ -10,7 +10,7 @@ $|  = 1;
 use warnings;
 $Is_VMS = $^O eq 'VMS';
 
-plan tests => 107;
+plan tests => 106;
 
 my $Perl = which_perl();
 
@@ -261,8 +261,6 @@ like( $@, qr/Bad filehandle:\s+afile/,          '       right error' );
     SKIP: {
        local $TODO = "in-memory stdhandles not implemented yet";
 
-       skip($TODO, 3);
-
        # test in-memory open over STDOUT
        open OLDOUT, ">&STDOUT" or die "cannot dup STDOUT: $!";
        #close STDOUT;