From 5d78d57daf53f6556fd9c5ff9179efe9878cdaff Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 29 Sep 2000 03:27:28 +0000 Subject: [PATCH] (easy-mmode-define-keymap): Autoload. (easy-mmode-defmap): Remove the now useless autoload. --- lisp/emacs-lisp/easy-mmode.el | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el index 0d1b092e515..58def617a91 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el @@ -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)) ;;; -- 2.39.5