).
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 = Children};
+ children = SubEl};
true ->
#xmlel{name = <<"iq">>,
attrs = [{<<"type">>, iq_type_to_string(Type)}],
- children = Children}
+ children = SubEl}
end.
-spec(parse_xdata_submit/1 ::
decode_base64(S) ->
decode_base64_bin(S, <<>>).
-take_without_spaces(Bin, Count) ->
+take_without_spaces(Bin, Count) ->
take_without_spaces(Bin, Count, <<>>).
take_without_spaces(Bin, 0, Acc) ->