aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2000-11-12 18:09:09 +0000
committerStefan Monnier2000-11-12 18:09:09 +0000
commit165958d2b4194b75afd0d57b8095cdc036e7ee7b (patch)
tree42103de5925ec9093975a200b9f086b3d93c7eac
parentcd632e57a5215e9429f1459f1aef09b9eef358ba (diff)
downloademacs-165958d2b4194b75afd0d57b8095cdc036e7ee7b.tar.gz
emacs-165958d2b4194b75afd0d57b8095cdc036e7ee7b.zip
(easy-mmode-define-keymap):
Add keyword arg :name.
-rw-r--r--lisp/emacs-lisp/easy-mmode.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el
index e3c82e445de..2dde3559088 100644
--- a/lisp/emacs-lisp/easy-mmode.el
+++ b/lisp/emacs-lisp/easy-mmode.el
@@ -315,12 +315,13 @@ BS must be a list of (KEY . BINDING) where
315KEY and BINDINGS are suitable for `define-key'. 315KEY and BINDINGS are suitable for `define-key'.
316Optional NAME is passed to `make-sparse-keymap'. 316Optional NAME is passed to `make-sparse-keymap'.
317Optional map M can be used to modify an existing map. 317Optional map M can be used to modify an existing map.
318ARGS is a list of additional arguments." 318ARGS is a list of additional keyword arguments."
319 (let (inherit dense suppress) 319 (let (inherit dense suppress)
320 (while args 320 (while args
321 (let ((key (pop args)) 321 (let ((key (pop args))
322 (val (pop args))) 322 (val (pop args)))
323 (case key 323 (case key
324 (:name (setq name val))
324 (:dense (setq dense val)) 325 (:dense (setq dense val))
325 (:inherit (setq inherit val)) 326 (:inherit (setq inherit val))
326 (:group) 327 (:group)