From 2b1e66f2f25e5d812f1b44c884fd99b1a7af38e6 Mon Sep 17 00:00:00 2001 From: Peter Morgan Date: Mon, 22 May 2017 11:39:42 +0100 Subject: add missing call to lists:usort/1 --- src/gun_ws.erl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/gun_ws.erl') diff --git a/src/gun_ws.erl b/src/gun_ws.erl index 86e8524..81682d6 100644 --- a/src/gun_ws.erl +++ b/src/gun_ws.erl @@ -54,7 +54,7 @@ do_check_options([{compress, B}|Opts]) when B =:= true; B =:= false -> do_check_options([{default_protocol, M}|Opts]) when is_atom(M) -> do_check_options(Opts); do_check_options([Opt={protocols, L}|Opts]) when is_list(L) -> - case lists:flatten([[is_binary(B), is_atom(M)] || {B, M} <- L]) of + case lists:usort(lists:flatten([[is_binary(B), is_atom(M)] || {B, M} <- L])) of [true] -> do_check_options(Opts); _ -> {error, {options, {ws, Opt}}} end; -- cgit v1.2.3