diff options
author | Viacheslav Kovalev <kovyl2404@gmail.com> | 2015-04-22 18:56:09 +0300 |
---|---|---|
committer | Viacheslav Kovalev <kovyl2404@gmail.com> | 2015-04-22 18:56:09 +0300 |
commit | e255529da5c2366f1a9c4eb823d3c3d02c237eae (patch) | |
tree | ff6e34724e27f1644d6a8378fb1190853d85fc13 /src/rebar_utils.erl | |
parent | 82b0d4b7b29fe5d33148022be28eab55320f47a9 (diff) |
Get rid of rebar_utils:tup_umerge/2 patching
Diffstat (limited to 'src/rebar_utils.erl')
-rw-r--r-- | src/rebar_utils.erl | 15 |
1 files changed, 1 insertions, 14 deletions
diff --git a/src/rebar_utils.erl b/src/rebar_utils.erl index 76be9a8..004ed35 100644 --- a/src/rebar_utils.erl +++ b/src/rebar_utils.erl @@ -257,20 +257,7 @@ tup_sort(List) -> tup_umerge([], Olds) -> Olds; tup_umerge([New|News], Olds) -> - reverse_deduplicate( umerge(News, Olds, [], New) ). - -reverse_deduplicate(List) -> - lists:reverse( do_deduplicate(lists:reverse(List), []) ). - -do_deduplicate([], Acc) -> - Acc; -do_deduplicate([Value | Rest], Acc) -> - case lists:member(Value, Acc) of - true -> - do_deduplicate(Rest, Acc); - false -> - do_deduplicate(Rest, [Value | Acc]) - end. + lists:reverse( umerge(News, Olds, [], New) ). %% This is equivalent to umerge2_2 in the stdlib, except we use the expanded %% value/key only to compare |