summaryrefslogtreecommitdiff
path: root/src/ejabberd_oauth.erl
diff options
context:
space:
mode:
authorBadlop <badlop@process-one.net>2019-12-23 13:55:56 +0100
committerBadlop <badlop@process-one.net>2019-12-24 11:10:36 +0100
commitc396271c00f15b72b3314b15b8365a66963fc67a (patch)
treed846fd1773a3527542d6c247df81648d211b7400 /src/ejabberd_oauth.erl
parentAdd ability to hookup config transformer (diff)
Fix case clause error regarding admin_generated password (#3122)
Diffstat (limited to 'src/ejabberd_oauth.erl')
-rw-r--r--src/ejabberd_oauth.erl3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/ejabberd_oauth.erl b/src/ejabberd_oauth.erl
index 1ba1505b..232bcf12 100644
--- a/src/ejabberd_oauth.erl
+++ b/src/ejabberd_oauth.erl
@@ -137,7 +137,8 @@ oauth_issue_token(Jid, TTLSeconds, ScopesString) ->
Scopes = [list_to_binary(Scope) || Scope <- string:tokens(ScopesString, ";")],
try jid:decode(list_to_binary(Jid)) of
#jid{luser =Username, lserver = Server} ->
- case oauth2:authorize_password({Username, Server}, Scopes, admin_generated) of
+ Ctx1 = #oauth_ctx{password = admin_generated},
+ case oauth2:authorize_password({Username, Server}, Scopes, Ctx1) of
{ok, {_Ctx,Authorization}} ->
{ok, {_AppCtx2, Response}} = oauth2:issue_token(Authorization, [{expiry_time, TTLSeconds}]),
{ok, AccessToken} = oauth2_response:access_token(Response),