Commit 9d0da923 authored by Juanma Barranquero's avatar Juanma Barranquero

lisp/emacs-lisp/derived.el: Don't warn about keymaps already `defconst'ed.

parent 65084709
2011-03-22 Juanma Barranquero <lekktu@gmail.com>
* emacs-lisp/derived.el (define-derived-mode): Wrap declaration of
keymap variable in `with-no-warnings' to avoid a warning when the
keymap has been already `defconst'ed.
2011-03-22 Leo Liu <sdl.web@gmail.com> 2011-03-22 Leo Liu <sdl.web@gmail.com>
* abbrev.el (write-abbrev-file): Use utf-8 for writing if it can * abbrev.el (write-abbrev-file): Use utf-8 for writing if it can
......
...@@ -201,7 +201,7 @@ No problems result if this variable is not bound. ...@@ -201,7 +201,7 @@ No problems result if this variable is not bound.
name)))) name))))
(unless (boundp ',map) (unless (boundp ',map)
(put ',map 'definition-name ',child)) (put ',map 'definition-name ',child))
(defvar ,map (make-sparse-keymap)) (with-no-warnings (defvar ,map (make-sparse-keymap)))
(unless (get ',map 'variable-documentation) (unless (get ',map 'variable-documentation)
(put ',map 'variable-documentation (put ',map 'variable-documentation
(purecopy ,(format "Keymap for `%s'." child)))) (purecopy ,(format "Keymap for `%s'." child))))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment