From: mkanat%bugzilla.org <> Date: Mon, 25 Aug 2008 20:41:26 +0000 (+0000) Subject: Bug 446327: WebService faultCode is a string when a script "die"s X-Git-Tag: bugzilla-3.2rc2~82 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7288240f2bbdf9c0f6e10f990760e5195d30e951;p=thirdparty%2Fbugzilla.git Bug 446327: WebService faultCode is a string when a script "die"s Patch By Max Kanat-Alexander r=dkl, a=mkanat --- diff --git a/xmlrpc.cgi b/xmlrpc.cgi index 324382ea28..f2b0ef4d18 100755 --- a/xmlrpc.cgi +++ b/xmlrpc.cgi @@ -22,6 +22,7 @@ use Bugzilla; use Bugzilla::Constants; use Bugzilla::Error; use Bugzilla::Hook; +use Bugzilla::WebService::Constants; # Use an eval here so that runtests.pl accepts this script even if SOAP-Lite # is not installed. @@ -30,6 +31,10 @@ eval 'use XMLRPC::Transport::HTTP; $@ && ThrowCodeError('soap_not_installed'); Bugzilla->usage_mode(Bugzilla::Constants::USAGE_MODE_WEBSERVICE); +local $SOAP::Constants::FAULT_SERVER = ERROR_UNKNOWN_FATAL; +# The line above is used, this one is ignored, but SOAP::Lite +# might start using this constant (the correct one) for XML-RPC someday. +local $XMLRPC::Constants::FAULT_SERVER = ERROR_UNKNOWN_FATAL; my %hook_dispatch; Bugzilla::Hook::process('webservice', { dispatch => \%hook_dispatch });