diff options
-rw-r--r-- | FS/FS/XMLRPC_Lite.pm | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/FS/FS/XMLRPC_Lite.pm b/FS/FS/XMLRPC_Lite.pm new file mode 100644 index 000000000..9d3059d69 --- /dev/null +++ b/FS/FS/XMLRPC_Lite.pm @@ -0,0 +1,17 @@ +package FS::XMLRPC_Lite; + +use XMLRPC::Lite; + +use XMLRPC::Transport::HTTP; + +#XXX submit patch to SOAP::Lite + +package XMLRPC::Transport::HTTP::Server; + +@XMLRPC::Transport::HTTP::Server::ISA = qw(SOAP::Transport::HTTP::Server); + +sub initialize; *initialize = \&XMLRPC::Server::initialize; +sub make_fault; *make_fault = \&XMLRPC::Transport::HTTP::CGI::make_fault; +sub make_response; *make_response = \&XMLRPC::Transport::HTTP::CGI::make_response; + +1; |