deploy: Write a message upon successful deployment.

* guix/scripts/deploy.scm (guix-deploy): Write message upon successful
deployment.
This commit is contained in:
Ludovic Courtès 2020-03-20 14:52:01 +01:00
parent 1bb248d0b1
commit 1292372725
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -143,5 +143,7 @@ (define (handle-argument arg result)
(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))))))