From d6be829bf56e699d27d388026d4af7ab710ba328 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 25 Jul 2015 16:30:09 +0100
Subject: Work around #793471 (madness with $SIG{__WARN__} and Perl's system
 builtin): move $SIG{} setting into setup_sigwarn in Dgit.pm, and check
 getppid.

We also need to fix up the expectation for an error message in one of
the tests, where the message changes as a side effect.
---
 dgit | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'dgit')

diff --git a/dgit b/dgit
index 1e38908..9dadc8c 100755
--- a/dgit
+++ b/dgit
@@ -18,7 +18,9 @@
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
 use strict;
-$SIG{__WARN__} = sub { die $_[0]; };
+
+use Debian::Dgit;
+setup_sigwarn();
 
 use IO::Handle;
 use Data::Dumper;
-- 
cgit v1.2.3