diff options
Diffstat (limited to 'tests/token-endpoint-refresh.scm')
| -rw-r--r-- | tests/token-endpoint-refresh.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/token-endpoint-refresh.scm b/tests/token-endpoint-refresh.scm index d338f2f..3a1e5b6 100644 --- a/tests/token-endpoint-refresh.scm +++ b/tests/token-endpoint-refresh.scm @@ -42,7 +42,7 @@ "token-endpoint-refresh" (lambda () (define key (generate-key #:n-size 2048)) - (call-with-output-file "key-file.jwk" + (call-with-output-file (string-append (p:data-home) "/key-file.jwk") (lambda (port) (stubs:scm->json (key->jwk key) @@ -57,7 +57,7 @@ (define endpoint (make <token-endpoint> #:issuer "https://issuer.token-endpoint-refresh.scm" - #:key-file "key-file.jwk")) + #:key-file (string-append (p:data-home) "/key-file.jwk"))) (with-exception-handler (lambda (exn) (unless (and (web-exception? exn) |