# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1008474795 0
# Node ID 6612a220ef841be8245de148a41d004a0502f0af
# Parent  2598d485c9a11315b7bd3334bc95254e4bfc6237
(isearch-edit-string):
Treat isearch-yank-word-or-char specially, like isearch-yank-word.

diff -r 2598d485c9a1 -r 6612a220ef84 lisp/isearch.el
--- a/lisp/isearch.el	Sun Dec 16 03:53:05 2001 +0000
+++ b/lisp/isearch.el	Sun Dec 16 03:53:15 2001 +0000
@@ -847,8 +847,9 @@
 		;; Word search does not apply (yet) to regexp searches,
 		;; no check is made here.
 		(message (isearch-message-prefix nil nil t))
-		(if (eq 'isearch-yank-word
-			(lookup-key isearch-mode-map (vector e)))
+		(if (memq (lookup-key isearch-mode-map (vector e))
+			  '(isearch-yank-word
+			    isearch-yank-word-or-char))
 		    (setq isearch-word t;; so message-prefix is right
 			  isearch-new-word t)
 		  (cancel-kbd-macro-events)