(quail-completion): Be sure to scroll quail-completion-buf.
This commit is contained in:
@@ -1,3 +1,8 @@
|
||||
2002-09-23 Kenichi Handa <handa@etl.go.jp>
|
||||
|
||||
* international/quail.el (quail-completion): Be sure to scroll
|
||||
quail-completion-buf.
|
||||
|
||||
2002-09-23 Richard M. Stallman <rms@gnu.org>
|
||||
|
||||
* ielm.el (*1): Fix previous change.
|
||||
|
||||
@@ -2124,7 +2124,10 @@ are shown (at most to the depth specified `quail-completion-max-depth')."
|
||||
;; shown. We just scroll it appropriately.
|
||||
(if (pos-visible-in-window-p (point-max) win)
|
||||
(set-window-start win (point-min))
|
||||
(let ((other-window-scroll-buffer quail-completion-buf))
|
||||
(let ((other-window-scroll-buffer quail-completion-buf)
|
||||
;; This nil binding is necessary to surely scroll
|
||||
;; quail-completion-buf.
|
||||
(minibuffer-scroll-window nil))
|
||||
(scroll-other-window)))
|
||||
(setq quail-current-key key)
|
||||
(erase-buffer)
|
||||
|
||||
Reference in New Issue
Block a user