diff options
author | Richard M. Stallman <rms@gnu.org> | 1998-02-06 06:12:29 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1998-02-06 06:12:29 +0000 |
commit | 30cf28076a27ae82cfb651aa9a71dfd7e52e91ca (patch) | |
tree | f54541e89ffaf92f313838d8dbde9de36361f5a1 | |
parent | 687d6e7d0b2ffb34db4b0a809a3240b35f2272fa (diff) | |
download | emacs-30cf28076a27ae82cfb651aa9a71dfd7e52e91ca.tar.gz |
(easy-mmode-define-minor-mode): Fix
the doc strings used for the mode flag variable and the keymap.
Delete duplicate &optional's.
-rw-r--r-- | lisp/emacs-lisp/easy-mmode.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el index 866b32ccc8f..dc89416e266 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el @@ -119,8 +119,7 @@ With zero or negative arg turn mode off" (run-hooks ',hook-off))))))) ;;;###autoload -(defmacro easy-mmode-define-minor-mode - (mode doc &optional init-value &optional lighter &optional keymap) +(defmacro easy-mmode-define-minor-mode (mode doc &optional init-value lighter keymap) "Define a new minor mode MODE. This function defines the associated control variable, keymap, toggle command, and hooks (see `easy-mmode-define-toggle'). @@ -132,11 +131,11 @@ If it is a list, it is passed to `easy-mmode-define-keymap' in order to build a valid keymap. \(defmacro easy-mmode-define-minor-mode - (MODE DOC &optional INIT-VALUE &optional LIGHTER &optional KEYMAP)...\)" + (MODE DOC &optional INIT-VALUE LIGHTER KEYMAP)...\)" (let* ((mode-name (symbol-name mode)) - (mode-doc (format "%s mode control switch." mode-name)) + (mode-doc (format "Non-nil if %s mode is enabled.")) (keymap-name (concat mode-name "-map")) - (keymap-doc (format "Keymap activated when %s mode is on." mode-name))) + (keymap-doc (format "Keymap for %s mode." mode-name))) `(progn ;; define the switch (defvar ,mode ,init-value ,mode-doc) |