aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKenichi Handa2000-06-16 12:11:14 +0000
committerKenichi Handa2000-06-16 12:11:14 +0000
commit26e6bfef35932110f82084da85a0f62320749d29 (patch)
tree18dc0424fa8a0a7693bbde7d1abe787ade9499d1
parent1699f9914b0b9915428002e3708b43e87bb619f9 (diff)
downloademacs-26e6bfef35932110f82084da85a0f62320749d29.tar.gz
emacs-26e6bfef35932110f82084da85a0f62320749d29.zip
(quail-show-guidance-buf): To find the bottom window (but minibuffer),
pay attention to the height of minibuffer.
-rw-r--r--lisp/international/quail.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index c7e2da541f7..8cc46ce1bfd 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -1549,7 +1549,8 @@ or in a newly created frame (if the selected frame has no other windows)."
1549 (quail-make-guidance-frame quail-guidance-buf) 1549 (quail-make-guidance-frame quail-guidance-buf)
1550 ;; Find the bottom window and split it if necessary. 1550 ;; Find the bottom window and split it if necessary.
1551 (let (height) 1551 (let (height)
1552 (setq win (window-at 0 (- (frame-height) 2))) 1552 (setq win (window-at
1553 0 (1- (- (frame-height) (window-height win)))))
1553 (setq height (window-height win)) 1554 (setq height (window-height win))
1554 ;; If WIN is tall enough, split it vertically and use 1555 ;; If WIN is tall enough, split it vertically and use
1555 ;; the lower one. 1556 ;; the lower one.