From 7888f1af24ef84ac014e618bcb5a04c7d2de57cc Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Mon, 1 Oct 2018 15:37:35 +0100
Subject: Dgit.pm: parsecontrol: Improve error message for failed open

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 Debian/Dgit.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Debian/Dgit.pm b/Debian/Dgit.pm
index 941bcdc..5a13e0a 100644
--- a/Debian/Dgit.pm
+++ b/Debian/Dgit.pm
@@ -651,7 +651,7 @@ sub parsecontrolfh ($$;$) {
 sub parsecontrol {
     my ($file, $desc, $allowsigned) = @_;
     my $fh = new IO::Handle;
-    open $fh, '<', $file or die "$file: $!";
+    open $fh, '<', $file or fail "open $file ($desc): $!";
     my $c = parsecontrolfh($fh,$desc,$allowsigned);
     $fh->error and confess $!;
     close $fh;
-- 
cgit v1.2.3