diff options
author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-09-22 13:11:21 +0200 |
---|---|---|
committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-09-22 18:08:47 +0200 |
commit | 555e59deba33284067298ce6130c379c75e3d2a3 (patch) | |
tree | c15c823913e917bc474f1cf163caf65a117ee9c3 /tests/authorization-endpoint-no-args.scm | |
parent | 0d74f8c1ca9c1e9bf9a04b85f598ba7a175d1d86 (diff) |
Use anonymous-http-request from (webid-oidc parameters) everywhere
Diffstat (limited to 'tests/authorization-endpoint-no-args.scm')
-rw-r--r-- | tests/authorization-endpoint-no-args.scm | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/tests/authorization-endpoint-no-args.scm b/tests/authorization-endpoint-no-args.scm index a9661cd..164e345 100644 --- a/tests/authorization-endpoint-no-args.scm +++ b/tests/authorization-endpoint-no-args.scm @@ -32,13 +32,8 @@ (define key (generate-key #:n-size 2048)) (define subject (string->uri "https://authorization-endpoint-get-form.scm/profile/card#me")) (define password "p4ssw0rd") - (define validity 120) - (define* (http-get uri #:key (headers '())) - (exit 2)) (define endpoint - (make-authorization-endpoint - subject password key validity - #:http-get http-get)) + (make-authorization-endpoint subject password key)) (receive (response response-body) (parameterize ((p:current-date 0)) (endpoint |