aboutsummaryrefslogtreecommitdiff
path: root/src/property/disk.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/property/disk.lisp')
-rw-r--r--src/property/disk.lisp6
1 files changed, 2 insertions, 4 deletions
diff --git a/src/property/disk.lisp b/src/property/disk.lisp
index 6136ca0..2603f12 100644
--- a/src/property/disk.lisp
+++ b/src/property/disk.lisp
@@ -813,10 +813,8 @@ filesystems will be incrementally updated when other properties change."
(unless found
(inapplicable-property
"Volumes list for host has no DISK:PHYSICAL-DISK with contents.")))))
- `(on-change (chroot:os-bootstrapped-for
- ,options ,chroot ,host
- ,(make-propspec :systems nil
- :propspec '(caches-cleaned)))
+ `(on-change ,(propapp (chroot:os-bootstrapped-for. options chroot host
+ (caches-cleaned)))
(%raw-image-created ,volumes :chroot ,chroot :rebuild ,rebuild)
(consfigurator.property.installer:chroot-installed-to-volumes
,host ,chroot ,volumes))))