24
1
mirror of https://github.com/processone/ejabberd.git synced 2024-06-10 21:47:01 +02:00

Fix IQ XML generation.

This commit is contained in:
Jerome Sautret 2014-07-04 15:21:40 +02:00
parent 9265720f92
commit 26a4d91297

View File

@ -451,15 +451,23 @@ iq_type_to_string(error) -> <<"error">>.
).
iq_to_xml(#iq{id = ID, type = Type, sub_el = SubEl}) ->
Children = case Type of
set ->
[SubEl];
get ->
[SubEl];
_ ->
SubEl
end,
if ID /= <<"">> ->
#xmlel{name = <<"iq">>,
attrs =
[{<<"id">>, ID}, {<<"type">>, iq_type_to_string(Type)}],
children = SubEl};
children = Children};
true ->
#xmlel{name = <<"iq">>,
attrs = [{<<"type">>, iq_type_to_string(Type)}],
children = SubEl}
children = Children}
end.
-spec(parse_xdata_submit/1 ::