diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/textmodes/ispell.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 68acd165bdc..268bd76bbd9 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -1991,7 +1991,12 @@ you can bind this to the key C-c i in GNUS or mail by adding to ;; Skip across text cited from other messages. (while (and (looking-at cite-regexp-start) (< (point) limit)) - (forward-line 1)) + (let ((point1 (point))) + (forward-line 1) + ;; If there's no next line, go to the end of this one + ;; so that the loop stops looping. + (if (eq point1 (point)) + (end-of-line)))) (if (< (point) limit) ;; Check the next batch of lines that *aren't* cited. (let ((end (save-excursion |