From 66a9404ddc9541dde17cdf9e99b15f2b197409f5 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sat, 23 Apr 2022 14:23:34 -0700 Subject: rename REBOOT:REBOOTED-AT-END -> REBOOT:AT-END Signed-off-by: Sean Whitton --- src/property/installer.lisp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/property/installer.lisp') diff --git a/src/property/installer.lisp b/src/property/installer.lisp index ff74a4d..816ca05 100644 --- a/src/property/installer.lisp +++ b/src/property/installer.lisp @@ -162,8 +162,8 @@ using a combinator like ON-CHANGE, or applied manually with DEPLOY-THESE." ;;; that the AT-END functions get run even when there's a nonlocal exit from ;;; %CONSFIGURE's call to APPLY-PROPAPP; perhaps we could pass a second ;;; argument to the AT-END functions indicating whether there was a non-local -;;; transfer of control. REBOOT:REBOOTED-AT-END might only reboot when there -;;; was a normal return from APPLY-PROPAPP, whereas the cleanup forms from +;;; transfer of control. REBOOT:AT-END might only reboot when there was a +;;; normal return from APPLY-PROPAPP, whereas the cleanup forms from ;;; SERVICES:WITHOUT-STARTING-SERVICES would always be evaluated. (defprop %root-filesystems-flipped :lisp (new-os old-os) @@ -400,4 +400,4 @@ live system and use Consfigurator to install to the host's usual storage." (%root-filesystems-flipped "/new-os" "/old-os") ;; Prevent boot issues caused by disabled shadow passwords. (cmd:single "shadowconfig" "on") - (reboot:rebooted-at-end))) + (reboot:at-end))) -- cgit v1.2.3