diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2016-06-22 23:39:57 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2016-06-22 23:39:57 +0200 |
| commit | 3583b27b2cb42ac8c88e7f53df2e3101d5a82ede (patch) | |
| tree | 84aec169046d312a492d3f4931b769754190e4e8 | |
| parent | 0a2f2848d5f39e008397215e697e14335dcce7c1 (diff) | |
| download | guix-3583b27b2cb42ac8c88e7f53df2e3101d5a82ede.tar.gz guix-3583b27b2cb42ac8c88e7f53df2e3101d5a82ede.zip | |
utils: 'cache-directory' honors 'XDG_CACHE_HOME'.
* guix/utils.scm (cache-directory): Honor 'XDG_CACHE_HOME', not
'XDG_CONFIG_HOME'.
| -rw-r--r-- | guix/utils.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/utils.scm b/guix/utils.scm index 69f4e78a85..6bcee17776 100644 --- a/guix/utils.scm +++ b/guix/utils.scm @@ -637,7 +637,7 @@ output port, and PROC's result is returned." (define (cache-directory) "Return the cache directory for Guix, by default ~/.cache/guix." - (or (getenv "XDG_CONFIG_HOME") + (or (getenv "XDG_CACHE_HOME") (and=> (or (getenv "HOME") (passwd:dir (getpwuid (getuid)))) (cut string-append <> "/.cache/guix")))) |