aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorChristophe Romain <christophe.romain@process-one.net>2013-07-09 21:50:56 +0200
committerChristophe Romain <christophe.romain@process-one.net>2013-07-09 21:50:56 +0200
commit48819d163a9a92ce2f2185ff8d5990cba554ebe9 (patch)
tree79bbc7e160fbb1a20f740fe877dc5f3434eeecbb /src
parentfix invalid response on get_options when no options set (EJAB-1648) (diff)
fix badmatch on remove_user on PEP nodes (EJAB-1649)
Diffstat (limited to 'src')
-rw-r--r--src/node_pep.erl10
-rw-r--r--src/node_pep_odbc.erl2
2 files changed, 5 insertions, 7 deletions
diff --git a/src/node_pep.erl b/src/node_pep.erl
index c6ec9dcd2..f4b0bb38c 100644
--- a/src/node_pep.erl
+++ b/src/node_pep.erl
@@ -144,12 +144,10 @@ create_node(NodeIdx, Owner) ->
).
delete_node(Removed) ->
- {result, {_, _, Removed}} = node_hometree:delete_node(Removed),
- {result, {[], Removed}}.
-% case node_hometree:delete_node(Removed) of
-% {result, {_, _, Removed}} -> {result, {[], Removed}};
-% Error -> Error
-% end.
+ case node_hometree:delete_node(Removed) of
+ {result, {_, _, Result}} -> {result, {[], Result}};
+ Error -> Error
+ end.
-spec(subscribe_node/8 ::
(
diff --git a/src/node_pep_odbc.erl b/src/node_pep_odbc.erl
index fd867038a..81cb7bc53 100644
--- a/src/node_pep_odbc.erl
+++ b/src/node_pep_odbc.erl
@@ -156,7 +156,7 @@ create_node(NodeIdx, Owner) ->
).
delete_node(Removed) ->
case node_hometree_odbc:delete_node(Removed) of
- {result, {_, _, Removed}} -> {result, {[], Removed}};
+ {result, {_, _, Result}} -> {result, {[], Result}};
Error -> Error
end.