Fix dialyzer error

Author: MarcialRosales

deps/rabbitmq_auth_backend_oauth2/src/rabbit_oauth2_resource_server.erl

@@ -167,26 +167,16 @@ find_audience(Audience, ResourceIdList) when is_binary(Audience) ->
     AudList = binary:split(Audience, <<" ">>, [global, trim_all]),
     find_audience(AudList, ResourceIdList);
 find_audience(AudList, ResourceIdList) when is_list(AudList) ->
-    ?LOG_DEBUG("find_audience ~p -> ~p vs ~p", [AudList, 
-        normalize_to_binary_list(AudList), ResourceIdList]),
     case intersection(normalize_to_binary_list(AudList), ResourceIdList) of
         [One] -> {ok, One};
         [_One|_Tail] -> {error, aud_matched_many_resource_servers_only_one_allowed};
         [] -> {error, no_matching_aud_found}
     end.
 
 -spec normalize_to_binary_list(binary() | string() | [binary()]) -> [binary()].
+normalize_to_binary_list([H | _] = List) when is_binary(H) -> List;
 normalize_to_binary_list(Input) when is_list(Input) ->
-    case Input of
-        [H | _] when is_binary(H) ->
-            Input; 
-        _ when is_list(Input) ->
-            [unicode:characters_to_binary(Part) || Part <- string:tokens(Input, " ")];
-        _ ->
-            []
-    end;
-normalize_to_binary_list(Input) when is_binary(Input) ->
-    binary:split(Input, <<" ">>, [global]).
+    [unicode:characters_to_binary(Part) || Part <- string:tokens(Input, " ")].
 
 -spec translate_error_if_any(
     {ok, resource_server()} |