summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorVivien Kraus <vivien@planete-kraus.eu>2021-07-06 11:53:53 +0200
committerVivien Kraus <vivien@planete-kraus.eu>2021-07-06 11:59:45 +0200
commit888fb3e55a5deca32aa46a2bdc7fa5994768797d (patch)
tree04d8347862308bbc8f9e922c371e99e9681fbe0c /src
parente7eff234da04c3e350ab4a058274b613d5d1f2cf (diff)
Handle request-failed-unexpectedly error
Diffstat (limited to 'src')
-rw-r--r--src/scm/webid-oidc/errors.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/scm/webid-oidc/errors.scm b/src/scm/webid-oidc/errors.scm
index 522e563..1eb5a78 100644
--- a/src/scm/webid-oidc/errors.scm
+++ b/src/scm/webid-oidc/errors.scm
@@ -1459,6 +1459,10 @@
((&invalid-signature)
(format #f (G_ "the signature ~a does not match key ~s with payload ~a")
(get 'signature) (get 'key) (get 'payload)))
+ ((&request-failed-unexpectedly)
+ (format #f (G_ "the request failed unexpectedly with code ~a: ~s")
+ (get 'response-code)
+ (get 'response-reason-phrase)))
((&undefined-variable)
(G_ "there is an undefined variable"))
((&origin)