diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-10-09 12:59:22 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-10-23 12:31:01 -0700 |
commit | 614f79f7c6550de6802dad1d61f37eb5c8f6f11f (patch) | |
tree | 2dff711b6c597a2264129fb6aa061d402fd8040c /src/property/installer.lisp | |
parent | dee05622a94e2803d232892b376aba70328c21e6 (diff) | |
download | consfigurator-614f79f7c6550de6802dad1d61f37eb5c8f6f11f.tar.gz |
rename :XDG-CACHE-HOME connattr to :XDG_CACHE_HOME
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/property/installer.lisp')
-rw-r--r-- | src/property/installer.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/property/installer.lisp b/src/property/installer.lisp index fbe574b..a41112f 100644 --- a/src/property/installer.lisp +++ b/src/property/installer.lisp @@ -266,14 +266,14 @@ using a combinator like ON-CHANGE, or applied manually with DEPLOY-THESE." (let ((source (chroot-pathname (merge-pathnames - "consfigurator/" (get-connattr :XDG-CACHE-HOME)) + "consfigurator/" (get-connattr :XDG_CACHE_HOME)) old-os))) (when (directory-exists-p source) (rename-file source (ensure-directories-exist #P"/root/.cache/consfigurator/")))) (setf (get-connattr :remote-user) "root" (get-connattr :remote-home) "/root" - (get-connattr :XDG-CACHE-HOME) #P"/root/.cache/" + (get-connattr :XDG_CACHE_HOME) #P"/root/.cache/" (get-connattr :consfigurator-cache) #P"/root/.cache/consfigurator/") (posix-login-environment "root" "/root") |