ui: Non-zero exit for compound '&message' and '&error-location' conditions.
* guix/ui.scm (call-with-error-handling): When both 'message?' and 'error-location?' are true, add call to 'exit'.master
parent
9f1e39d1fc
commit
399993f804
|
@ -621,7 +621,8 @@ directories:~{ ~a~}~%")
|
||||||
(format (current-error-port)
|
(format (current-error-port)
|
||||||
(G_ "~a: error: ~a~%")
|
(G_ "~a: error: ~a~%")
|
||||||
(location->string (error-location c))
|
(location->string (error-location c))
|
||||||
(gettext (condition-message c) %gettext-domain)))
|
(gettext (condition-message c) %gettext-domain))
|
||||||
|
(exit 1))
|
||||||
((message-condition? c)
|
((message-condition? c)
|
||||||
;; Normally '&message' error conditions have an i18n'd message.
|
;; Normally '&message' error conditions have an i18n'd message.
|
||||||
(leave (G_ "~a~%")
|
(leave (G_ "~a~%")
|
||||||
|
|
Reference in New Issue