deploy: Do not quote error messages.

* guix/scripts/deploy.scm (guix-deploy): Do not quote the message.
This commit is contained in:
Ludovic Courtès 2019-08-28 18:51:49 +02:00
parent e09c7f4ae4
commit dae950ca50
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 1 additions and 1 deletions

View File

@ -94,7 +94,7 @@ Perform the deployment specified by FILE.\n"))
(machine-display-name machine))
(parameterize ((%graft? (assq-ref opts 'graft?)))
(guard (c ((message-condition? c)
(report-error (G_ "failed to deploy ~a: '~a'~%")
(report-error (G_ "failed to deploy ~a: ~a~%")
(machine-display-name machine)
(condition-message c)))
((deploy-error? c)