From 5c5c1b559313d06aab6516ff1b1acf1da3a01c7d Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Wed, 20 Nov 2019 12:28:37 +0100 Subject: [PATCH] Make with-suppressed-warnings work for macros, too * lisp/emacs-lisp/macroexp.el (macroexp-macroexpand): Pass the macro/alias symbol on to byte-compile-warning-enabled-p so that with-suppressed-warnings works for macros, too. --- lisp/emacs-lisp/macroexp.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/macroexp.el b/lisp/emacs-lisp/macroexp.el index 72198c44004..329b48d179e 100644 --- a/lisp/emacs-lisp/macroexp.el +++ b/lisp/emacs-lisp/macroexp.el @@ -187,7 +187,7 @@ and also to avoid outputting the warning during normal execution." (symbolp (car form)) (get (car form) 'byte-obsolete-info) (or (not (fboundp 'byte-compile-warning-enabled-p)) - (byte-compile-warning-enabled-p 'obsolete))) + (byte-compile-warning-enabled-p 'obsolete (car form)))) (let* ((fun (car form)) (obsolete (get fun 'byte-obsolete-info))) (macroexp--warn-and-return -- 2.39.5