diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/international/quail.el | 5 |
2 files changed, 9 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b00af99ad7e..9f58dcccddc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -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. diff --git a/lisp/international/quail.el b/lisp/international/quail.el index d0017e8bf21..f56200b555a 100644 --- a/lisp/international/quail.el +++ b/lisp/international/quail.el @@ -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) |