merge changes from dla source

diff --git a/Debbugs/SOAP.pm b/Debbugs/SOAP.pm
index 6b80dae45962c925a02c2a103826841efb7e8e59..2ca5b21261e4d355a699493c1dcccddc3561c4fe 100644 (file)
--- a/Debbugs/SOAP.pm
+++ b/Debbugs/SOAP.pm
@@ -127,6 +127,8 @@ sub get_status {
          my $bug_status;
          if (ref($bug)) {
               my %param = __collapse_params(@{$bug});
+              next unless defined $param{bug};
+              $bug = $param{bug};
               $bug_status = get_bug_status(map {(exists $param{$_})?($_,$param{$_}):()}
                                            qw(bug dist arch bugusertags sourceversions version indicatesource)
                                           );