* lisp/simple.el (command-execute): Move from C. Add obsolete check.

[gnu-emacs] / lisp / isearch.el

diff --git a/lisp/isearch.el b/lisp/isearch.el
index e16e3840d0d944c7dd857177a504e8d560558fc3..31b1918429f123df3aaa32f4a50a3937433c8955 100644 (file)
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -2520,6 +2520,7 @@ Can be changed via `isearch-search-fun-function' for special needs."
       ;; the user adds and removes characters in the search string
       ;; (or when using nonincremental word isearch)
       (let ((lax (not (or isearch-nonincremental
+                         (null (car isearch-cmds))
                          (eq (length isearch-string)
                              (length (isearch--state-string
                                        (car isearch-cmds))))))))