diff options
author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-10-21 12:27:12 +0200 |
---|---|---|
committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-10-21 12:27:12 +0200 |
commit | 39c856d3e4eac3718c0333eec2ec1287cc39ce75 (patch) | |
tree | 207eb69fc2fd27b5b7108c5f8356af19ba663ef0 | |
parent | 1dc4802d231bf4083d387a6db0765730075cc752 (diff) |
identity-provider endpoint API: accept bytevctors for request bodies
-rw-r--r-- | src/scm/webid-oidc/server/endpoint/identity-provider.scm | 2 |
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)) |