diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2018-03-07 10:52:24 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2018-03-07 11:22:42 +0100 |
| commit | e1ba6d49ea4df327e4dde9a994c4a89b71484d69 (patch) | |
| tree | 6be333d27cfb6179c6edda215e038e11e797a4a1 | |
| parent | ca23693d280de5c4031058da4d3041d830080484 (diff) | |
| download | patches-e1ba6d49ea4df327e4dde9a994c4a89b71484d69.tar patches-e1ba6d49ea4df327e4dde9a994c4a89b71484d69.tar.gz | |
ui: Display fix hints in the case where we have location info.
* guix/ui.scm (call-with-error-handling): Display fix-hints in the
error + message case.
| -rw-r--r-- | guix/ui.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/guix/ui.scm b/guix/ui.scm index a4943c2a7f..5b87f1e29b 100644 --- a/guix/ui.scm +++ b/guix/ui.scm @@ -639,6 +639,8 @@ directories:~{ ~a~}~%") (G_ "~a: error: ~a~%") (location->string (error-location c)) (gettext (condition-message c) %gettext-domain)) + (when (fix-hint? c) + (display-hint (condition-fix-hint c))) (exit 1)) ((and (message-condition? c) (fix-hint? c)) (format (current-error-port) "~a: error: ~a~%" |