From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Thu, 26 Jul 2018 03:11:10 +0000 (+0100)
Subject: dgit: linkorigs: Fix error handling when bpd missing
X-Git-Tag: archive/debian/6.0~31
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=commitdiff_plain;h=67e3687e3223a97f2d2952ba2aba32d0c177966b

dgit: linkorigs: Fix error handling when bpd missing

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/dgit b/dgit
index 63ef0823..eca2303e 100755
--- a/dgit
+++ b/dgit
@@ -5652,7 +5652,8 @@ sub unpack_playtree_linkorigs ($$) {
     my ($upstreamversion, $fn) = @_;
     # calls $fn->($leafname);
 
-    opendir QFD, bpd_abs();
+    my $bpd_abs = bpd_abs();
+    opendir QFD, $bpd_abs or fail "buildproductsdir: $bpd_abs: $!";
     while ($!=0, defined(my $b = readdir QFD)) {
 	my $f = bpd_abs()."/".$b;
 	{