[dpkg] 02/05: Dpkg::Source::Package::V1: Check that $tarname is defined before use

[Mattia Rizzolo]

This is an automated email from the git hooks/post-receive script.

mattia pushed a commit to annotated tag 1.19.0.4
in repository dpkg.

commit 99be1f3508053ea2e50f3cef85bb8799cec8dd32
Author: Christoph Biedl <debian.axhn at manchmal.in-ulm.de>
Date:   Fri Oct 20 01:29:48 2017 +0200

    Dpkg::Source::Package::V1: Check that $tarname is defined before use
    
    Closes: #879124
    Warned-by: perl
    Signed-off-by: Guillem Jover <guillem at debian.org>
    (cherry picked from commit db6c5b5043e51c196818c2d24070c089ca9ea1d4)
---
 debian/changelog                  | 5 ++++-
 scripts/Dpkg/Source/Package/V1.pm | 2 +-
 2 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/debian/changelog b/debian/changelog
index 0719508..e7c4206 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,6 +1,9 @@
 dpkg (1.19.0.4) UNRELEASED; urgency=medium
 
-  *
+  * Perl modules:
+    - Check that $tarname is defined before use in Dpkg::Source::Package::V1.
+      Thanks to Christoph Biedl <debian.axhn at manchmal.in-ulm.de>.
+      Closes: #879124
 
  -- Guillem Jover <guillem at debian.org>  Sun, 22 Oct 2017 23:37:33 +0200
 
diff --git a/scripts/Dpkg/Source/Package/V1.pm b/scripts/Dpkg/Source/Package/V1.pm
index e7748c0..001d9ec 100644
--- a/scripts/Dpkg/Source/Package/V1.pm
+++ b/scripts/Dpkg/Source/Package/V1.pm
@@ -410,7 +410,7 @@ sub do_build {
     }
 
     $self->add_file($tarname) if $tarname;
-    if (-e "$tarname.sig" and not -e "$tarname.asc") {
+    if ($tarname and -e "$tarname.sig" and not -e "$tarname.asc") {
         openpgp_sig_to_asc("$tarname.sig", "$tarname.asc");
     }
     $self->add_file($tarsign) if $tarsign and -e $tarsign;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/reproducible/dpkg.git