aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix/scripts/deploy.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/guix/scripts/deploy.scm b/guix/scripts/deploy.scm
index 7c62b05d12..8bb8a7932e 100644
--- a/guix/scripts/deploy.scm
+++ b/guix/scripts/deploy.scm
@@ -129,9 +129,9 @@ Perform the deployment specified by FILE.\n"))
(raise c))
((message-condition? c)
- (report-error (G_ "failed to deploy ~a: ~a~%")
- (machine-display-name machine)
- (condition-message c)))
+ (leave (G_ "failed to deploy ~a: ~a~%")
+ (machine-display-name machine)
+ (condition-message c)))
((deploy-error? c)
(when (deploy-error-should-roll-back c)
(info (G_ "rolling back ~a...~%")