From: Karl Heuer Date: Sat, 20 Jun 1998 21:37:14 +0000 (+0000) Subject: (ispell-skip-region): Don't complain when X-Git-Tag: emacs-20.3~553 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7a914d3e79134444817aa552d707f9e286b2c26d;p=emacs.git (ispell-skip-region): Don't complain when ispell-check-comments is 'exclusive and there are no more comments. Just skip to the end instead. --- diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index ab77a6ceab1..080c221a48e 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -2059,7 +2059,7 @@ Return non-nil if not aborted." (search-forward comment-end ispell-region-end t))) ((and (eq 'exclusive ispell-check-comments) comment-start (string= key comment-end)) - (search-forward comment-start ispell-region-end t)) + (search-forward comment-start ispell-region-end :end)) ((and ispell-skip-tib (string-match ispell-tib-ref-beginning key)) (re-search-forward ispell-tib-ref-end ispell-region-end t)) ((and ispell-skip-sgml (string-match "<" key))