diff options
Diffstat (limited to 'src/data/asdf.lisp')
| -rw-r--r-- | src/data/asdf.lisp | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/data/asdf.lisp b/src/data/asdf.lisp index 83142c0..ee1385c 100644 --- a/src/data/asdf.lisp +++ b/src/data/asdf.lisp @@ -29,9 +29,7 @@ (defun get-path-to-system-tarball (iden1 system) (let* ((tarball (merge-pathnames (strcat "consfigurator/systems/" system ".tar.gz") - (ensure-directory-pathname - (or (getenv "XDG_CACHE_HOME") - (strcat (getenv "HOME") "/.cache"))))) + (uiop:xdg-cache-home))) (tarball-write-date (and (file-exists-p tarball) (file-write-date tarball)))) (multiple-value-bind (version files) (system-version-files system) |