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

longer stored in `dired-switches-alist'.

diff --git a/lisp/dired.el b/lisp/dired.el
index f206b03cd266262761d3ab824e273bcb8443ea67..3d3fd34b5ac5d61afcc4a8c99134c18587e95a73 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -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)