From 129237272505d58e121c40b938c7227f294ecb82 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Fri, 20 Mar 2020 14:52:01 +0100 Subject: deploy: Write a message upon successful deployment. * guix/scripts/deploy.scm (guix-deploy): Write message upon successful deployment. --- guix/scripts/deploy.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'guix/scripts/deploy.scm') diff --git a/guix/scripts/deploy.scm b/guix/scripts/deploy.scm index d4d07bea5a..f70d41f35c 100644 --- a/guix/scripts/deploy.scm +++ b/guix/scripts/deploy.scm @@ -143,5 +143,7 @@ Perform the deployment specified by FILE.\n")) (machine-display-name machine)) (run-with-store store (roll-back-machine machine))) (apply throw (deploy-error-captured-args c)))) - (run-with-store store (deploy-machine machine))))) + (run-with-store store (deploy-machine machine)) + (info (G_ "successfully deployed ~a~%") + (machine-display-name machine))))) machines)))))) -- cgit v1.2.3