procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(lisp-complete-symbol):

Browse source 
Use `minibuffer-message' to display message "No completions of %s"
when this command is called in the minibuffer.
This commit is contained in:
Juri Linkov 2008-03-22 00:11:53 +00:00
parent df27f31fa6
commit ec800cf0a2
2 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/lisp.el
View file

@ -667,7 +667,9 @@ considered."
(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)