mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/emacs-lisp/warnings.el (display-warning): Don't be so negative

Browse source
This commit is contained in:
Stefan Monnier 2020-10-15 14:34:12 -04:00
parent ce09f19c28
commit f5c9d3f54e
1 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/emacs-lisp/warnings.el
View file

@ -294,8 +294,7 @@ entirely by setting `warning-suppress-types' or
message) message)
;; Don't output the buttons when doing batch compilation ;; Don't output the buttons when doing batch compilation
;; and similar. ;; and similar.
(when (and (not noninteractive) (unless (or noninteractive (eq type 'bytecomp))
(not (eq type 'bytecomp)))
(insert " ") (insert " ")
(insert-button "Disable showing" (insert-button "Disable showing"
'type 'warning-suppress-warning 'type 'warning-suppress-warning