From d87ca9fb7b2ab3a9f7600494b67da44fce6830ee Mon Sep 17 00:00:00 2001
From: Evgeniy Khramtsov <ekhramtsov@process-one.net>
Date: Sat, 4 Oct 2014 12:55:59 +0400
Subject: [PATCH] Fix format of an XML-RPC response

---
 src/ejabberd_xmlrpc.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ejabberd_xmlrpc.erl b/src/ejabberd_xmlrpc.erl
index 1a4166607..c3b2fdab7 100644
--- a/src/ejabberd_xmlrpc.erl
+++ b/src/ejabberd_xmlrpc.erl
@@ -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;