mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-05-01 06:45:55 +02:00
guix system: Fix the Shepherd error handling fix.
This is a followup to aa1e73a996.
* guix/scripts/system.scm (with-shepherd-error-handling): Return two
values when an exception is caught.
This commit is contained in:
@@ -242,7 +242,7 @@ expression in %STORE-MONAD."
|
||||
(lambda (store)
|
||||
(warn-on-system-error
|
||||
(guard (c ((shepherd-error? c)
|
||||
(report-shepherd-error c)))
|
||||
(values (report-shepherd-error c) store)))
|
||||
(values (run-with-store store (begin mbody ...))
|
||||
store)))))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user