From ae364ed0f7c20cb66b0ec5a6f9735c71b2456494 Mon Sep 17 00:00:00 2001 From: Vivien Kraus Date: Sun, 15 Aug 2021 17:46:18 +0200 Subject: Fix syntax error --- po/disfluid.pot | 12 ++++++------ po/fr.po | 12 ++++++------ 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 \n" "Language-Team: LANGUAGE \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 "" diff --git a/po/fr.po b/po/fr.po index fb8f2d1..855aefb 100644 --- a/po/fr.po +++ b/po/fr.po @@ -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 \n" "Language-Team: French \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") -- cgit v1.2.3