# HG changeset patch # User Kim F. Storm # Date 1166232266 0 # Node ID ffe7cd3248415c288209434f5fa0c3de9098e3ca # Parent 8f0230124554e92d9584946eecb3d4c451ad5722 (ido-completion-help): Build ido-cur-list and ido-matches if ido-directory-too-big is set on entry. diff -r 8f0230124554 -r ffe7cd324841 lisp/ido.el --- 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)