From be01dc41afcebe1f3931c7137fdbacdb0966c2ae Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Sun, 18 Sep 2016 23:45:19 +0100 Subject: Dgit.pm: fail: Strip any trailing newline This makes it sensible to call fail() with a here doc. Signed-off-by: Ian Jackson --- Debian/Dgit.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/Debian/Dgit.pm b/Debian/Dgit.pm index bfa76cc..7c43059 100644 --- a/Debian/Dgit.pm +++ b/Debian/Dgit.pm @@ -159,6 +159,7 @@ sub _us () { sub fail { my $s = "@_\n"; + $s =~ s/\n\n$/\n/; my $prefix = _us().": "; $s =~ s/^/$prefix/gm; die $s; -- cgit v1.2.3