From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 3 May 2003 13:49:47 +0000 (+0000)
Subject: (isearch-complete): Update isearch-message.
X-Git-Tag: ttn-vms-21-2-B4~10350
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3ae4c5094b90253115d39edb52917809bd33392f;p=emacs.git

(isearch-complete): Update isearch-message.
---

diff --git a/lisp/isearch.el b/lisp/isearch.el
index bb989a73f95..754b7cf6fa1 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1519,7 +1519,10 @@ The completed string is then editable in the minibuffer.
 If there is no completion possible, say so and continue searching."
   (interactive)
   (if (isearch-complete1)
-      (isearch-edit-string)
+      (progn (setq isearch-message
+		   (mapconcat 'isearch-text-char-description
+			      isearch-string ""))
+	     (isearch-edit-string))
     ;; else
     (sit-for 1)
     (isearch-update)))