From 20e0cc4de8afa0b2f55e8201ca4fd307c809a6fe Mon Sep 17 00:00:00 2001
From: Teemu Mannermaa <wicked@sci.fi>
Date: Wed, 20 Jul 2011 09:35:57 -0700
Subject: Bug 600810: Use XMLRPC::Transport::HTTP:Apache as base class under
 mod_perl r/a=mkanat

---
 Bugzilla/WebService/Server/XMLRPC.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'Bugzilla/WebService')

diff --git a/Bugzilla/WebService/Server/XMLRPC.pm b/Bugzilla/WebService/Server/XMLRPC.pm
index 18757c0ec..b74d0eebd 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;
 
-- 
cgit v1.2.3-24-g4f1b