Mercurial > emacs
comparison lisp/textmodes/ispell.el @ 6844:208d3f9f831d
(ispell-message): Turn LIMIT into an integer, around ispell-region.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 13 Apr 1994 05:01:07 +0000 |
parents | 7cd9ecd593d7 |
children | 3632da43b414 |
comparison
equal
deleted
inserted
replaced
6843:7976a0643802 | 6844:208d3f9f831d |
---|---|
1831 (if (< (point) limit) | 1831 (if (< (point) limit) |
1832 ;; Check the next batch of lines that *aren't* cited. | 1832 ;; Check the next batch of lines that *aren't* cited. |
1833 (let ((end (save-excursion | 1833 (let ((end (save-excursion |
1834 (if (re-search-forward cite-regexp-end limit 'end) | 1834 (if (re-search-forward cite-regexp-end limit 'end) |
1835 (match-beginning 0) | 1835 (match-beginning 0) |
1836 limit)))) | 1836 (marker-position limit))))) |
1837 (ispell-region (point) end) | 1837 (ispell-region (point) end) |
1838 (goto-char end))))) | 1838 (goto-char end))))) |
1839 (set-marker limit nil)))) | 1839 (set-marker limit nil)))) |
1840 | 1840 |
1841 (defun ispell-non-empty-string (string) | 1841 (defun ispell-non-empty-string (string) |