diff options
-rw-r--r-- | src/property/chroot.lisp | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/property/chroot.lisp b/src/property/chroot.lisp index 124dfdd..f928476 100644 --- a/src/property/chroot.lisp +++ b/src/property/chroot.lisp @@ -29,9 +29,7 @@ (test "-d" root))) (:apply (let* ((os (car (getf (hostattrs host) :os))) - (args (list (if (os:supports-arch-p (get-hostattrs-car :os) - (os:linux-architecture os)) - "debootstrap" "qemu-debootstrap") + (args (list "debootstrap" (plist-to-cmd-args options) (strcat "--arch=" (os:debian-architecture os)) (os:debian-suite os) |