Fix format of an XML-RPC response

This commit is contained in:
Evgeniy Khramtsov 2014-10-04 12:55:59 +04:00
parent 7b3209cc7f
commit d87ca9fb7b
1 changed files with 1 additions and 1 deletions

View File

@ -226,7 +226,7 @@ process(_, #request{method = 'POST', data = Data, opts = Opts}) ->
?DEBUG("got XML-RPC request: ~p", [RPC]),
{false, Result} = handler(State, RPC),
XML = xml:element_to_binary(p1_xmlrpc:encode(Result)),
{200, [], [{<<"Content-Type">>, <<"text/xml">>}],
{200, [{<<"Content-Type">>, <<"text/xml">>}],
<<"<?xml version=\"1.0\"?>", XML/binary>>}
end
end;