Prefer defvar-keymap in edmacro.el

* lisp/edmacro.el (edmacro-mode-map): Prefer defvar-keymap.

diff --git a/lisp/edmacro.el b/lisp/edmacro.el
index 04adabd06bc52d151150c49a50e570920bc00a03..11afb68883d22b1491df485ad919ccb14c32527c 100644 (file)
--- a/lisp/edmacro.el
+++ b/lisp/edmacro.el
@@ -72,11 +72,9 @@ Default nil means to write characters above \\177 in octal notation."
   :type 'boolean
   :group 'kmacro)
 
-(defvar edmacro-mode-map
-  (let ((map (make-sparse-keymap)))
-    (define-key map "\C-c\C-c" #'edmacro-finish-edit)
-    (define-key map "\C-c\C-q" #'edmacro-insert-key)
-    map))
+(defvar-keymap edmacro-mode-map
+  "C-c C-c" #'edmacro-finish-edit
+  "C-c C-q" #'edmacro-insert-key)
 
 (defvar edmacro-store-hook)
 (defvar edmacro-finish-hook)