summaryrefslogtreecommitdiff
path: root/lisp/dired-aux.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-06-20 15:31:30 +0000
committerRichard M. Stallman <rms@gnu.org>1995-06-20 15:31:30 +0000
commit00aa3651f66010576b6c348215c8e1eb6ba40ae7 (patch)
treea643685da2aca1dc0ec8f6f85c6c4caa5ecff3e9 /lisp/dired-aux.el
parent4ba58dd446705021c10dbf050d5443df3e6085e5 (diff)
downloademacs-00aa3651f66010576b6c348215c8e1eb6ba40ae7.tar.gz
(dired-do-redisplay): Call dired-uncache.
Diffstat (limited to 'lisp/dired-aux.el')
-rw-r--r--lisp/dired-aux.el2
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))