diff options
author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-10-02 12:03:00 +0200 |
---|---|---|
committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-10-04 23:14:38 +0200 |
commit | fd3b4c9747bc631a900a881bfdaadc65124cf0d1 (patch) | |
tree | 403b0611351694ee525ef85e3798017450244ecd /src/scm/webid-oidc/client/application.scm | |
parent | 20a1d5236ded1738c6007bd9617a913e2c798a8c (diff) |
accounts: Expect a reason for an authorization prompt
Diffstat (limited to 'src/scm/webid-oidc/client/application.scm')
-rw-r--r-- | src/scm/webid-oidc/client/application.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/scm/webid-oidc/client/application.scm b/src/scm/webid-oidc/client/application.scm index d448976..6263a82 100644 --- a/src/scm/webid-oidc/client/application.scm +++ b/src/scm/webid-oidc/client/application.scm @@ -164,7 +164,7 @@ (parameterize ((client:client (client state)) (account:authorization-process - (lambda* (uri #:key issuer) + (lambda* (uri #:key (reason #f)) (abort-to-prompt tag (lambda (continuation) |