diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/scm/webid-oidc/resource-server.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/scm/webid-oidc/resource-server.scm b/src/scm/webid-oidc/resource-server.scm index 7f9c8f9..0eda41f 100644 --- a/src/scm/webid-oidc/resource-server.scm +++ b/src/scm/webid-oidc/resource-server.scm @@ -149,6 +149,8 @@ #:http-get http-get) (with-exception-handler (lambda (error) + (unless (precondition-failed? error) + (raise-exception error)) (let ((true-content-type (car (assq-ref headers 'content-type))) (other-headers |