From 20db48089b660a27c04d05b3d3931d5af65e404f Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Tue, 20 Mar 2018 17:15:39 -0400 Subject: [PATCH] * lisp/isearch.el (isearch-pre-command-hook): Replace cl-lib function. As a preloaded file, isearch.el cannot require cl-lib at runtime. --- lisp/isearch.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/isearch.el b/lisp/isearch.el index 84b121af9ef..aa6acfd0c82 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -2441,7 +2441,7 @@ See more for options in `search-exit-option'." (setq isearch-pre-move-point (point))) ;; Append control characters to the search string ((eq search-exit-option 'append) - (when (cl-every #'characterp key) + (unless (memq nil (mapcar (lambda (k) (characterp k)) key)) (isearch-process-search-string key key)) (setq this-command 'ignore)) ;; Other characters terminate the search and are then executed normally. -- 2.39.5