24
1
mirror of https://github.com/processone/ejabberd.git synced 2024-06-28 22:52:27 +02:00

reapply previous RSM filtering fix drop by mistake

SVN Revision: 2555
This commit is contained in:
Christophe Romain 2009-08-27 22:23:39 +00:00
parent 57aefa240f
commit ff1fc2b4f0

View File

@ -1093,10 +1093,9 @@ iq_pubsub(Host, ServerHost, From, IQType, SubEl, Lang, Access, Plugins) ->
iq_pubsub_owner(Host, ServerHost, From, IQType, SubEl, Lang) -> iq_pubsub_owner(Host, ServerHost, From, IQType, SubEl, Lang) ->
{xmlelement, _, _, SubEls} = SubEl, {xmlelement, _, _, SubEls} = SubEl,
NoRSM = lists:filter(fun({xmlelement, Name, _, _}) -> Action = lists:filter(fun({xmlelement, "set", _, _}) -> false;
Name == "set" (_) -> true
end, SubEls), end, xml:remove_cdata(SubEls)),
Action = xml:remove_cdata(SubEls) -- NoRSM,
case Action of case Action of
[{xmlelement, Name, Attrs, Els}] -> [{xmlelement, Name, Attrs, Els}] ->
Node = case Host of Node = case Host of