diff options
author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-10-12 17:12:11 +0200 |
---|---|---|
committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-10-12 18:51:30 +0200 |
commit | d26ea093573932b908114b1890a9c84a93a830e2 (patch) | |
tree | 9f6d73e052cfd6b54a50162ba585d0f2ea9facfc | |
parent | 8f8fb9740ac9990e152f198e5247e67a8e8ee2f2 (diff) |
content negociation: fix it
-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 '*/*)) |