aboutsummaryrefslogtreecommitdiff
path: root/src/property/chroot.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/property/chroot.lisp')
-rw-r--r--src/property/chroot.lisp12
1 files changed, 7 insertions, 5 deletions
diff --git a/src/property/chroot.lisp b/src/property/chroot.lisp
index d655c2b..510288a 100644
--- a/src/property/chroot.lisp
+++ b/src/property/chroot.lisp
@@ -58,11 +58,13 @@
(defmethod %make-child-host ((host unpreprocessed-host))
(let ((propspec (host-propspec host)))
- (make-child-host :hostattrs (hostattrs host)
- :propspec (make-propspec
- :systems (propspec-systems propspec)
- :propspec `(service:without-starting-services
- ,(propspec-props propspec))))))
+ (make-child-host
+ :hostattrs (hostattrs host)
+ :propspec (make-propspec
+ :systems (propspec-systems propspec)
+ :propspec `(service:without-starting-services
+ (container:contained :filesystem)
+ ,(propspec-props propspec))))))
(defproplist deploys :lisp (root host &optional additional-properties)
"Like DEPLOYS with first argument `((:chroot :into ,root)), but disable