mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00
Code Issues Releases Activity

(dired-do-redisplay): Call dired-uncache.

Browse Source
This commit is contained in:
Richard M. Stallman 1995-06-20 15:31:30 +00:00
parent 4ba58dd446
commit 00aa3651f6
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/dired-aux.el
View File

@ -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))