This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fold_grind.t: Set $| if debugging
authorKarl Williamson <public@khwilliamson.com>
Sat, 20 Oct 2012 22:19:49 +0000 (16:19 -0600)
committerKarl Williamson <public@khwilliamson.com>
Sat, 20 Oct 2012 23:31:50 +0000 (17:31 -0600)
t/re/fold_grind.t

index 2c83d59..4e13110 100644 (file)
@@ -75,6 +75,7 @@ sub numerically {
 }
 
 my $list_all_tests = $ENV{PERL_DEBUG_FULL_TEST} || $DEBUG;
+$| = 1 if $list_all_tests;
 
 # Significant time is saved by not outputting each test but grouping the
 # output into subtests