From 1b4931555b3e876a313ce31273984f3a59b2ec78 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Fri, 25 Jun 2021 11:26:22 +0200 Subject: deploy: Leave on hard error. Previously, the error message would be displayed, followed by a backtrace ending in &non-continuable. * guix/scripts/deploy.scm (deploy-machine*): Call 'leave' rather than 'report-error' when C is a &message. --- guix/scripts/deploy.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'guix') 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...~%") -- cgit v1.2.3