From 5f3a57c98eb76107524296308020f8db2cd5a4a5 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 4 Sep 2004 19:41:45 +0000 Subject: [PATCH] (isearch-lazy-highlight-new-loop): Don't invoke highlighting if the search string is empty. --- lisp/ChangeLog | 5 +++++ lisp/isearch.el | 7 ++++--- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f3ccc6f609..fddb16478f 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 9d1e56aaf6..572553d816 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. -- 2.20.1