25
1
mirror of https://github.com/processone/ejabberd.git synced 2024-12-20 17:27:00 +01:00

Update ejabberd_xmlrpc to handle binaries in restuple result (#3048)

This commit is contained in:
Badlop 2019-10-02 13:51:26 +02:00
parent 5d549dca96
commit 9df26a5740

View File

@ -371,7 +371,7 @@ format_result(Code, {Name, rescode}) ->
format_result({Code, Text}, {Name, restuple}) -> format_result({Code, Text}, {Name, restuple}) ->
{struct, {struct,
[{Name, make_status(Code)}, [{Name, make_status(Code)},
{text, lists:flatten(Text)}]}; {text, io_lib:format("~ts", [Text])}]};
format_result(Elements, {Name, {list, ElementsDef}}) -> format_result(Elements, {Name, {list, ElementsDef}}) ->
FormattedList = lists:map(fun (Element) -> FormattedList = lists:map(fun (Element) ->
format_result(Element, ElementsDef) format_result(Element, ElementsDef)