diff options
| author | Kim F. Storm <storm@cua.dk> | 2006-12-16 01:34:10 +0000 |
|---|---|---|
| committer | Kim F. Storm <storm@cua.dk> | 2006-12-16 01:34:10 +0000 |
| commit | 1fd1a9f248f60718bd3f967c12fdb08bc06829b2 (patch) | |
| tree | df338a99258e37b71558c4f1d3e33b4d759fa9b2 | |
| parent | d762e2f00ed7da601be0c64c40b6b2360dc3a342 (diff) | |
| download | emacs-1fd1a9f248f60718bd3f967c12fdb08bc06829b2.tar.gz | |
(ido-toggle-ignore, ido-completion-help): Print message while
reading big directory.
| -rw-r--r-- | lisp/ido.el | 5 |
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." "Toggle ignoring files specified with `ido-ignore-files'." (interactive) (if ido-directory-too-big - (setq ido-directory-too-big nil) + (progn + (message "Reading directory...") + (setq ido-directory-too-big nil)) (setq ido-process-ignore-lists (not ido-process-ignore-lists))) (setq ido-text-init ido-text) (setq ido-exit 'refresh) @@ -3744,6 +3746,7 @@ for first matching file." (let ((completion-list (sort (cond (ido-directory-too-big + (message "Reading directory...") (setq ido-directory-too-big nil ido-ignored-list nil ido-cur-list (ido-all-completions) |