Mercurial > emacs
comparison lisp/emacs-lisp/easy-mmode.el @ 106708:fecbb2b5a355
emacs-lisp/easy-mmode.el (define-globalized-minor-mode): Make
the lines in the generated doc string shorter. (Bug#4668)
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Sat, 02 Jan 2010 19:33:54 +0200 |
| parents | 503b88c15efc |
| children | 1d1d5d9bd884 |
comparison
equal
deleted
inserted
replaced
| 106707:51aa25e5e86b | 106708:fecbb2b5a355 |
|---|---|
| 324 `(progn | 324 `(progn |
| 325 (defvar ,MODE-major-mode nil) | 325 (defvar ,MODE-major-mode nil) |
| 326 (make-variable-buffer-local ',MODE-major-mode) | 326 (make-variable-buffer-local ',MODE-major-mode) |
| 327 ;; The actual global minor-mode | 327 ;; The actual global minor-mode |
| 328 (define-minor-mode ,global-mode | 328 (define-minor-mode ,global-mode |
| 329 ;; Very short lines to avoid too long lines in the generated | |
| 330 ;; doc string. | |
| 329 ,(format "Toggle %s in every possible buffer. | 331 ,(format "Toggle %s in every possible buffer. |
| 330 With prefix ARG, turn %s on if and only if ARG is positive. | 332 With prefix ARG, turn %s on if and only if |
| 331 %s is enabled in all buffers where `%s' would do it. | 333 ARG is positive. |
| 334 %s is enabled in all buffers where | |
| 335 \`%s' would do it. | |
| 332 See `%s' for more information on %s." | 336 See `%s' for more information on %s." |
| 333 pretty-name pretty-global-name pretty-name turn-on | 337 pretty-name pretty-global-name pretty-name turn-on |
| 334 mode pretty-name) | 338 mode pretty-name) |
| 335 :global t ,@group ,@(nreverse extra-keywords) | 339 :global t ,@group ,@(nreverse extra-keywords) |
| 336 | 340 |