summaryrefslogtreecommitdiff
path: root/lisp/isearch.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2003-05-03 13:49:47 +0000
committerRichard M. Stallman <rms@gnu.org>2003-05-03 13:49:47 +0000
commit3ae4c5094b90253115d39edb52917809bd33392f (patch)
treeda1e1633e6d5f0230e4a1b333bcc54ccd4e9f382 /lisp/isearch.el
parent9f243b0d3d1b7583cfe72a564f61c39211f49da9 (diff)
downloademacs-3ae4c5094b90253115d39edb52917809bd33392f.tar.gz
(isearch-complete): Update isearch-message.
Diffstat (limited to 'lisp/isearch.el')
-rw-r--r--lisp/isearch.el5
1 files changed, 4 insertions, 1 deletions
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)))