X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fmisc%2Fxmlrpc.cgi;h=14bf9ef921952593a251692b87e07594852ab9bc;hp=53ef8fb80f5539c3149f77ef770dff5aa85cf0e6;hb=2dccc0bab4f744c2fcc21f966f5033de7a687a7d;hpb=673b9a458d9138523026963df6fa3b4683e09bae

diff --git a/httemplate/misc/xmlrpc.cgi b/httemplate/misc/xmlrpc.cgi
index 53ef8fb80..14bf9ef92 100644
--- a/httemplate/misc/xmlrpc.cgi
+++ b/httemplate/misc/xmlrpc.cgi
@@ -1,17 +1,16 @@
-<%
+<% $response_xml %>\
+<%init>
 
-  my $request_xml = $cgi->param('POSTDATA');
+my $request_xml = $cgi->param('POSTDATA');
 
-  #$r->log_error($request_xml);
+#warn $request_xml;
 
-  my $fsxmlrpc = new FS::XMLRPC;
-  my ($error, $response_xml) = $fsxmlrpc->serve($request_xml);
-  
-  #$r->log_error($error) if $error;
+my $fsxmlrpc = new FS::XMLRPC;
+my ($error, $response_xml) = $fsxmlrpc->serve($request_xml);
 
-  http_header('Content-Type' => 'text/xml',
-              'Content-Length' => length($response_xml));
+#warn $error;
 
-  print $response_xml;
+http_header('Content-Type' => 'text/xml',
+            'Content-Length' => length($response_xml));
 
-%>
+</%init>