mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-22 14:01:47 -07:00
Code Issues Projects Releases Wiki Activity

(dired-revert): Turn off dired-after-readin-hook around call to dired-readin.

Browse source
This commit is contained in:
Richard M. Stallman 2006-12-04 00:32:00 +00:00
parent 49bb7f019f
commit 6a80f50e17
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/dired.el
View file

@ -1045,9 +1045,9 @@ Preserves old cursor, marks/flags, hidden-p."
;; treat top level dir extra (it may contain wildcards)
(dired-uncache
(if (consp dired-directory) (car dired-directory) dired-directory))
(dired-readin)
;; Run dired-after-readin-hook just once, below.
(let ((dired-after-readin-hook nil))
;; don't run that hook for each subdir...
(dired-readin)
(dired-insert-old-subdirs old-subdir-alist))
(dired-mark-remembered mark-alist) ; mark files that were marked
;; ... run the hook for the whole buffer, and only after markers