From: Don Armstrong <don@donarmstrong.com>
Date: Wed, 16 Apr 2014 17:10:17 +0000 (-0700)
Subject: check for package being defined before source regex
X-Git-Tag: release/2.6.0~264
X-Git-Url: https://git.donarmstrong.com/?p=debbugs.git;a=commitdiff_plain;h=0ed6845a9f77718e909922620ece6139a359c65d

check for package being defined before source regex
---

diff --git a/Debbugs/Status.pm b/Debbugs/Status.pm
index b28ff53..dfafce1 100644
--- a/Debbugs/Status.pm
+++ b/Debbugs/Status.pm
@@ -734,7 +734,7 @@ sub addfoundversions {
     return unless defined $version;
     undef $package if $package =~ m[(?:\s|/)];
     my $source = $package;
-    if ($package =~ s/^src://) {
+    if (defined $package and $package =~ s/^src://) {
 	$isbinary = 0;
 	$source = $package;
     }