Mercurial > emacs
changeset 74652:ffe7cd324841
(ido-completion-help): Build ido-cur-list and ido-matches
if ido-directory-too-big is set on entry.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Sat, 16 Dec 2006 01:24:26 +0000 |
parents | 8f0230124554 |
children | 37ee2c8294fe |
files | lisp/ido.el |
diffstat | 1 files changed, 9 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ido.el Sat Dec 16 01:24:16 2006 +0000 +++ b/lisp/ido.el Sat Dec 16 01:24:26 2006 +0000 @@ -3729,7 +3729,8 @@ (set-buffer temp-buf) (setq win (get-buffer-window temp-buf)) (if (pos-visible-in-window-p (point-max) win) - (if (or ido-completion-buffer-all-completions (boundp 'ido-completion-buffer-full)) + (if (or ido-completion-buffer-all-completions + (boundp 'ido-completion-buffer-full)) (set-window-start win (point-min)) (with-no-warnings (set (make-local-variable 'ido-completion-buffer-full) t)) @@ -3742,6 +3743,13 @@ (with-output-to-temp-buffer ido-completion-buffer (let ((completion-list (sort (cond + (ido-directory-too-big + (setq ido-directory-too-big nil + ido-ignored-list nil + ido-cur-list (ido-all-completions) + ido-rescan t) + (ido-set-matches) + (or ido-matches ido-cur-list)) (ido-use-merged-list (ido-flatten-merged-list (or ido-matches ido-cur-list))) ((or full-list ido-completion-buffer-all-completions)