diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2022-04-28 15:52:53 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-04-28 16:24:34 -0700 |
commit | 4d0c10c402aaef7a3c43683e40e33ce59ddcf1f5 (patch) | |
tree | b25095eec418aba735cf508588562f871cc6ca8f /src/property/installer.lisp | |
parent | 1e69e649bf457f928da0bc88849b96e4622b4bb9 (diff) | |
download | consfigurator-4d0c10c402aaef7a3c43683e40e33ce59ddcf1f5.tar.gz |
rename connattr :OPENED-VOLUMES -> DISK:OPENED-VOLUMES
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/property/installer.lisp')
-rw-r--r-- | src/property/installer.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/property/installer.lisp b/src/property/installer.lisp index 1031cde..d3e4311 100644 --- a/src/property/installer.lisp +++ b/src/property/installer.lisp @@ -70,7 +70,7 @@ BOOTLOADER-TYPE to VOLUME.")) :hostattrs (lambda () (mapc #'propapp-attrs propapps)) :apply (lambda () - (mapc #'consfigure (get-propspecs (get-connattr :opened-volumes))) + (mapc #'consfigure (get-propspecs (get-connattr 'disk:opened-volumes))) (mrun "sync")))) @@ -83,7 +83,7 @@ BOOTLOADER-TYPE to VOLUME.")) (run "rsync" "-PSavx" "--delete" (loop for volume in (mapcan (curry #'subvolumes-of-type 'mounted-filesystem) - (get-connattr :opened-volumes)) + (get-connattr 'disk:opened-volumes)) collect (strcat "--exclude=" (unix-namestring (mount-point volume)))) (strcat (unix-namestring chroot) "/") |