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 e10c149d89cc26db250df657073b8bee30d36503..6919edcc81813ef39d358f51983f3d5d7f3641bc 100644 (file)
--- 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