diff options
| author | Richard M. Stallman <rms@gnu.org> | 2008-12-22 19:28:44 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2008-12-22 19:28:44 +0000 |
| commit | a10374238a31e281ab06b53968398701de7d3191 (patch) | |
| tree | c5372cf1bf41a66bfc7bb51ef915a2b9f280bd3f /lisp/dired.el | |
| parent | 8afbc8ae391edd0f8b8cba42269cf70720d8c843 (diff) | |
| download | emacs-a10374238a31e281ab06b53968398701de7d3191.tar.gz | |
(dired-readin): Inhibit modification hooks.
Diffstat (limited to 'lisp/dired.el')
| -rw-r--r-- | lisp/dired.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/dired.el b/lisp/dired.el index e0e72a1847e..f23c109af1c 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -858,7 +858,11 @@ wildcards, erases the buffer, and builds the subdir-alist anew ;; default-directory and dired-actual-switches must be buffer-local ;; and initialized by now. - (let (dirname) + (let (dirname + ;; This makes readin much much faster. + ;; In particular, it prevents the font lock hook from running + ;; until the directory is all read in. + (inhibit-modification-hooks t)) (if (consp dired-directory) (setq dirname (car dired-directory)) (setq dirname dired-directory)) |