diff options
Diffstat (limited to 'src/scm/webid-oidc/program.scm')
-rw-r--r-- | src/scm/webid-oidc/program.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/scm/webid-oidc/program.scm b/src/scm/webid-oidc/program.scm index 00c929a..fc9d746 100644 --- a/src/scm/webid-oidc/program.scm +++ b/src/scm/webid-oidc/program.scm @@ -189,7 +189,8 @@ ,@(response-headers response)) #:port (response-port response) #:validate-headers? #t) - response-body))))))))) + response-body))) + #:unwind? #t)))))) (define (serve-one-client* handler implementation server state) ;; Same as serve-one-client, except it is served in a promise. |