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.lisp8
1 files changed, 5 insertions, 3 deletions
diff --git a/src/property/disk.lisp b/src/property/disk.lisp
index 26e1238..42819f9 100644
--- a/src/property/disk.lisp
+++ b/src/property/disk.lisp
@@ -818,9 +818,11 @@ 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 ,(propapp (chroot:os-bootstrapped-for. options chroot host
- (caches-cleaned)))
- (%raw-image-created ,volumes :chroot ,chroot :rebuild ,rebuild)
+ `(on-change (eseqprops
+ ,(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))))