From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Thu, 15 Oct 2020 18:34:12 +0000 (-0400)
Subject: * lisp/emacs-lisp/warnings.el (display-warning): Don't be so negative
X-Git-Tag: emacs-28.0.90~5618
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f5c9d3f54ec85a83bfe33d0171df2546e750ec0c;p=emacs.git

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

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