mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 15:36:20 -05:00
Revert "reconfigure: Run the effect scripts as separate processes."
This reverts commit 5517750344
.
That commit would remove all sorts of error checking when running those
programs.
This commit is contained in:
parent
28f6f1e0da
commit
00a1ebb84a
1 changed files with 11 additions and 11 deletions
|
@ -100,7 +100,7 @@ (define* (switch-to-system eval os #:optional profile)
|
|||
"Using EVAL, a monadic procedure taking a single G-Expression as an argument,
|
||||
create a new generation of PROFILE pointing to the directory of OS, switch to
|
||||
it atomically, and run OS's activation script."
|
||||
(eval #~(system* #$(switch-system-program os profile))))
|
||||
(eval #~(primitive-load #$(switch-system-program os profile))))
|
||||
|
||||
|
||||
;;;
|
||||
|
@ -176,10 +176,10 @@ (define target-services
|
|||
(map live-service-canonical-name
|
||||
live-services)))
|
||||
(service-files (map shepherd-service-file target-services)))
|
||||
(eval #~(system* #$(upgrade-services-program service-files
|
||||
to-start
|
||||
to-unload
|
||||
to-restart)))))))
|
||||
(eval #~(primitive-load #$(upgrade-services-program service-files
|
||||
to-start
|
||||
to-unload
|
||||
to-restart)))))))
|
||||
|
||||
|
||||
;;;
|
||||
|
@ -252,9 +252,9 @@ (define* (install-bootloader eval configuration bootcfg
|
|||
(package (bootloader-package bootloader))
|
||||
(device (bootloader-configuration-target configuration))
|
||||
(bootcfg-file (bootloader-configuration-file bootloader)))
|
||||
(eval #~(system* #$(install-bootloader-program installer
|
||||
package
|
||||
bootcfg
|
||||
bootcfg-file
|
||||
device
|
||||
target)))))
|
||||
(eval #~(primitive-load #$(install-bootloader-program installer
|
||||
package
|
||||
bootcfg
|
||||
bootcfg-file
|
||||
device
|
||||
target)))))
|
||||
|
|
Loading…
Reference in a new issue