Add function head to match single-element list containing for which to search.

Author: lukebakken

deps/rabbitmq_web_dispatch/src/rabbit_web_dispatch_access_control.erl

@@ -245,7 +245,10 @@ is_mgmt_user(T)   -> intersects(T, [administrator, monitoring, policymaker,
                                     management]).
 is_protected_user(T) -> intersects(T, [protected]).
 
-intersects(A, B) -> lists:any(fun(I) -> lists:member(I, B) end, A).
+intersects(A, [B]) ->
+    lists:member(B, A);
+intersects(A, B) ->
+    lists:any(fun(I) -> lists:member(I, B) end, A).
 
 user_matches_vhost(ReqData, User) ->
     case vhost(ReqData) of