diff options
| -rw-r--r-- | lisp/ido.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/ido.el b/lisp/ido.el index 134081d6759..520513b1d29 100644 --- a/lisp/ido.el +++ b/lisp/ido.el @@ -3966,7 +3966,7 @@ If `ido-change-word-sub' cannot be found in WORD, return nil." (if (and (eq last-command this-command) temp-buf) ;; scroll buffer (let (win (buf (current-buffer))) - (display-buffer temp-buf nil nil) + (display-buffer temp-buf) (set-buffer temp-buf) (setq win (get-buffer-window temp-buf)) (if (pos-visible-in-window-p (point-max) win) @@ -3981,7 +3981,10 @@ If `ido-change-word-sub' cannot be found in WORD, return nil." (set-buffer buf)) (setq display-it t)) (if (and ido-completion-buffer display-it) - (with-output-to-temp-buffer ido-completion-buffer + (with-temp-buffer-window ido-completion-buffer + '((display-buffer-reuse-window display-buffer-at-bottom) + (window-height . fit-window-to-buffer)) + nil (let* ((comps (cond (ido-directory-too-big |