summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2020-10-15 14:34:12 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2020-10-15 14:34:12 -0400
commitf5c9d3f54ec85a83bfe33d0171df2546e750ec0c (patch)
treefc7ffdee14bb9399d7c582efc9a1210f2c709c8f /lisp
parentce09f19c2849c6c13520cc1d8351974c8bee9640 (diff)
* lisp/emacs-lisp/warnings.el (display-warning): Don't be so negative
Diffstat (limited to 'lisp')
-rw-r--r--lisp/emacs-lisp/warnings.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/warnings.el b/lisp/emacs-lisp/warnings.el
index 6919edcc818..f525ea433ad 100644
--- a/lisp/emacs-lisp/warnings.el
+++ b/lisp/emacs-lisp/warnings.el
@@ -294,8 +294,7 @@ entirely by setting `warning-suppress-types' or
message)
;; Don't output the buttons when doing batch compilation
;; and similar.
- (when (and (not noninteractive)
- (not (eq type 'bytecomp)))
+ (unless (or noninteractive (eq type 'bytecomp))
(insert " ")
(insert-button "Disable showing"
'type 'warning-suppress-warning