diff options
| author | Kim F. Storm | 2006-12-16 01:34:10 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2006-12-16 01:34:10 +0000 |
| commit | 1fd1a9f248f60718bd3f967c12fdb08bc06829b2 (patch) | |
| tree | df338a99258e37b71558c4f1d3e33b4d759fa9b2 | |
| parent | d762e2f00ed7da601be0c64c40b6b2360dc3a342 (diff) | |
| download | emacs-1fd1a9f248f60718bd3f967c12fdb08bc06829b2.tar.gz emacs-1fd1a9f248f60718bd3f967c12fdb08bc06829b2.zip | |
(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." | |||
| 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) |