diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/international/quail.el | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/lisp/international/quail.el b/lisp/international/quail.el index 40357e5cbf..69028b7113 100644 --- a/lisp/international/quail.el +++ b/lisp/international/quail.el @@ -1972,15 +1972,15 @@ or in a newly created frame (if the selected frame has no other windows)." (set-buffer quail-guidance-buf) (erase-buffer) (insert key))))) - ;; Make sure the height of the guidance window is OK -- - ;; sometimes, if the minibuffer window expands due to user - ;; input (for instance if the newly inserted character is in a - ;; different font), it will cause the guidance window to be - ;; only partially visible. We force a redisplay first because - ;; this automatic expansion doesn't happen until then, and we - ;; want to see the window sizes after the expansion. - (sit-for 0) - (fit-window-to-buffer quail-guidance-win nil 1)))) + ;; Make sure the height of the guidance window is OK -- + ;; sometimes, if the minibuffer window expands due to user + ;; input (for instance if the newly inserted character is in a + ;; different font), it will cause the guidance window to be + ;; only partially visible. We force a redisplay first because + ;; this automatic expansion doesn't happen until then, and we + ;; want to see the window sizes after the expansion. + (sit-for 0) + (fit-window-to-buffer quail-guidance-win nil 1))) ;; Update completion buffer if displayed now. We highlight the ;; selected candidate string in *Completion* buffer if any. |