Tell perl to autoflush output in darcs-all. Suggested by Claus Reinke

[ghc-hetmet.git] / darcs-all

diff --git a/darcs-all b/darcs-all
index c960d07..6e48377 100644 (file)
--- a/darcs-all
+++ b/darcs-all
@@ -20,6 +20,8 @@ use strict;
 #       ./darcs-all -q send --dry-run
 #   -q says to be quite, and -s to be silent.
 
+$| = 1; # autoflush stdout after each print, to avoid output after die
+
 # Figure out where to get the other repositories from,
 # based on where this GHC repo came from.
 my $defaultrepo = `cat _darcs/prefs/defaultrepo`;