diff options
| author | Richard M. Stallman | 2003-09-30 20:46:04 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2003-09-30 20:46:04 +0000 |
| commit | 86e6e4b3f6954469ea69c8ab59e2922c09f062a5 (patch) | |
| tree | 3ccd9153a4cc18c3a6269fbb88ccae5f4276f1a6 | |
| parent | 5ee8b21202f7ab531aa1d88a3909d8068ffe426e (diff) | |
| download | emacs-86e6e4b3f6954469ea69c8ab59e2922c09f062a5.tar.gz emacs-86e6e4b3f6954469ea69c8ab59e2922c09f062a5.zip | |
(dired-mode): Handle dired-directory as a list.
| -rw-r--r-- | lisp/dired.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/dired.el b/lisp/dired.el index 8919b7c97ca..c3c4188aba7 100644 --- a/lisp/dired.el +++ b/lisp/dired.el | |||
| @@ -1285,7 +1285,9 @@ Keybindings: | |||
| 1285 | (or dirname default-directory)) | 1285 | (or dirname default-directory)) |
| 1286 | ;; list-buffers uses this to display the dir being edited in this buffer. | 1286 | ;; list-buffers uses this to display the dir being edited in this buffer. |
| 1287 | (set (make-local-variable 'list-buffers-directory) | 1287 | (set (make-local-variable 'list-buffers-directory) |
| 1288 | (expand-file-name dired-directory)) | 1288 | (expand-file-name (if (listp dired-directory) |
| 1289 | (car dired-directory) | ||
| 1290 | dired-directory))) | ||
| 1289 | (set (make-local-variable 'dired-actual-switches) | 1291 | (set (make-local-variable 'dired-actual-switches) |
| 1290 | (or switches dired-listing-switches)) | 1292 | (or switches dired-listing-switches)) |
| 1291 | (set (make-local-variable 'font-lock-defaults) '(dired-font-lock-keywords t)) | 1293 | (set (make-local-variable 'font-lock-defaults) '(dired-font-lock-keywords t)) |