diff options
Diffstat (limited to 'src/mod_pubsub/nodetree_tree_odbc.erl')
| -rw-r--r-- | src/mod_pubsub/nodetree_tree_odbc.erl | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/src/mod_pubsub/nodetree_tree_odbc.erl b/src/mod_pubsub/nodetree_tree_odbc.erl index 95f9b34e..6468913d 100644 --- a/src/mod_pubsub/nodetree_tree_odbc.erl +++ b/src/mod_pubsub/nodetree_tree_odbc.erl @@ -220,13 +220,15 @@ create_node(Host, Node, Type, _Owner, Options) -> %% PEP does not uses hierarchy {[], true}; _ -> - Parent = lists:sublist(Node, length(Node) - 1), - ParentE = (Parent == []) orelse + case lists:sublist(Node, length(Node) - 1) of + [] -> + {[], true}; + Parent -> case nodeid(Host, Parent) of - {result, _} -> true; - _ -> false - end, - {Parent, ParentE} + {result, _} -> {Parent, true}; + _ -> {Parent, false} + end + end end, case ParentExists of true -> |