Also check for package being defined before checking package for spaces and slashes

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