# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1051969787 0
# Node ID f26c6004759f36bfcb5a5b082466c23561b5e8b5
# Parent  1b22075b3bb50aa319a0222b3e7c7508c4c0680a
(isearch-complete): Update isearch-message.

diff -r 1b22075b3bb5 -r f26c6004759f lisp/isearch.el
--- a/lisp/isearch.el	Sat May 03 13:48:39 2003 +0000
+++ b/lisp/isearch.el	Sat May 03 13:49:47 2003 +0000
@@ -1519,7 +1519,10 @@
 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)))