Bug 1108809: SOAP::Lite 1.12 causes error when using XMLRPC API

r=glob,a=glob

diff --git a/Bugzilla/WebService/Server/XMLRPC.pm b/Bugzilla/WebService/Server/XMLRPC.pm
index 56b31ffefe612552541a6d891f801c5c845375ca..de9a5a97bdcd857c672503cb17acbb063f1da088 100644 (file)
--- a/Bugzilla/WebService/Server/XMLRPC.pm
+++ b/Bugzilla/WebService/Server/XMLRPC.pm
@@ -47,6 +47,13 @@ BEGIN {
     };
 }
 
+sub new {
+    my $class = shift;
+    my $self = $class->SUPER::new(@_);
+    $self->{debug_logger} = sub {};
+    return $self;
+}
+
 sub initialize {
     my $self = shift;
     my %retval = $self->SUPER::initialize(@_);