1
0
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:
Ludovic Courtès
2016-08-02 23:51:12 +02:00
parent 35c4aec88d
commit 9d1e56b76d
+1 -1
View File
@@ -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)))))