(easy-mmode-define-keymap): Autoload.

(easy-mmode-defmap): Remove the now useless autoload.
This commit is contained in:
Stefan Monnier 2000-09-29 03:27:28 +00:00
parent 57ce63c470
commit 5d78d57daf

View file

@ -283,6 +283,7 @@ in which `%s' turns it on."
(easy-mmode-set-keymap-parents m parents)
m))))))
;;;###autoload
(defun easy-mmode-define-keymap (bs &optional name m args)
"Return a keymap built from bindings BS.
BS must be a list of (KEY . BINDING) where
@ -322,11 +323,9 @@ ARGS is a list of additional arguments."
;;;###autoload
(defmacro easy-mmode-defmap (m bs doc &rest args)
`(progn
(autoload 'easy-mmode-define-keymap "easy-mmode")
(defconst ,m
(easy-mmode-define-keymap ,bs nil (if (boundp ',m) ,m) ,(cons 'list args))
,doc)))
`(defconst ,m
(easy-mmode-define-keymap ,bs nil (if (boundp ',m) ,m) ,(cons 'list args))
,doc))
;;;