(dired-insert-subdir): Pass switches to dired-build-subdir-alist.

2 files changed, 9 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e3ce330f8b0..85a8bedf944 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2001-09-21  Eli Zaretskii  <eliz@is.elta.co.il>
+
+        * dired.el (dired-build-subdir-alist): Accept optional arg
+        SWITCHES.
+
+        * dired-aux.el (dired-insert-subdir): Pass switches to
+        dired-build-subdir-alist.
+
 2001-09-21  Stephen Gildea  <gildea@stop.mail-abuse.org>
 
         * time-stamp.el (time-stamp-string-preprocess): Fix bug that
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 398f4652827..5a01ebcc3e5 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -1623,7 +1623,7 @@ This function takes some pains to conform to `ls -lR' output."
       (dired-insert-subdir-newpos dirname)) ; else compute new position
     (dired-insert-subdir-doupdate
      dirname elt (dired-insert-subdir-doinsert dirname switches))
-    (if switches-have-R (dired-build-subdir-alist))
+    (if switches-have-R (dired-build-subdir-alist switches))
     (dired-initial-position dirname)
     (save-excursion (dired-mark-remembered mark-alist))))