diff options
Diffstat (limited to 'src/property/chroot.lisp')
-rw-r--r-- | src/property/chroot.lisp | 12 |
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 |