Better check for displaying completions near the minibuffer.

* lisp/minibuffer.el (minibuffer-completion-help): Compare
selected-window with minibuffer-window to check whether
completions should be displayed near the minibuffer.
http://lists.gnu.org/archive/html/emacs-devel/2014-12/msg00311.html

Fixes: debbugs:17809
This commit is contained in:
Juri Linkov 2014-12-06 01:42:11 +02:00
parent 7409a79b1b
commit 0ffa34951a
2 changed files with 10 additions and 7 deletions

View file

@ -1,3 +1,10 @@
2014-12-05 Juri Linkov <juri@linkov.net>
* minibuffer.el (minibuffer-completion-help): Compare
selected-window with minibuffer-window to check whether
completions should be displayed near the minibuffer. (Bug#17809)
http://lists.gnu.org/archive/html/emacs-devel/2014-12/msg00311.html
2014-12-05 Michael Albinus <michael.albinus@gmx.de>
* vc/vc-mtn.el (vc-mtn-root):

View file

@ -1815,13 +1815,9 @@ variables.")
;; Use `display-buffer-below-selected' for inline completions,
;; but not in the minibuffer (e.g. in `eval-expression')
;; for which `display-buffer-at-bottom' is used.
;; Compare `this-command' with `completion-at-point'
;; since `completion--in-region-1' sets `this-command'
;; to this value for region completion commands.
,(if (and (eq this-command 'completion-at-point)
(not (minibuffer-selected-window)))
'display-buffer-below-selected
'display-buffer-at-bottom))
,(if (eq (selected-window) (minibuffer-window))
'display-buffer-at-bottom
'display-buffer-below-selected))
(window-height . fit-window-to-buffer))
nil
;; Remove the base-size tail because `sort' requires a properly