From d92626bc62b8f1da53bee99710228c0b755ac3f7 Mon Sep 17 00:00:00 2001
From: Michael Stapelberg <michael@stapelberg.de>
Date: Sun, 12 Aug 2012 00:20:52 +0200
Subject: [PATCH] complete-run: enable autoflush (useful for debugging)

I used the following command to find hanging workers:

    sort latest/complete-run.log|cut -f 2 -d ' '|uniq -c|grep -v '^[ \t]*2'
---
 testcases/complete-run.pl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/testcases/complete-run.pl b/testcases/complete-run.pl
index f5520603..88fece4b 100755
--- a/testcases/complete-run.pl
+++ b/testcases/complete-run.pl
@@ -15,6 +15,7 @@ use TAP::Harness;
 use TAP::Parser;
 use TAP::Parser::Aggregator;
 use Time::HiRes qw(time);
+use IO::Handle;
 # these are shipped with the testsuite
 use lib qw(lib);
 use StartXDummy;
@@ -127,6 +128,7 @@ printf("\nRough time estimate for this run: %.2f seconds\n\n", $timings{GLOBAL})
 
 my $logfile = "$outdir/complete-run.log";
 open $log, '>', $logfile or die "Could not create '$logfile': $!";
+$log->autoflush(1);
 say "Writing logfile to '$logfile'...";
 
 # 3: run all tests