diff options
| author | Glenn Morris | 2009-09-10 06:20:51 +0000 |
|---|---|---|
| committer | Glenn Morris | 2009-09-10 06:20:51 +0000 |
| commit | 117fdd32c7f3e845f03f686a0ae44f2802a4d584 (patch) | |
| tree | 0b3b59c6b88af965f8693070f0d01bb61e0372e9 | |
| parent | a47236297e4150fd84c4079a0266c65ac546be61 (diff) | |
| download | emacs-117fdd32c7f3e845f03f686a0ae44f2802a4d584.tar.gz emacs-117fdd32c7f3e845f03f686a0ae44f2802a4d584.zip | |
(easy-mmode-defmap): Add doc-string.
| -rw-r--r-- | lisp/emacs-lisp/easy-mmode.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el index b625cb87c0b..12458f3a6b9 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el | |||
| @@ -1,7 +1,7 @@ | |||
| 1 | ;;; easy-mmode.el --- easy definition for major and minor modes | 1 | ;;; easy-mmode.el --- easy definition for major and minor modes |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1997, 2000, 2001, 2002, 2003, 2004, 2005, | 3 | ;; Copyright (C) 1997, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, |
| 4 | ;; 2006, 2007, 2008, 2009 Free Software Foundation, Inc. | 4 | ;; 2008, 2009 Free Software Foundation, Inc. |
| 5 | 5 | ||
| 6 | ;; Author: Georges Brun-Cottan <Georges.Brun-Cottan@inria.fr> | 6 | ;; Author: Georges Brun-Cottan <Georges.Brun-Cottan@inria.fr> |
| 7 | ;; Maintainer: Stefan Monnier <monnier@gnu.org> | 7 | ;; Maintainer: Stefan Monnier <monnier@gnu.org> |
| @@ -452,6 +452,9 @@ Valid keywords and arguments are: | |||
| 452 | 452 | ||
| 453 | ;;;###autoload | 453 | ;;;###autoload |
| 454 | (defmacro easy-mmode-defmap (m bs doc &rest args) | 454 | (defmacro easy-mmode-defmap (m bs doc &rest args) |
| 455 | "Define a constant M whose value is the result of `easy-mmode-define-keymap'. | ||
| 456 | The M, BS, and ARGS arguments are as per that function. DOC is | ||
| 457 | the constant's documentation." | ||
| 455 | `(defconst ,m | 458 | `(defconst ,m |
| 456 | (easy-mmode-define-keymap ,bs nil (if (boundp ',m) ,m) ,(cons 'list args)) | 459 | (easy-mmode-define-keymap ,bs nil (if (boundp ',m) ,m) ,(cons 'list args)) |
| 457 | ,doc)) | 460 | ,doc)) |