From aef9dbd3a6cbb85085023d3c8565740e09fd6a77 Mon Sep 17 00:00:00 2001 From: Adam Kocoloski Date: Sat, 21 Nov 2009 13:43:43 +0000 Subject: code improvements from tidier. Patch by Kostis Sagonas. COUCHDB-570 git-svn-id: https://svn.apache.org/repos/asf/couchdb/trunk@882903 13f79535-47bb-0310-9956-ffa450edef68 --- src/couchdb/couch_key_tree.erl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/couchdb/couch_key_tree.erl') diff --git a/src/couchdb/couch_key_tree.erl b/src/couchdb/couch_key_tree.erl index 830820f3..d5944119 100644 --- a/src/couchdb/couch_key_tree.erl +++ b/src/couchdb/couch_key_tree.erl @@ -34,7 +34,7 @@ merge(A, B) -> end, {A, false}, B), if HasConflicts or - ((length(Merged) /= length(A)) and (length(Merged) /= length(B))) -> + ((length(Merged) =/= length(A)) and (length(Merged) =/= length(B))) -> Conflicts = conflicts; true -> Conflicts = no_conflicts @@ -221,7 +221,7 @@ get_full_key_paths(_Pos, [], KeysToGet, _KeyPathAcc) -> get_full_key_paths(Pos, [{KeyId, Value, SubTree} | RestTree], KeysToGet, KeyPathAcc) -> KeysToGet2 = KeysToGet -- [{Pos, KeyId}], CurrentNodeResult = - case length(KeysToGet2) == length(KeysToGet) of + case length(KeysToGet2) =:= length(KeysToGet) of true -> % not in the key list. []; false -> % this node is the key list. return it -- cgit v1.2.3