Fix bustage due to bug 446327 - Patch by me, r=mkanat

diff --git a/xmlrpc.cgi b/xmlrpc.cgi
index 924610a0b251465c4c38b2867146b4c4e2c7ad2e..c9c1e95d7cd57cf4e17268c8cc55a1e00df6e8d9 100755 (executable)
--- a/xmlrpc.cgi
+++ b/xmlrpc.cgi
@@ -30,10 +30,12 @@ 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;
+local $SOAP::Constants::FAULT_SERVER;
+$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;
+local $XMLRPC::Constants::FAULT_SERVER;
+$XMLRPC::Constants::FAULT_SERVER = ERROR_UNKNOWN_FATAL;
 
 my %hook_dispatch;
 Bugzilla::Hook::process('webservice', { dispatch => \%hook_dispatch });