summaryrefslogtreecommitdiff
path: root/src/scm/webid-oidc
diff options
context:
space:
mode:
authorVivien Kraus <vivien@planete-kraus.eu>2021-08-13 00:35:33 +0200
committerVivien Kraus <vivien@planete-kraus.eu>2021-08-13 01:23:35 +0200
commit438e1e60af11948ce9ed6b8349eb0412517fd3f8 (patch)
tree5d1eeabec32f9042843e722aadb0bc4ef566f42a /src/scm/webid-oidc
parent12dfa4c19ec15329df66f5f663d23ad19a73e496 (diff)
Hello: the agent is an URI
Diffstat (limited to 'src/scm/webid-oidc')
-rw-r--r--src/scm/webid-oidc/hello-world.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/scm/webid-oidc/hello-world.scm b/src/scm/webid-oidc/hello-world.scm
index 45e0657..0451ee9 100644
--- a/src/scm/webid-oidc/hello-world.scm
+++ b/src/scm/webid-oidc/hello-world.scm
@@ -151,7 +151,7 @@ Options:
(source . ,means-string)))
(with-output-to-string
(lambda ()
- (sxml->xml (hello-page agent)))))
+ (sxml->xml (hello-page (string->uri agent))))))
(values
(build-response #:code 401
#:reason-phrase (W_ "reason-phrase|Unauthorized")