Revert "[PATCH] Cleanup output from t/io/defout.t RT#78572"
authorFather Chrysostomos <sprout@cpan.org>
Tue, 26 Oct 2010 22:57:06 +0000 (15:57 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 26 Oct 2010 22:57:06 +0000 (15:57 -0700)
This reverts commit 4d2eb54d4d30c9c5b093de9a57c324d5551c58fe.

t/io/defout.t

index ea59f72..dda3b4c 100644 (file)
@@ -12,7 +12,8 @@ BEGIN {
     require './test.pl';
 }
 
-plan tests => 17;
+plan tests => 16;
+
 
 my $stderr = *STDERR;
 select($stderr);
@@ -24,12 +25,12 @@ $stderr = 1; # whoops, PL_defoutgv no longer a GV!
 
 ok print(""), 'print';
 ok select(), 'select';
-next_test();
+$a = 'fooo';
 format STDERR =
 #@<<
-ok 3
+$a;
 .
-ok ! write();
+ok ! write(), 'write';
 
 ok($^, '$^');
 ok($~, '$~');