diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2016-09-26 01:05:32 +0100 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2016-09-26 01:36:40 +0100 |
commit | 691b12e13974d68966a397186cc5e310e5582f0f (patch) | |
tree | 4d97ae93b6e893147f44454bd023231595aa06a1 /dgit | |
parent | 5c99625328b84337f2267c3ebdc54b4a93409198 (diff) |
dgit: getfield, parsechangelog: Fix two bugs in error reporting
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'dgit')
-rwxr-xr-x | dgit | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -872,11 +872,11 @@ sub getfield ($$) { my ($dctrl,$field) = @_; my $v = $dctrl->{$field}; return $v if defined $v; - fail "missing field $field in ".$v->get_option('name'); + fail "missing field $field in ".$dctrl->get_option('name'); } sub parsechangelog { - my $c = Dpkg::Control::Hash->new(); + my $c = Dpkg::Control::Hash->new(name => 'parsed changelog'); my $p = new IO::Handle; my @cmd = (qw(dpkg-parsechangelog), @_); open $p, '-|', @cmd or die $!; |