summaryrefslogtreecommitdiff
path: root/httemplate
diff options
context:
space:
mode:
authorivan <ivan>2010-06-26 09:34:10 +0000
committerivan <ivan>2010-06-26 09:34:10 +0000
commit40d935c8cd952be7b461405406d9d03f46775baf (patch)
tree226e0d74efaf4c28a27b099b10d8d4fec358c2a7 /httemplate
parent368a18b893fef80720277b12342ca6d178a9fd31 (diff)
maestro cust status as reqeusted, RT#8712
Diffstat (limited to 'httemplate')
-rw-r--r--httemplate/misc/xmlrpc.cgi32
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>