* 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)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8cd1cd397390146a9bb6040a8dd6b9ba31025a65..1ab291709f1b95246b4851f16a6dbf6f0692c630 100644 (file)
--- 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 ea5836edc4d8734e82d126fa1bd30b2954c1879f..89d50d66c76806fbab30e46518083c258d327005 100644 (file)
--- 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)))