summaryrefslogtreecommitdiff
path: root/src/scm/webid-oidc/server/endpoint/identity-provider.scm
diff options
context:
space:
mode:
Diffstat (limited to 'src/scm/webid-oidc/server/endpoint/identity-provider.scm')
-rw-r--r--src/scm/webid-oidc/server/endpoint/identity-provider.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/scm/webid-oidc/server/endpoint/identity-provider.scm b/src/scm/webid-oidc/server/endpoint/identity-provider.scm
index ba96a49..09eac1a 100644
--- a/src/scm/webid-oidc/server/endpoint/identity-provider.scm
+++ b/src/scm/webid-oidc/server/endpoint/identity-provider.scm
@@ -265,13 +265,13 @@
`((,key . ,value)))
(else '())))
(lambda error
- (format (current-error-port) "Can’t split at #\=: ~s\n" error)
+ (format (current-error-port) "Can’t split at #\\=: ~s\n" error)
'())))
(catch #t
(lambda ()
(string-split str #\&))
(lambda error
- (format (current-error-port) "Can’t split at #\&: ~s\n" error)
+ (format (current-error-port) "Can’t split at #\\&: ~s\n" error)
'())))))
(define-method (handle (endpoint <authorization-endpoint>) request request-body)