From c6a0b8eb25edd26ea22a3f9a649f2f6af999ad09 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Agust=C3=ADn=20Mart=C3=ADn?= Date: Tue, 14 Jan 2014 11:50:28 +0100 Subject: [PATCH] ispell.el (ispell-region): Reset `in-comment' for new line instead of `add-coment' (bug#13577). --- lisp/ChangeLog | 5 +++++ lisp/textmodes/ispell.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 243078ebad4..fc2a295f8c3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-01-14 Agustín Martín Domingo + + * ispell.el (ispell-region): Reset `in-comment' for new line + instead of wrongly reset `add-coment' (bug#13577). + 2014-01-14 Daiki Ueno * epa-file.el (epa-file-write-region): Encode the region according diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index cdc8448d2d1..050938752ca 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -3305,7 +3305,8 @@ ispell-region: Search for first region to skip after (ispell-begin-skip-region-r ispell-start ispell-end (point-at-eol) in-comment add-comment string) (if add-comment ; account for comment chars added (setq ispell-start (- ispell-start (length add-comment)) - add-comment nil)) + ;; Reset `in-comment' (and indirectly `add-comment') for new line + in-comment nil)) (setq ispell-end (point)) ; "end" tracks region retrieved. (if string ; there is something to spell check! ;; (special start end) -- 2.39.2