From 7dbbcfce6b8b0531362f5ac56eea7edf91c80da2 Mon Sep 17 00:00:00 2001
From: Ian Lynagh <igloo@earth.li>
Date: Wed, 21 Apr 2010 17:13:39 +0000
Subject: [PATCH] Give the right exit code in darcs-all Our END block was
 calling system, which alters $?. So now we save and restore
 it.

---
 darcs-all |    4 ++++
 1 file changed, 4 insertions(+)

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);
-- 
1.7.10.4