From 3583b27b2cb42ac8c88e7f53df2e3101d5a82ede Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Wed, 22 Jun 2016 23:39:57 +0200
Subject: [PATCH] utils: 'cache-directory' honors 'XDG_CACHE_HOME'.

* guix/utils.scm (cache-directory): Honor 'XDG_CACHE_HOME', not
'XDG_CONFIG_HOME'.
---
 guix/utils.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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 @@ (define (with-atomic-file-output file proc)
 
 (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"))))