summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorVivien Kraus <vivien@planete-kraus.eu>2021-10-21 12:27:12 +0200
committerVivien Kraus <vivien@planete-kraus.eu>2021-10-21 12:27:12 +0200
commit39c856d3e4eac3718c0333eec2ec1287cc39ce75 (patch)
tree207eb69fc2fd27b5b7108c5f8356af19ba663ef0
parent1dc4802d231bf4083d387a6db0765730075cc752 (diff)
identity-provider endpoint API: accept bytevctors for request bodies
-rw-r--r--src/scm/webid-oidc/server/endpoint/identity-provider.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/scm/webid-oidc/server/endpoint/identity-provider.scm b/src/scm/webid-oidc/server/endpoint/identity-provider.scm
index d259ce9..57892c7 100644
--- a/src/scm/webid-oidc/server/endpoint/identity-provider.scm
+++ b/src/scm/webid-oidc/server/endpoint/identity-provider.scm
@@ -279,7 +279,7 @@
('application/x-www-form-urlencoded _ ...))
#t)
(else #f))
- (if (bytevector? request)
+ (if (bytevector? request-body)
(false-if-exception
(utf8->string request-body))
request-body))