diff options
Diffstat (limited to 'src/scm/webid-oidc/serve.scm')
-rw-r--r-- | src/scm/webid-oidc/serve.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/scm/webid-oidc/serve.scm b/src/scm/webid-oidc/serve.scm index 76c58fc..1e920fb 100644 --- a/src/scm/webid-oidc/serve.scm +++ b/src/scm/webid-oidc/serve.scm @@ -79,7 +79,7 @@ (make-exception (make-not-acceptable client-accepts path content-type) (make-exception-with-message final-message)))) - (let ((request (caar accepts))) + (let ((request (car accepts))) (cond ((or (eq? request content-type) (eq? request '*/*)) |