diff options
| author | ivan <ivan> | 2010-06-26 09:34:10 +0000 | 
|---|---|---|
| committer | ivan <ivan> | 2010-06-26 09:34:10 +0000 | 
| commit | 40d935c8cd952be7b461405406d9d03f46775baf (patch) | |
| tree | 226e0d74efaf4c28a27b099b10d8d4fec358c2a7 /httemplate/misc/xmlrpc.cgi | |
| parent | 368a18b893fef80720277b12342ca6d178a9fd31 (diff) | |
maestro cust status as reqeusted, RT#8712
Diffstat (limited to 'httemplate/misc/xmlrpc.cgi')
| -rw-r--r-- | httemplate/misc/xmlrpc.cgi | 32 | 
1 files changed, 15 insertions, 17 deletions
diff --git a/httemplate/misc/xmlrpc.cgi b/httemplate/misc/xmlrpc.cgi index 1d0383f2a..14bf9ef92 100644 --- a/httemplate/misc/xmlrpc.cgi +++ b/httemplate/misc/xmlrpc.cgi @@ -1,18 +1,16 @@ -% -% -%  my $request_xml = $cgi->param('POSTDATA'); -% -%  #$r->log_error($request_xml); -% -%  my $fsxmlrpc = new FS::XMLRPC; -%  my ($error, $response_xml) = $fsxmlrpc->serve($request_xml); -%   -%  #$r->log_error($error) if $error; -% -%  http_header('Content-Type' => 'text/xml', -%              'Content-Length' => length($response_xml)); -% -%  print $response_xml; -% -% +<% $response_xml %>\ +<%init> +my $request_xml = $cgi->param('POSTDATA'); + +#warn $request_xml; + +my $fsxmlrpc = new FS::XMLRPC; +my ($error, $response_xml) = $fsxmlrpc->serve($request_xml); + +#warn $error; + +http_header('Content-Type' => 'text/xml', +            'Content-Length' => length($response_xml)); + +</%init>  | 
