From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 29 Sep 2000 03:27:28 +0000 (+0000)
Subject: (easy-mmode-define-keymap): Autoload.
X-Git-Tag: emacs-pretest-21.0.90~1300
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5d78d57daf53f6556fd9c5ff9179efe9878cdaff;p=emacs.git

(easy-mmode-define-keymap): Autoload.
(easy-mmode-defmap): Remove the now useless autoload.
---

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))
 
 
 ;;;