diff options
| author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-08-15 17:52:54 +0200 |
|---|---|---|
| committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-09-13 19:59:24 +0200 |
| commit | f636e739a905084a773fb7ebf2e66c905665de89 (patch) | |
| tree | c1074ff1c1a2cee9b425a05317b90fb57e570e30 /src/scm/webid-oidc/client | |
| parent | 65c0ce25017cd721658671a2fb7bd22997cb8ee0 (diff) | |
Fix syntax error
Diffstat (limited to 'src/scm/webid-oidc/client')
| -rw-r--r-- | src/scm/webid-oidc/client/accounts.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/scm/webid-oidc/client/accounts.scm b/src/scm/webid-oidc/client/accounts.scm index 381a7d5..02e0fa3 100644 --- a/src/scm/webid-oidc/client/accounts.scm +++ b/src/scm/webid-oidc/client/accounts.scm @@ -423,9 +423,9 @@ (make-exception-with-message final-message))))) (unless (eqv? (response-code response) 200) (let ((final-message - (G_ (format #f "The token request failed with code ~s (~s).") - (response-code response) - (response-reason-phrase response)))) + (format #f (G_ "The token request failed with code ~s (~s).") + (response-code response) + (response-reason-phrase response)))) (raise-exception (make-exception (make-token-request-failed response response-body) |