X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FCollection%2FBug.pm;h=2a9bbe29e11792bb3dcb11ba1f8e947e17e3206a;hb=264a60d4d47e1cdaafc4462466c357710d5cb1bd;hp=6f4033ab556abf11d778a3f4ff6e82d5263f7b49;hpb=c604b8914b9cbd3e8e6efafa6572cab9efbd35a5;p=debbugs.git

diff --git a/Debbugs/Collection/Bug.pm b/Debbugs/Collection/Bug.pm
index 6f4033a..2a9bbe2 100644
--- a/Debbugs/Collection/Bug.pm
+++ b/Debbugs/Collection/Bug.pm
@@ -141,8 +141,12 @@ sub _member_constructor {
         # preload as many of the packages as we need
         my %packages;
         while (my ($bug, $status) = each %{$statuses}) {
-            $packages{$_} = 1 for split /,/, $status->{package};
-            $packages{$_} = 1 for split /,/, $status->{source};
+            if (defined $status->{package}) {
+                $packages{$_} = 1 for split /,/, $status->{package};
+            }
+            if (defined $status->{source}) {
+                $packages{$_} = 1 for split /,/, $status->{source};
+            }
         }
         $self->package_collection->universe->add_by_key(keys %packages);
         while (my ($bug, $status) = each %{$statuses}) {