Silent init hooks if noninteractive

This commit is contained in:
Henrik Lissner 2017-07-27 00:01:55 +02:00
parent dd947b5eae
commit 6f5b853cc2
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -139,7 +139,9 @@ melodramatic ex-vimmer disappointed with the text-editor status quo."
is to include more information in the error message, without sacrificing your is to include more information in the error message, without sacrificing your
ability to invoke the debugger in debug mode." ability to invoke the debugger in debug mode."
(condition-case-unless-debug ex (condition-case-unless-debug ex
(funcall fn) (if noninteractive
(quiet! (funcall fn))
(funcall fn))
('error ('error
(lwarn hook :error (lwarn hook :error
"%s in '%s' -> %s" "%s in '%s' -> %s"