diff options
Diffstat (limited to 'tests/client-token.scm')
-rw-r--r-- | tests/client-token.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/client-token.scm b/tests/client-token.scm index 934cf2c..9c55582 100644 --- a/tests/client-token.scm +++ b/tests/client-token.scm @@ -93,7 +93,9 @@ #:headers headers #:port (open-input-string body))) (request-body body)) - (token-endpoint request request-body))) + (receive (response response-body user error) + (token-endpoint request request-body) + (values response response-body)))) (let ((response (token "https://issuer.client-token.scm" client-key |