From a01de8d944c7b47c7aefe5d2bac5f45eaa54207c Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Fri, 18 Aug 2023 18:04:02 +0200
Subject: [PATCH] Fix small bug introduced in 5d549dc

When providing a client-id as explained in
  https://www.process-one.net/blog/understanding-ejabberd-oauth-support-roadmap/
ejabberd crashed with an error
  exception error: no function clause matching
  ejabberd_oauth:get_client_identity(
as reported in
  https://stackoverflow.com/questions/76922951/ejabberd-oauth-api-http-1-1-502-bad-gateway
---
 src/ejabberd_oauth.erl | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/ejabberd_oauth.erl b/src/ejabberd_oauth.erl
index 63d1a6f36..83eceb1ba 100644
--- a/src/ejabberd_oauth.erl
+++ b/src/ejabberd_oauth.erl
@@ -244,10 +244,9 @@ terminate(_Reason, _State) ->
 
 code_change(_OldVsn, State, _Extra) -> {ok, State}.
 
-
 get_client_identity(<<"">>, Ctx) ->
     {ok, {Ctx, {client, unknown_client}}};
-get_client_identity({client, ClientID}, Ctx) ->
+get_client_identity(ClientID, Ctx) when is_binary(ClientID) ->
     {ok, {Ctx, {client, ClientID}}}.
 
 verify_redirection_uri(_ClientID, RedirectURI, Ctx) ->