diff options
author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-09-20 11:25:29 +0200 |
---|---|---|
committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-09-21 22:28:51 +0200 |
commit | e910b3ba2ded990a5193f7ea0cfad525332e4171 (patch) | |
tree | b04e74e7c06e0a0fde5edd7ac0b8773db94cd515 /tests/authorization-endpoint-submit-form.scm | |
parent | dcd329af1ec765ca0fac97ef2dc18a3177d34083 (diff) |
JWS: use GOOPS
Diffstat (limited to 'tests/authorization-endpoint-submit-form.scm')
-rw-r--r-- | tests/authorization-endpoint-submit-form.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/authorization-endpoint-submit-form.scm b/tests/authorization-endpoint-submit-form.scm index 37059fe..2fc7197 100644 --- a/tests/authorization-endpoint-submit-form.scm +++ b/tests/authorization-endpoint-submit-form.scm @@ -107,8 +107,8 @@ (exit 9)) (let ((parsed (parameterize ((p:current-date 60)) - (authorization-code-decode - (car (assoc-ref args "code")) - key)))) + (decode <authorization-code> + (car (assoc-ref args "code")) + #:issuer-key key)))) (unless parsed (exit 10))))))))) |