summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/warnings.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2020-10-15 18:36:26 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2020-10-15 18:36:26 +0200
commitce09f19c2849c6c13520cc1d8351974c8bee9640 (patch)
tree65e94317442452f9e9953ed371dfc277024c9640 /lisp/emacs-lisp/warnings.el
parent97b8c0adc1d6ce42c43829e1270c0ccd13a82382 (diff)
Don't display the warning buttons in bytecomp buffers
* lisp/emacs-lisp/warnings.el (display-warning): Don't do the buttons in bytecomp buffers.
Diffstat (limited to 'lisp/emacs-lisp/warnings.el')
-rw-r--r--lisp/emacs-lisp/warnings.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/warnings.el b/lisp/emacs-lisp/warnings.el
index e10c149d89c..6919edcc818 100644
--- a/lisp/emacs-lisp/warnings.el
+++ b/lisp/emacs-lisp/warnings.el
@@ -294,7 +294,8 @@ entirely by setting `warning-suppress-types' or
message)
;; Don't output the buttons when doing batch compilation
;; and similar.
- (unless noninteractive
+ (when (and (not noninteractive)
+ (not (eq type 'bytecomp)))
(insert " ")
(insert-button "Disable showing"
'type 'warning-suppress-warning