This commit is contained in:
Martin Sumner 2018-12-06 22:55:00 +00:00
parent e0352414f2
commit 3ff51c000c

View file

@ -172,7 +172,7 @@ segment_hash(Key) when is_binary(Key) ->
{SegmentID, ExtraHash}; {SegmentID, ExtraHash};
segment_hash(KeyTuple) when is_tuple(KeyTuple) -> segment_hash(KeyTuple) when is_tuple(KeyTuple) ->
BinKey = BinKey =
case element(1, Keytuple) of case element(1, KeyTuple) of
?HEAD_TAG -> ?HEAD_TAG ->
headkey_to_canonicalbinary(KeyTuple); headkey_to_canonicalbinary(KeyTuple);
_ -> _ ->