X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=darcs-all;fp=darcs-all;h=b190fa0956e0462f0deb0b13da92a2553052465a;hp=c97729dfe9fb137f38edbb71271596b513e5438d;hb=7dbbcfce6b8b0531362f5ac56eea7edf91c80da2;hpb=81c95f7d9854521a568179bb19199299835b7a53

diff --git a/darcs-all b/darcs-all
index c97729d..b190fa0 100644
--- a/darcs-all
+++ b/darcs-all
@@ -322,6 +322,8 @@ sub main {
 }
 
 END {
+    my $ec = $?;
+
     message "== Checking for old bytestring repo";
     if (-d "libraries/bytestring/_darcs") {
         if ((system "darcs annotate --repodir libraries/bytestring --match 'hash 20080118173113-3fd76-d5b74c04372a297b585ebea4e16d524551ce5035' > /dev/null 2> /dev/null") == 0) {
@@ -352,6 +354,8 @@ and say yes to each patch.
 ============================
 EOF
     }
+
+    $? = $ec;
 }
 
 main(@ARGV);