* lisp/isearch.el (isearch-lazy-highlight-search): Fix looping

by checking for empty match.  This syncs this loop with the
similar loop in `isearch-search'.  (Bug#6362)

2 files changed, 8 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8cd1cd39739..1ab291709f1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2010-06-06  Juri Linkov  <juri@jurta.org>
+
+        * isearch.el (isearch-lazy-highlight-search): Fix looping
+        by checking for empty match.  This syncs this loop with the
+        similar loop in `isearch-search'.  (Bug#6362)
+
 2010-06-05  Dan Nicolaescu  <dann@ics.uci.edu>
 
         vc-log-incoming/vc-log-outgoing fixes for Git.
diff --git a/lisp/isearch.el b/lisp/isearch.el
index ea5836edc4d..89d50d66c76 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -2667,6 +2667,8 @@ Attempt to do the search exactly the way the pending Isearch would."
           ;; Clear RETRY unless the search predicate says
           ;; to skip this search hit.
           (if (or (not success)
+                  (= (point) bound) ; like (bobp) (eobp) in `isearch-search'.
+                  (= (match-beginning 0) (match-end 0))
                   (funcall isearch-filter-predicate
                            (match-beginning 0) (match-end 0)))
               (setq retry nil)))