chiark / gitweb /
parsechangelog takes optional args for dpkg-parsechangelog
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 11 Sep 2013 23:10:07 +0000 (00:10 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 11 Sep 2013 23:10:07 +0000 (00:10 +0100)
dgit

diff --git a/dgit b/dgit
index 9768fe9..123c2d5 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -340,7 +340,7 @@ sub getfield ($$) {
 sub parsechangelog {
     my $c = Dpkg::Control::Hash->new();
     my $p = new IO::Handle;
-    my @cmd = (qw(dpkg-parsechangelog));
+    my @cmd = (qw(dpkg-parsechangelog), @_);
     open $p, '-|', @cmd or die $!;
     $c->parse($p);
     $?=0; $!=0; close $p or failedcmd @cmd;