(isearch-lazy-highlight-new-loop): Don't invoke

highlighting if the search string is empty.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f3ccc6f60999360186803711eb4120d4ae27a469..fddb16478f6820d3737dc44e8f109c46c1effab8 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-09-04  Richard M. Stallman  <rms@gnu.org>
+
+       * isearch.el (isearch-lazy-highlight-new-loop): Don't invoke
+       highlighting if the search string is empty.
+
 2004-09-04  Luc Teirlinck  <teirllm@auburn.edu>
 
        * facemenu.el (facemenu-active-faces): Change condition of inner

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 9d1e56aaf6e06631be9e24cdc9f9526219807ccd..572553d816afed8e672da666cc6176990e111f5d 100644 (file)
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -2362,9 +2362,10 @@ search string to change or the window to scroll)."
            isearch-lazy-highlight-case-fold-search isearch-case-fold-search
            isearch-lazy-highlight-regexp       isearch-regexp
             isearch-lazy-highlight-wrapped      nil)
-      (setq isearch-lazy-highlight-timer
-            (run-with-idle-timer isearch-lazy-highlight-initial-delay nil
-                                 'isearch-lazy-highlight-update)))))
+      (unless (equal isearch-string "")
+       (setq isearch-lazy-highlight-timer
+             (run-with-idle-timer isearch-lazy-highlight-initial-delay nil
+                                  'isearch-lazy-highlight-update))))))
 
 (defun isearch-lazy-highlight-search ()
   "Search ahead for the next or previous match, for lazy highlighting.