diff options
| -rw-r--r-- | lisp/dired.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/dired.el b/lisp/dired.el index 34f4ca86d6b..47e413c72d8 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -477,11 +477,11 @@ If DIRNAME is already in a dired buffer, that buffer is used without refresh." ;; alist to be OK. ) (message "Reading directory %s...done" dirname) - (set-buffer-modified-p nil) ;; Must first make alist buffer local and set it to nil because ;; dired-build-subdir-alist will call dired-clear-alist first (set (make-local-variable 'dired-subdir-alist) nil) - (dired-build-subdir-alist)))) + (dired-build-subdir-alist) + (set-buffer-modified-p nil)))) ;; Subroutines of dired-readin |