Reintroduce #9889 to unbuffer the stderr/stdout on stdio configs.
authorJarkko Hietaniemi <jhi@iki.fi>
Mon, 30 Apr 2001 10:49:40 +0000 (10:49 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Mon, 30 Apr 2001 10:49:40 +0000 (10:49 +0000)
p4raw-id: //depot/perl@9908

t/lib/selfstubber.t

index fd0cf0640ec7c4959c991768eff315988a863cad..d33848959907192ca778405f1841f171f24b9f47 100644 (file)
@@ -10,6 +10,10 @@ use Devel::SelfStubber;
 
 my $runperl = "$^X \"-I../lib\"";
 
+# ensure correct output ordering for system() calls
+
+select STDERR; $| = 1; select STDOUT; $| = 1;
+
 print "1..12\n";
 
 my @cleanup;