X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FSOAP.pm;h=9ed0249b863731504e1975eb105edd90a34abfe3;hb=1a1fa6f0af2be9d4076d9aad5f5a84c5fb3d9a8a;hp=f87581e60c07af74150cacce8a633be362afb79d;hpb=cebcfe4a025c588c5f9197b706a1b3c0ca61653e;p=debbugs.git

diff --git a/Debbugs/SOAP.pm b/Debbugs/SOAP.pm
index f87581e..9ed0249 100644
--- a/Debbugs/SOAP.pm
+++ b/Debbugs/SOAP.pm
@@ -25,7 +25,8 @@ use warnings;
 use strict;
 use vars qw($DEBUG %EXPORT_TAGS @EXPORT_OK @EXPORT);
 use Debbugs::SOAP::Server;
-use base qw(Exporter SOAP::Server::Parameters);
+use Exporter qw(import);
+use base qw(SOAP::Server::Parameters);
 
 BEGIN{
      $DEBUG = 0 unless defined $DEBUG;
@@ -232,7 +233,6 @@ sub get_bug_log{
 
      my %seen_msg_ids;
      my $current_msg=0;
-     my $status = {};
      my @messages;
      while (my $record = $log->read_record()) {
 	  $current_msg++;