procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(define-minor-mode): Docstring fix.

Browse source
This commit is contained in:
Stefan Monnier 2001-01-25 15:31:14 +00:00
parent 7acd9c90e9
commit a2ed96700b
2 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,3 +1,7 @@
2001-01-25 Stefan Monnier <monnier@cs.yale.edu>
* emacs-lisp/easy-mmode.el (define-minor-mode): Docstring fix.
2001-01-25 Dave Love <fx@gnu.org> 2001-01-25 Dave Love <fx@gnu.org>
* loadup.el: Preload international/ccl for utf-8. * loadup.el: Preload international/ccl for utf-8.

4
lisp/emacs-lisp/easy-mmode.el
View file

@ -144,14 +144,14 @@ BODY contains code that will be executed each time the mode is (dis)activated.
,(if (not globalp) ,(if (not globalp)
`(progn `(progn
(defvar ,mode ,init-value ,(format "Non-nil if %s is enabled. (defvar ,mode ,init-value ,(format "Non-nil if %s is enabled.
Use the function `%s' to change this variable." pretty-name mode)) Use the command `%s' to change this variable." pretty-name mode))
(make-variable-buffer-local ',mode)) (make-variable-buffer-local ',mode))
(let ((curfile (or (and (boundp 'byte-compile-current-file) (let ((curfile (or (and (boundp 'byte-compile-current-file)
byte-compile-current-file) byte-compile-current-file)
load-file-name))) load-file-name)))
`(defcustom ,mode ,init-value `(defcustom ,mode ,init-value
,(format "Toggle %s on or off. ,(format "Non-nil if %s is enabled.
See the command `%s' for a description of this minor-mode. See the command `%s' for a description of this minor-mode.
Setting this variable directly does not take effect; Setting this variable directly does not take effect;
use either \\[customize] or the function `%s'." use either \\[customize] or the function `%s'."