aboutsummaryrefslogtreecommitdiff
path: root/src/property/installer.lisp
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2021-10-09 12:59:22 -0700
committerSean Whitton <spwhitton@spwhitton.name>2021-10-23 12:31:01 -0700
commit614f79f7c6550de6802dad1d61f37eb5c8f6f11f (patch)
tree2dff711b6c597a2264129fb6aa061d402fd8040c /src/property/installer.lisp
parentdee05622a94e2803d232892b376aba70328c21e6 (diff)
downloadconsfigurator-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.lisp4
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")