diff options
| -rw-r--r-- | lisp/textmodes/flyspell.el | 14 |
1 files changed, 11 insertions, 3 deletions
diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el index b6c8ac393c6..5726bd82cb9 100644 --- a/lisp/textmodes/flyspell.el +++ b/lisp/textmodes/flyspell.el | |||
| @@ -138,7 +138,9 @@ This variable specifies how far to search to find such a duplicate. | |||
| 138 | "Non-nil means misspelled words remain highlighted until corrected. | 138 | "Non-nil means misspelled words remain highlighted until corrected. |
| 139 | If this variable is nil, only the most recently detected misspelled word | 139 | If this variable is nil, only the most recently detected misspelled word |
| 140 | is highlighted, and the highlight is turned off as soon as point moves | 140 | is highlighted, and the highlight is turned off as soon as point moves |
| 141 | off the misspelled word." | 141 | off the misspelled word. |
| 142 | |||
| 143 | Make sure this variable is non-nil if you use `flyspell-region'." | ||
| 142 | :group 'flyspell | 144 | :group 'flyspell |
| 143 | :type 'boolean) | 145 | :type 'boolean) |
| 144 | 146 | ||
| @@ -1368,7 +1370,10 @@ language." | |||
| 1368 | ;;* flyspell-small-region ... */ | 1370 | ;;* flyspell-small-region ... */ |
| 1369 | ;;*---------------------------------------------------------------------*/ | 1371 | ;;*---------------------------------------------------------------------*/ |
| 1370 | (defun flyspell-small-region (beg end) | 1372 | (defun flyspell-small-region (beg end) |
| 1371 | "Flyspell text between BEG and END." | 1373 | "Flyspell text between BEG and END. |
| 1374 | |||
| 1375 | This function is intended to work on small regions, as | ||
| 1376 | determined by `flyspell-large-region'." | ||
| 1372 | (save-excursion | 1377 | (save-excursion |
| 1373 | (if (> beg end) | 1378 | (if (> beg end) |
| 1374 | (let ((old beg)) | 1379 | (let ((old beg)) |
| @@ -1639,7 +1644,10 @@ The buffer to mark them in is `flyspell-large-region-buffer'." | |||
| 1639 | ;;*---------------------------------------------------------------------*/ | 1644 | ;;*---------------------------------------------------------------------*/ |
| 1640 | ;;;###autoload | 1645 | ;;;###autoload |
| 1641 | (defun flyspell-region (beg end) | 1646 | (defun flyspell-region (beg end) |
| 1642 | "Flyspell text between BEG and END." | 1647 | "Flyspell text between BEG and END. |
| 1648 | |||
| 1649 | Make sure `flyspell-mode' is turned on if you want the highlight | ||
| 1650 | of a misspelled word removed when you've corrected it." | ||
| 1643 | (interactive "r") | 1651 | (interactive "r") |
| 1644 | (ispell-set-spellchecker-params) ; Initialize variables and dicts alists | 1652 | (ispell-set-spellchecker-params) ; Initialize variables and dicts alists |
| 1645 | (if (= beg end) | 1653 | (if (= beg end) |