aboutsummaryrefslogtreecommitdiff
path: root/src/connection
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2021-05-10 19:50:12 -0700
committerSean Whitton <spwhitton@spwhitton.name>2021-05-10 19:50:12 -0700
commit40e12afba3819abdf84e9db86a1afe1cbc50980f (patch)
tree0131ae371790731257f18bd20377137fb752cd16 /src/connection
parentb29195fe9f1a865ebbc6a9db3823c2b3f1d81d6c (diff)
downloadconsfigurator-40e12afba3819abdf84e9db86a1afe1cbc50980f.tar.gz
fix finding the data cache in chroots
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/connection')
-rw-r--r--src/connection/chroot.lisp6
1 files changed, 4 insertions, 2 deletions
diff --git a/src/connection/chroot.lisp b/src/connection/chroot.lisp
index 21d0cc2..bfbaab5 100644
--- a/src/connection/chroot.lisp
+++ b/src/connection/chroot.lisp
@@ -112,8 +112,10 @@ should be the mount point, without the chroot's root prefixed.")
(datadir-inside
(stripln
(mrun
- "chroot" into
- "echo" "${XDG_CACHE_HOME:-$HOME/.cache}/consfigurator/data/")))
+ (format
+ nil
+ "chroot ~A echo ${XDG_CACHE_HOME:-$HOME/.cache}/consfigurator/data/"
+ (escape-sh-token (unix-namestring into))))))
(datadir (ensure-pathname
(subseq datadir-inside 1)
:defaults into* :ensure-absolute t :ensure-directory t)))