diff options
author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-09-30 23:26:00 +0200 |
---|---|---|
committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-10-04 23:00:18 +0200 |
commit | 48f5629f8e54f024e8763aeb12be513851ef28f3 (patch) | |
tree | 5ef6196646abaa4639cebfcd721c2a3edda55ba0 /src/scm/webid-oidc/resource-server.scm | |
parent | b6a3a1222912bef89f109fec4174febb43944fae (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.scm | 3 |
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 |