diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2019-08-28 18:51:49 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-08-28 18:52:52 +0200 |
| commit | dae950ca50bca57c6d8c5fd8946de5eece614f0a (patch) | |
| tree | 3513286da31f1a1853e6838385f7c7996849761e | |
| parent | e09c7f4ae4e1c634975874cc18fd65ae4c4af091 (diff) | |
| download | guix-dae950ca50bca57c6d8c5fd8946de5eece614f0a.tar.gz | |
deploy: Do not quote error messages.
* guix/scripts/deploy.scm (guix-deploy): Do not quote the message.
| -rw-r--r-- | guix/scripts/deploy.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/scripts/deploy.scm b/guix/scripts/deploy.scm index 6a67985c8b..329de41143 100644 --- a/guix/scripts/deploy.scm +++ b/guix/scripts/deploy.scm @@ -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) |