summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2005-08-25 10:58:48 +0000
committerRichard M. Stallman <rms@gnu.org>2005-08-25 10:58:48 +0000
commit40c7f2563be53e87882095a5f4aed4da6564685c (patch)
tree5beca372d4f04e7fb98bf1be8022640d5de9c94a /lisp
parent5a3232180faad7ac8fd6bf551f38b0419fd37bbc (diff)
downloademacs-40c7f2563be53e87882095a5f4aed4da6564685c.tar.gz
emacs-40c7f2563be53e87882095a5f4aed4da6564685c.tar.bz2
emacs-40c7f2563be53e87882095a5f4aed4da6564685c.zip
(isearch-edit-string): Erase the Search prompt
if user enters an empty string and there is no default.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/isearch.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el
index f3fc51778e9..9e396f27545 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1072,7 +1072,11 @@ If first char entered is \\[isearch-yank-word-or-char], then do word search inst
(if isearch-nonincremental
(progn
;; (sit-for 1) ;; needed if isearch-done does: (message "")
- (isearch-done))))
+ (isearch-done)
+ ;; The search done message is confusing when the string
+ ;; is empty, so erase it.
+ (if (equal isearch-string "")
+ (message "")))))
(quit ; handle abort-recursive-edit
(isearch-abort) ;; outside of let to restore outside global values