25
1
mirror of https://github.com/processone/ejabberd.git synced 2024-11-26 16:26:24 +01:00

final fix on created node notification (EJAB-1225)

This commit is contained in:
Christophe Romain 2010-06-02 14:38:04 +02:00
parent 166e742b3c
commit 6c0c30c032

View File

@ -1804,17 +1804,17 @@ create_node(Host, ServerHost, Node, Owner, GivenType, Access, Configuration) ->
end, end,
case node_call(Type, create_node_permission, [Host, ServerHost, Node, Parent, Owner, Access]) of case node_call(Type, create_node_permission, [Host, ServerHost, Node, Parent, Owner, Access]) of
{result, true} -> {result, true} ->
ParentTree = tree_call(Host, get_parentnodes_tree, [Host, Node, Owner]),
SubsByDepth = [{Depth, [{N, get_node_subs(N)} || N <- Nodes]} || {Depth, Nodes} <- ParentTree],
case tree_call(Host, create_node, [Host, Node, Type, Owner, NodeOptions, Parents]) of case tree_call(Host, create_node, [Host, Node, Type, Owner, NodeOptions, Parents]) of
{ok, NodeId} -> {ok, NodeId} ->
ParentTree = tree_call(Host, get_parentnodes_tree, [Host, Node, Owner]),
SubsByDepth = [{Depth, [{N, get_node_subs(N)} || N <- Nodes]} || {Depth, Nodes} <- ParentTree],
case node_call(Type, create_node, [NodeId, Owner]) of case node_call(Type, create_node, [NodeId, Owner]) of
{result, Result} -> {result, {NodeId, SubsByDepth, Result}}; {result, Result} -> {result, {NodeId, SubsByDepth, Result}};
Error -> Error Error -> Error
end; end;
{error, {virtual, NodeId}} -> {error, {virtual, NodeId}} ->
case node_call(Type, create_node, [NodeId, Owner]) of case node_call(Type, create_node, [NodeId, Owner]) of
{result, Result} -> {result, {NodeId, SubsByDepth, Result}}; {result, Result} -> {result, {NodeId, [], Result}};
Error -> Error Error -> Error
end; end;
Error -> Error ->