]> code.delx.au - gnu-emacs/blobdiff - lisp/textmodes/ispell.el
Replace still more end-of-line etc with line-end-position, etc.
[gnu-emacs] / lisp / textmodes / ispell.el
index afd39a709e1ca03506557f0dc7b54735a7ab7f5d..9a494897b74f32992cc60e84d3c597e207ea10a2 100644 (file)
@@ -2912,8 +2912,7 @@ Return nil if spell session is quit,
                                     (min skip-region-start ispell-region-end)
                                   (marker-position ispell-region-end))))
              (let* ((ispell-start (point))
-                    (ispell-end (save-excursion
-                                   (end-of-line) (min (point) reg-end)))
+                    (ispell-end (min (point-at-eol) reg-end))
                     (string (ispell-get-line
                               ispell-start ispell-end in-comment)))
                (if in-comment          ; account for comment chars added