aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKim F. Storm2006-12-16 01:34:10 +0000
committerKim F. Storm2006-12-16 01:34:10 +0000
commit1fd1a9f248f60718bd3f967c12fdb08bc06829b2 (patch)
treedf338a99258e37b71558c4f1d3e33b4d759fa9b2
parentd762e2f00ed7da601be0c64c40b6b2360dc3a342 (diff)
downloademacs-1fd1a9f248f60718bd3f967c12fdb08bc06829b2.tar.gz
emacs-1fd1a9f248f60718bd3f967c12fdb08bc06829b2.zip
(ido-toggle-ignore, ido-completion-help): Print message while
reading big directory.
-rw-r--r--lisp/ido.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ido.el b/lisp/ido.el
index 6a38e0b57de..2d4ac214dd1 100644
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -2589,7 +2589,9 @@ C-x C-f ... C-d enter dired on current directory."
2589 "Toggle ignoring files specified with `ido-ignore-files'." 2589 "Toggle ignoring files specified with `ido-ignore-files'."
2590 (interactive) 2590 (interactive)
2591 (if ido-directory-too-big 2591 (if ido-directory-too-big
2592 (setq ido-directory-too-big nil) 2592 (progn
2593 (message "Reading directory...")
2594 (setq ido-directory-too-big nil))
2593 (setq ido-process-ignore-lists (not ido-process-ignore-lists))) 2595 (setq ido-process-ignore-lists (not ido-process-ignore-lists)))
2594 (setq ido-text-init ido-text) 2596 (setq ido-text-init ido-text)
2595 (setq ido-exit 'refresh) 2597 (setq ido-exit 'refresh)
@@ -3744,6 +3746,7 @@ for first matching file."
3744 (let ((completion-list (sort 3746 (let ((completion-list (sort
3745 (cond 3747 (cond
3746 (ido-directory-too-big 3748 (ido-directory-too-big
3749 (message "Reading directory...")
3747 (setq ido-directory-too-big nil 3750 (setq ido-directory-too-big nil
3748 ido-ignored-list nil 3751 ido-ignored-list nil
3749 ido-cur-list (ido-all-completions) 3752 ido-cur-list (ido-all-completions)