diff options
| author | Richard M. Stallman | 1998-05-13 01:46:28 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-05-13 01:46:28 +0000 |
| commit | 2157be68a72da843901b0cc9ebf3aa40eb7debe7 (patch) | |
| tree | c0a6c712a18da5aeb2044a191db79bcfac033e4f | |
| parent | 669c6673fc321b34b052f0d1962545d439a4de88 (diff) | |
| download | emacs-2157be68a72da843901b0cc9ebf3aa40eb7debe7.tar.gz emacs-2157be68a72da843901b0cc9ebf3aa40eb7debe7.zip | |
(type-break-mode-line-message-mode): Doc fix. Fix some messages.
(type-break-mode): Doc fix.
| -rw-r--r-- | lisp/type-break.el | 36 |
1 files changed, 18 insertions, 18 deletions
diff --git a/lisp/type-break.el b/lisp/type-break.el index 2e0025ce888..0c34b32fc64 100644 --- a/lisp/type-break.el +++ b/lisp/type-break.el | |||
| @@ -8,7 +8,7 @@ | |||
| 8 | ;; Status: Works in GNU Emacs 19.25 or later, some versions of XEmacs | 8 | ;; Status: Works in GNU Emacs 19.25 or later, some versions of XEmacs |
| 9 | ;; Created: 1994-07-13 | 9 | ;; Created: 1994-07-13 |
| 10 | 10 | ||
| 11 | ;; $Id: type-break.el,v 1.14 1998/03/14 04:47:44 rms Exp done $ | 11 | ;; $Id: type-break.el,v 1.15 1998/04/20 02:43:44 done Exp rms $ |
| 12 | 12 | ||
| 13 | ;; This file is part of GNU Emacs. | 13 | ;; This file is part of GNU Emacs. |
| 14 | 14 | ||
| @@ -76,7 +76,7 @@ | |||
| 76 | 76 | ||
| 77 | ;;;###autoload | 77 | ;;;###autoload |
| 78 | (defcustom type-break-mode nil | 78 | (defcustom type-break-mode nil |
| 79 | "*Non-`nil' means typing break mode is enabled. | 79 | "*Non-nil means typing break mode is enabled. |
| 80 | See the docstring for the `type-break-mode' command for more information. | 80 | See the docstring for the `type-break-mode' command for more information. |
| 81 | You must modify via \\[customize] for this variable to have an effect." | 81 | You must modify via \\[customize] for this variable to have an effect." |
| 82 | :set (lambda (symbol value) | 82 | :set (lambda (symbol value) |
| @@ -346,19 +346,19 @@ approximate good values for this. | |||
| 346 | There are several variables that affect how or when warning messages about | 346 | There are several variables that affect how or when warning messages about |
| 347 | imminent typing breaks are displayed. They include: | 347 | imminent typing breaks are displayed. They include: |
| 348 | 348 | ||
| 349 | type-break-mode-line-message-mode | 349 | `type-break-mode-line-message-mode' |
| 350 | type-break-time-warning-intervals | 350 | `type-break-time-warning-intervals' |
| 351 | type-break-keystroke-warning-intervals | 351 | `type-break-keystroke-warning-intervals' |
| 352 | type-break-warning-repeat | 352 | `type-break-warning-repeat' |
| 353 | type-break-warning-countdown-string | 353 | `type-break-warning-countdown-string' |
| 354 | type-break-warning-countdown-string-type | 354 | `type-break-warning-countdown-string-type' |
| 355 | 355 | ||
| 356 | There are several variables that affect if, how, and when queries to begin | 356 | There are several variables that affect if, how, and when queries to begin |
| 357 | a typing break occur. They include: | 357 | a typing break occur. They include: |
| 358 | 358 | ||
| 359 | type-break-query-mode | 359 | `type-break-query-mode' |
| 360 | type-break-query-function | 360 | `type-break-query-function' |
| 361 | type-break-query-interval | 361 | `type-break-query-interval' |
| 362 | 362 | ||
| 363 | Finally, the command `type-break-statistics' prints interesting things." | 363 | Finally, the command `type-break-statistics' prints interesting things." |
| 364 | (interactive "P") | 364 | (interactive "P") |
| @@ -370,7 +370,7 @@ Finally, the command `type-break-statistics' prints interesting things." | |||
| 370 | (cond | 370 | (cond |
| 371 | ((and already-enabled type-break-mode) | 371 | ((and already-enabled type-break-mode) |
| 372 | (and (interactive-p) | 372 | (and (interactive-p) |
| 373 | (message "type-break-mode is already enabled"))) | 373 | (message "Type Break mode is already enabled"))) |
| 374 | (type-break-mode | 374 | (type-break-mode |
| 375 | (or global-mode-string | 375 | (or global-mode-string |
| 376 | (setq global-mode-string '(""))) | 376 | (setq global-mode-string '(""))) |
| @@ -383,13 +383,13 @@ Finally, the command `type-break-statistics' prints interesting things." | |||
| 383 | (type-break-mode-line-countdown-or-break nil) | 383 | (type-break-mode-line-countdown-or-break nil) |
| 384 | (type-break-schedule) | 384 | (type-break-schedule) |
| 385 | (and (interactive-p) | 385 | (and (interactive-p) |
| 386 | (message "type-break-mode is enabled and reset"))) | 386 | (message "Type Break mode is enabled and reset"))) |
| 387 | (t | 387 | (t |
| 388 | (type-break-keystroke-reset) | 388 | (type-break-keystroke-reset) |
| 389 | (type-break-mode-line-countdown-or-break nil) | 389 | (type-break-mode-line-countdown-or-break nil) |
| 390 | (type-break-cancel-schedule) | 390 | (type-break-cancel-schedule) |
| 391 | (and (interactive-p) | 391 | (and (interactive-p) |
| 392 | (message "type-break-mode is disabled"))))) | 392 | (message "Type Break mode is disabled"))))) |
| 393 | type-break-mode) | 393 | type-break-mode) |
| 394 | 394 | ||
| 395 | (defun type-break-mode-line-message-mode (&optional prefix) | 395 | (defun type-break-mode-line-message-mode (&optional prefix) |
| @@ -403,10 +403,10 @@ variable of the same name. | |||
| 403 | 403 | ||
| 404 | Variables controlling the display of messages in the mode line include: | 404 | Variables controlling the display of messages in the mode line include: |
| 405 | 405 | ||
| 406 | mode-line-format | 406 | `mode-line-format' |
| 407 | global-mode-string | 407 | `global-mode-string' |
| 408 | type-break-mode-line-break-message | 408 | `type-break-mode-line-break-message' |
| 409 | type-break-mode-line-warning" | 409 | `type-break-mode-line-warning'" |
| 410 | (interactive "P") | 410 | (interactive "P") |
| 411 | (setq type-break-mode-line-message-mode | 411 | (setq type-break-mode-line-message-mode |
| 412 | (>= (prefix-numeric-value prefix) 0)) | 412 | (>= (prefix-numeric-value prefix) 0)) |