From: Richard M. Stallman Date: Sat, 4 Sep 2004 19:41:45 +0000 (+0000) Subject: (isearch-lazy-highlight-new-loop): Don't invoke X-Git-Tag: ttn-vms-21-2-B4~5060 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5f3a57c98eb76107524296308020f8db2cd5a4a5;p=emacs.git (isearch-lazy-highlight-new-loop): Don't invoke highlighting if the search string is empty. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f3ccc6f6099..fddb16478f6 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2004-09-04 Richard M. Stallman + + * isearch.el (isearch-lazy-highlight-new-loop): Don't invoke + highlighting if the search string is empty. + 2004-09-04 Luc Teirlinck * facemenu.el (facemenu-active-faces): Change condition of inner diff --git a/lisp/isearch.el b/lisp/isearch.el index 9d1e56aaf6e..572553d816a 100644 --- 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.