mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-07 20:54:32 +00:00
Code Issues Releases Activity

(dired-insert-old-subdirs): Adapt to fact that the R switch is no

Browse Source 
longer stored in `dired-switches-alist'.
This commit is contained in:
Luc Teirlinck 2004-06-10 19:10:09 +00:00
parent 081e43973f
commit f817c0fbc4
1 changed files with 1 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/dired.el
View File

@ -970,14 +970,7 @@ Do so according to the former subdir alist OLD-SUBDIR-ALIST."
(condition-case ()
(progn
(dired-uncache dir)
(dired-insert-subdir dir)
(let ((switches (cdr (assoc-string dir dired-switches-alist))))
(and switches
(string-match "R" switches)
(dolist (cur-ass (copy-sequence old-subdir-alist))
(when (dired-in-this-tree (car cur-ass) dir)
(setq old-subdir-alist
(delete cur-ass old-subdir-alist)))))))
(dired-insert-subdir dir))
(error nil))))))
(defun dired-uncache (dir)