diff options
author | Richard M. Stallman <rms@gnu.org> | 1995-06-20 15:31:30 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1995-06-20 15:31:30 +0000 |
commit | 00aa3651f66010576b6c348215c8e1eb6ba40ae7 (patch) | |
tree | a643685da2aca1dc0ec8f6f85c6c4caa5ecff3e9 /lisp/dired-aux.el | |
parent | 4ba58dd446705021c10dbf050d5443df3e6085e5 (diff) | |
download | emacs-00aa3651f66010576b6c348215c8e1eb6ba40ae7.tar.gz |
(dired-do-redisplay): Call dired-uncache.
Diffstat (limited to 'lisp/dired-aux.el')
-rw-r--r-- | lisp/dired-aux.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index 9d93f9a541a..e4b96689d0d 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el @@ -693,6 +693,8 @@ a prefix arg lets you edit the `ls' switches used for the new listing." (if arg (read-string "Switches for listing: " dired-actual-switches))) (message "Redisplaying...") ;; message much faster than making dired-map-over-marks show progress + (dired-uncache + (if (consp dired-directory) (car dired-directory) dired-directory)) (dired-map-over-marks (let ((fname (dired-get-filename))) (message "Redisplaying... %s" fname) (dired-update-file-line fname)) |