diff options
| author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-08-15 17:46:18 +0200 |
|---|---|---|
| committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-09-13 19:52:49 +0200 |
| commit | ae364ed0f7c20cb66b0ec5a6f9735c71b2456494 (patch) | |
| tree | 0489a7caf8c5a020782548ac2b9d7488f32d3405 | |
| parent | 7fd8439968a1f19152b715c3c47c89bdf7f348d7 (diff) | |
Fix syntax error
| -rw-r--r-- | po/disfluid.pot | 12 | ||||
| -rw-r--r-- | po/fr.po | 12 | ||||
| -rw-r--r-- | src/scm/webid-oidc/jwk.scm | 15 |
3 files changed, 20 insertions, 19 deletions
diff --git a/po/disfluid.pot b/po/disfluid.pot index ba85ea0..b813aa1 100644 --- a/po/disfluid.pot +++ b/po/disfluid.pot @@ -8,7 +8,7 @@ msgid "" msgstr "" "Project-Id-Version: disfluid SNAPSHOT\n" "Report-Msgid-Bugs-To: vivien@planete-kraus.eu\n" -"POT-Creation-Date: 2021-09-13 19:41+0200\n" +"POT-Creation-Date: 2021-09-13 19:52+0200\n" "PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n" "Last-Translator: FULL NAME <EMAIL@ADDRESS>\n" "Language-Team: LANGUAGE <LL@li.org>\n" @@ -891,25 +891,25 @@ msgstr "" msgid "the JWKS is invalid" msgstr "" -#: src/scm/webid-oidc/jwk.scm:235 +#: src/scm/webid-oidc/jwk.scm:236 #, scheme-format msgid "cannot fetch a JWKS: ~a" msgstr "" -#: src/scm/webid-oidc/jwk.scm:237 +#: src/scm/webid-oidc/jwk.scm:238 msgid "cannot fetch a JWKS" msgstr "" -#: src/scm/webid-oidc/jwk.scm:241 +#: src/scm/webid-oidc/jwk.scm:242 #, scheme-format msgid "the request failed with ~s ~s" msgstr "" -#: src/scm/webid-oidc/jwk.scm:246 +#: src/scm/webid-oidc/jwk.scm:247 msgid "missing content-type" msgstr "" -#: src/scm/webid-oidc/jwk.scm:251 +#: src/scm/webid-oidc/jwk.scm:252 #, scheme-format msgid "invalid content-type: ~s" msgstr "" @@ -2,7 +2,7 @@ msgid "" msgstr "" "Project-Id-Version: webid-oidc 0.0.0\n" "Report-Msgid-Bugs-To: vivien@planete-kraus.eu\n" -"POT-Creation-Date: 2021-09-13 19:41+0200\n" +"POT-Creation-Date: 2021-09-13 19:52+0200\n" "PO-Revision-Date: 2021-09-13 19:25+0200\n" "Last-Translator: Vivien Kraus <vivien@planete-kraus.eu>\n" "Language-Team: French <vivien@planete-kraus.eu>\n" @@ -955,25 +955,25 @@ msgstr "le JWKS est invalide : ~a" msgid "the JWKS is invalid" msgstr "le JWKS est invalide" -#: src/scm/webid-oidc/jwk.scm:235 +#: src/scm/webid-oidc/jwk.scm:236 #, scheme-format msgid "cannot fetch a JWKS: ~a" msgstr "Impossible de télécharger un JWKS : ~a" -#: src/scm/webid-oidc/jwk.scm:237 +#: src/scm/webid-oidc/jwk.scm:238 msgid "cannot fetch a JWKS" msgstr "impossible de décoder un JWKS" -#: src/scm/webid-oidc/jwk.scm:241 +#: src/scm/webid-oidc/jwk.scm:242 #, scheme-format msgid "the request failed with ~s ~s" msgstr "la requête a échoué avec ~s ~s" -#: src/scm/webid-oidc/jwk.scm:246 +#: src/scm/webid-oidc/jwk.scm:247 msgid "missing content-type" msgstr "type de contenu manquant" -#: src/scm/webid-oidc/jwk.scm:251 +#: src/scm/webid-oidc/jwk.scm:252 #, scheme-format msgid "invalid content-type: ~s" msgstr "type de contenu invalide : ~s" diff --git a/src/scm/webid-oidc/jwk.scm b/src/scm/webid-oidc/jwk.scm index 9c1425a..e4f2119 100644 --- a/src/scm/webid-oidc/jwk.scm +++ b/src/scm/webid-oidc/jwk.scm @@ -229,13 +229,14 @@ (with-exception-handler (lambda (error) (raise-exception - (make-not-a-jwks) - (make-exception-with-message - (if (exception-with-message? error) - (format #f (G_ "cannot fetch a JWKS: ~a") - (exception-message error)) - (format #f (G_ "cannot fetch a JWKS")))) - error)) + (make-exception + (make-not-a-jwks) + (make-exception-with-message + (if (exception-with-message? error) + (format #f (G_ "cannot fetch a JWKS: ~a") + (exception-message error)) + (format #f (G_ "cannot fetch a JWKS")))) + error))) (lambda () (unless (eqv? (response-code response) 200) (fail (format #f (G_ "the request failed with ~s ~s") |