# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1064954764 0
# Node ID 7ba748e3346eda9ea62a8acb86cce99eb38e6bda
# Parent  608e17bad2e237c7c9506a3cd898c67f44399cd4
(dired-mode): Handle dired-directory as a list.

diff -r 608e17bad2e2 -r 7ba748e3346e lisp/dired.el
--- a/lisp/dired.el	Tue Sep 30 20:44:24 2003 +0000
+++ b/lisp/dired.el	Tue Sep 30 20:46:04 2003 +0000
@@ -1285,7 +1285,9 @@
        (or dirname default-directory))
   ;; list-buffers uses this to display the dir being edited in this buffer.
   (set (make-local-variable 'list-buffers-directory)
-       (expand-file-name dired-directory))
+       (expand-file-name (if (listp dired-directory)
+			     (car dired-directory)
+			   dired-directory)))
   (set (make-local-variable 'dired-actual-switches)
        (or switches dired-listing-switches))
   (set (make-local-variable 'font-lock-defaults) '(dired-font-lock-keywords t))