build_source: Fix bad Perl poetry style

Pass --ch:* and -v options to dpkg-buildpackage when building source.
Fixes bad Perl poetry syntax.  Closes:#829121.

diff --git a/debian/changelog b/debian/changelog
index 98a03d2173621b3f61a1b99370bfef5ce74a84f8..f267d1dbd01252389ab83c62700e1fa631de6ca3 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -16,6 +16,8 @@ dgit (1.5~~) unstable; urgency=medium
     `dgit clone' cannot create the destination directory.
   * Properly substitute $changesfile in one of the `You can retry'
     messages.  Closes:#800078.
+  * Pass --ch:* and -v options to dpkg-buildpackage when building
+    source.  Fixes bad Perl poetry syntax.  Closes:#829121.
 
   Test suite:
   * When sbuild fails, do not crash due to sed not finding the log

diff --git a/dgit b/dgit
index 0b66d390ea6adc6f5bd102fd4480f81e639d8933..de7ee0ccdf74c8df6604585401db673819103422 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -3109,11 +3109,11 @@ sub build_source {
     $sourcechanges = "${package}_".(stripepoch $version)."_source.changes";
     $dscfn = dscfn($version);
     if ($cleanmode eq 'dpkg-source') {
-       runcmd_ordryrun_local (@dpkgbuildpackage, qw(-us -uc -S)),
-           changesopts();
+       runcmd_ordryrun_local @dpkgbuildpackage, qw(-us -uc -S),
+                              changesopts();
     } elsif ($cleanmode eq 'dpkg-source-d') {
-       runcmd_ordryrun_local (@dpkgbuildpackage, qw(-us -uc -S -d)),
-           changesopts();
+       runcmd_ordryrun_local @dpkgbuildpackage, qw(-us -uc -S -d),
+                              changesopts();
     } else {
        my $pwd = must_getcwd();
        my $leafdir = basename $pwd;