From: Teemu Mannermaa <wicked@sci.fi>
Date: Wed, 20 Jul 2011 16:48:06 +0000 (-0700)
Subject: Bug 600810: Use XMLRPC::Transport::HTTP:Apache as base class under mod_perl
X-Git-Tag: bugzilla-4.0.2~20
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c2e0f55518152034136e902bc3416586d0bba95f;p=thirdparty%2Fbugzilla.git

Bug 600810: Use XMLRPC::Transport::HTTP:Apache as base class under mod_perl
r/a=mkanat
---

diff --git a/Bugzilla/WebService/Server/XMLRPC.pm b/Bugzilla/WebService/Server/XMLRPC.pm
index 18757c0ecf..b74d0eebdb 100644
--- a/Bugzilla/WebService/Server/XMLRPC.pm
+++ b/Bugzilla/WebService/Server/XMLRPC.pm
@@ -23,7 +23,11 @@ package Bugzilla::WebService::Server::XMLRPC;
 use strict;
 use XMLRPC::Transport::HTTP;
 use Bugzilla::WebService::Server;
-our @ISA = qw(XMLRPC::Transport::HTTP::CGI Bugzilla::WebService::Server);
+if ($ENV{MOD_PERL}) {
+    our @ISA = qw(XMLRPC::Transport::HTTP::Apache Bugzilla::WebService::Server);
+} else {
+    our @ISA = qw(XMLRPC::Transport::HTTP::CGI Bugzilla::WebService::Server);
+}
 
 use Bugzilla::WebService::Constants;