Mercurial > emacs

changeset 15312:d425f28aff41

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ispell-region): Handle ispell-skip-sgml properly with an re-search.
author Richard M. Stallman <rms@gnu.org>
date Fri, 31 May 1996 20:12:44 +0000
parents a9ed91ec0700
children 0fad77a676b7
files lisp/textmodes/ispell.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/ispell.el	Fri May 31 20:10:02 1996 +0000
+++ b/lisp/textmodes/ispell.el	Fri May 31 20:12:44 1996 +0000
@@ -1700,7 +1700,7 @@
 			   (re-search-forward ispell-tib-ref-beginning end t)
 			   (setq ref-type 'tib))
 		      (and ispell-skip-sgml
-			   (search-forward "[<&]" end t)
+			   (re-search-forward "[<&]" end t)
 			   (setq ref-type 'sgml)))
 		  (if (or (and (eq 'tib ref-type) ; tib tag is 2 chars.
 			       (= (- (point) 2) start))
@@ -1714,7 +1714,7 @@
 			    (not
 			     (re-search-forward ispell-tib-ref-end reg-end t)))
 			   (and (eq 'sgml ref-type)
-				(not (search-forward "[>;]" reg-end t))))
+				(not (re-search-forward "[>;]" reg-end t))))
 			  (progn
 			    (ispell-pdict-save ispell-silently-savep)
 			    (ding)