Redundant clauses

Remove some redundant clauses, and fix up some logging
This commit is contained in:
martinsumner 2016-10-19 20:51:30 +01:00
parent 12fe1d01bd
commit 7319b8f415
4 changed files with 15 additions and 47 deletions

View file

@ -33,7 +33,6 @@
-include_lib("eunit/include/eunit.hrl").
-export([strip_to_keyonly/1,
strip_to_keyseqonly/1,
strip_to_seqonly/1,
strip_to_statusonly/1,
strip_to_keyseqstatusonly/1,
@ -65,8 +64,6 @@ generate_uuid() ->
strip_to_keyonly({keyonly, K}) -> K;
strip_to_keyonly({K, _V}) -> K.
strip_to_keyseqonly({K, {SeqN, _, _ }}) -> {K, SeqN}.
strip_to_keyseqstatusonly({K, {SeqN, St, _MD}}) -> {K, SeqN, St}.
strip_to_statusonly({_, {_, St, _}}) -> St.