summaryrefslogtreecommitdiff
path: root/src/scm/webid-oidc/testing.scm
diff options
context:
space:
mode:
authorVivien Kraus <vivien@planete-kraus.eu>2020-12-02 09:31:05 +0100
committerVivien Kraus <vivien@planete-kraus.eu>2021-06-19 15:44:36 +0200
commitf5f7d4e8253481e59ad89f7ec993c7739a47c81c (patch)
treef7dad3ce3923aa9237d099f7e1747cd7deac6c87 /src/scm/webid-oidc/testing.scm
parentdf646a0cc8f1fefd7204e08eb6754c5a85cd022a (diff)
Add the refresh token code
Diffstat (limited to 'src/scm/webid-oidc/testing.scm')
-rw-r--r--src/scm/webid-oidc/testing.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/scm/webid-oidc/testing.scm b/src/scm/webid-oidc/testing.scm
index d4b7f4d..aecb2a3 100644
--- a/src/scm/webid-oidc/testing.scm
+++ b/src/scm/webid-oidc/testing.scm
@@ -5,8 +5,10 @@
;; This module is used only when running tests.
(define-public (with-test-environment test-name f)
- (let ((cache-dir (format #f "tests/~a.cache" test-name)))
+ (let ((cache-dir (format #f "tests/~a.cache" test-name))
+ (data-dir (format #f "tests/~a.home" test-name)))
(setenv "XDG_CACHE_HOME" cache-dir)
+ (setenv "XDG_DATA_HOME" data-dir)
(catch #t
(lambda () (mkdir cache-dir))
(lambda err #t))