From 037c3c91459900a1828713db694cf21b0045497b Mon Sep 17 00:00:00 2001 From: Vivien Kraus Date: Thu, 11 Nov 2021 16:47:31 +0000 Subject: Accounts: fix error handling --- src/scm/webid-oidc/client/accounts.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/scm/webid-oidc/client/accounts.scm b/src/scm/webid-oidc/client/accounts.scm index 3de91b3..7868139 100644 --- a/src/scm/webid-oidc/client/accounts.scm +++ b/src/scm/webid-oidc/client/accounts.scm @@ -350,7 +350,7 @@ (let ((final-message (format #f (G_ "The ID token delivered by the identity provider ~s is for issuer ~s.") (uri->string issuer) - (id:id-token-iss id-token)))) + (id:iss id-token)))) (raise-exception (make-exception (make-token-request-failed response response-body) -- cgit v1.2.3