From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Thu, 15 Oct 2020 16:36:26 +0000 (+0200)
Subject: Don't display the warning buttons in bytecomp buffers
X-Git-Tag: emacs-28.0.90~5619
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ce09f19c2849c6c13520cc1d8351974c8bee9640;p=emacs.git

Don't display the warning buttons in bytecomp buffers

* lisp/emacs-lisp/warnings.el (display-warning): Don't do the
buttons in bytecomp buffers.
---

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