mirror of
https://github.com/processone/ejabberd.git
synced 2024-11-28 16:34:13 +01:00
Force PEP parent node to be []
SVN Revision: 1144
This commit is contained in:
parent
b3bf437dd1
commit
04eb1c6641
@ -144,11 +144,15 @@ create_node(Key, Node, Type, Owner, Options) ->
|
|||||||
{[], true};
|
{[], true};
|
||||||
_ ->
|
_ ->
|
||||||
Parent = lists:sublist(Node, length(Node) - 1),
|
Parent = lists:sublist(Node, length(Node) - 1),
|
||||||
(Parent == []) orelse
|
case Parent of
|
||||||
|
[] ->
|
||||||
|
{[], true};
|
||||||
|
_ ->
|
||||||
case mnesia:read({pubsub_node, {Key, Parent}}) of
|
case mnesia:read({pubsub_node, {Key, Parent}}) of
|
||||||
[] -> {Parent, false};
|
[] -> {Parent, false};
|
||||||
_ -> {Parent, true}
|
_ -> {Parent, true}
|
||||||
end
|
end
|
||||||
|
end
|
||||||
end,
|
end,
|
||||||
case ParentExists of
|
case ParentExists of
|
||||||
true ->
|
true ->
|
||||||
|
Loading…
Reference in New Issue
Block a user