summaryrefslogtreecommitdiff
path: root/src/scm/webid-oidc/cache.scm
diff options
context:
space:
mode:
authorVivien Kraus <vivien@planete-kraus.eu>2021-04-18 19:27:50 +0200
committerVivien Kraus <vivien@planete-kraus.eu>2021-06-19 15:44:36 +0200
commit3f66c5a713694d6acf8ce66319fe9719539d2a37 (patch)
treea1019110c72878d6a15d72882b9592554e5c0206 /src/scm/webid-oidc/cache.scm
parent1c2c188dc3544bd4df571ce06d24784640db43d5 (diff)
Negociate a token (client)
Diffstat (limited to 'src/scm/webid-oidc/cache.scm')
-rw-r--r--src/scm/webid-oidc/cache.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/scm/webid-oidc/cache.scm b/src/scm/webid-oidc/cache.scm
index 9d9da0f..9435c10 100644
--- a/src/scm/webid-oidc/cache.scm
+++ b/src/scm/webid-oidc/cache.scm
@@ -35,7 +35,7 @@
(define (default-cache-dir)
(let ((xdg-cache-home
(or (getenv "XDG_CACHE_HOME")
- (format #f "~a/.cache"))))
+ (format #f "~a/.cache" (getenv "HOME")))))
(format #f "~a/webid-oidc" xdg-cache-home)))
(define (web-cache-dir dir)