deploy: Do not quote error messages.
* guix/scripts/deploy.scm (guix-deploy): Do not quote the message.
This commit is contained in:
parent
e09c7f4ae4
commit
dae950ca50
|
@ -94,7 +94,7 @@ Perform the deployment specified by FILE.\n"))
|
||||||
(machine-display-name machine))
|
(machine-display-name machine))
|
||||||
(parameterize ((%graft? (assq-ref opts 'graft?)))
|
(parameterize ((%graft? (assq-ref opts 'graft?)))
|
||||||
(guard (c ((message-condition? c)
|
(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)
|
(machine-display-name machine)
|
||||||
(condition-message c)))
|
(condition-message c)))
|
||||||
((deploy-error? c)
|
((deploy-error? c)
|
||||||
|
|
Loading…
Reference in New Issue