(byte-compile-warning-types): Add mapcar and make-local.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 348558bff1a9a16261d346276c551169700d6eba..0f110f0a0d2f15ec090dc2cf4b6ddfa291a824d5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -4,6 +4,7 @@
        (byte-compile-warnings-safe-p): Add `mapcar'.
        (byte-compile-normal-call): Add option to suppress mapcar warning.
        (top-level): Use mapc rather than mapcar in eval-when-compile.
+       (byte-compile-warning-types): Add mapcar and make-local.
 
 2007-09-21  Stefan Monnier  <monnier@iro.umontreal.ca>
 

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 31ee364cd2f7539118119d21f6766d4e620b5448..5a5c639f0a653fc02a3723f7ba7c4de5dfbf4390 100644 (file)
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -341,7 +341,8 @@ If it is 'byte, then only byte-level optimizations will be logged."
 
 (defconst byte-compile-warning-types
   '(redefine callargs free-vars unresolved
-            obsolete noruntime cl-functions interactive-only)
+            obsolete noruntime cl-functions interactive-only
+            make-local mapcar)
   "The list of warning types used when `byte-compile-warnings' is t.")
 (defcustom byte-compile-warnings t
   "*List of warnings that the byte-compiler should issue (t for all).