Mercurial > emacs
changeset 93138:30f72c1f8238
(lisp-complete-symbol):
Use `minibuffer-message' to display message "No completions of %s"
when this command is called in the minibuffer.
| author | Juri Linkov <juri@jurta.org> |
|---|---|
| date | Sat, 22 Mar 2008 00:10:59 +0000 |
| parents | 59d389acc0ce |
| children | 37da65d7be95 |
| files | lisp/emacs-lisp/lisp.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/lisp.el Sat Mar 22 00:02:24 2008 +0000 +++ b/lisp/emacs-lisp/lisp.el Sat Mar 22 00:10:59 2008 +0000 @@ -667,7 +667,9 @@ (completion (try-completion pattern obarray predicate))) (cond ((eq completion t)) ((null completion) - (message "Can't find completion for \"%s\"" pattern) + (if (window-minibuffer-p (selected-window)) + (minibuffer-message (format " [No completions of \"%s\"]" pattern)) + (message "Can't find completion for \"%s\"" pattern)) (ding)) ((not (string= pattern completion)) (delete-region beg end)