summaryrefslogtreecommitdiff
path: root/src/scm/webid-oidc/resource-server.scm
diff options
context:
space:
mode:
authorVivien Kraus <vivien@planete-kraus.eu>2021-09-30 23:26:00 +0200
committerVivien Kraus <vivien@planete-kraus.eu>2021-10-04 23:00:18 +0200
commit48f5629f8e54f024e8763aeb12be513851ef28f3 (patch)
tree5ef6196646abaa4639cebfcd721c2a3edda55ba0 /src/scm/webid-oidc/resource-server.scm
parentb6a3a1222912bef89f109fec4174febb43944fae (diff)
Unwind the stack to handle setlocale errors
Diffstat (limited to 'src/scm/webid-oidc/resource-server.scm')
-rw-r--r--src/scm/webid-oidc/resource-server.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/scm/webid-oidc/resource-server.scm b/src/scm/webid-oidc/resource-server.scm
index 50e5b64..d035ec4 100644
--- a/src/scm/webid-oidc/resource-server.scm
+++ b/src/scm/webid-oidc/resource-server.scm
@@ -126,7 +126,8 @@
(lambda (error)
(g return error))
(lambda ()
- (f return))))))
+ (f return))
+ #:unwind? #t))))
(define (nonrdf-or-turtle server-uri request request-body)
;; If the request is an exotic RDF serialization