use get_bug_statuses

[debbugs.git] / Debbugs / Status.pm

diff --git a/Debbugs/Status.pm b/Debbugs/Status.pm
index 43e722e7cd256d93280d2643239e0ceec4dda33a..d936720b7f1cb7d90124ca90de4f595dbcd47a02 100644 (file)
--- a/Debbugs/Status.pm
+++ b/Debbugs/Status.pm
@@ -1365,7 +1365,7 @@ sub get_bug_statuses {
             elsif (defined $param{status} and
                    $param{status}{bug_num} == $bug
                   ) {
-                $statuses{$bug} = {$param{status}};
+                $statuses{$bug} = {%{$param{status}}};
             } else {
                 my $location = getbuglocation($bug, 'summary');
                 next if not defined $location or not length $location;
@@ -1404,7 +1404,7 @@ sub get_bug_statuses {
         $status->{"pending"} = 'fixed'     if ($tags{fixed});
 
 
-        my $presence = bug_presence(status => \%status,
+        my $presence = bug_presence(status => $status,
                                     bug => $bug,
                                     map{(exists $param{$_})?($_,$param{$_}):()}
                                     qw(sourceversions arch dist version found fixed package)