1285 |
(or dirname default-directory)) |
(or dirname default-directory)) |
1286 |
;; list-buffers uses this to display the dir being edited in this buffer. |
;; list-buffers uses this to display the dir being edited in this buffer. |
1287 |
(set (make-local-variable 'list-buffers-directory) |
(set (make-local-variable 'list-buffers-directory) |
1288 |
(expand-file-name dired-directory)) |
(expand-file-name (if (listp dired-directory) |
1289 |
|
(car dired-directory) |
1290 |
|
dired-directory))) |
1291 |
(set (make-local-variable 'dired-actual-switches) |
(set (make-local-variable 'dired-actual-switches) |
1292 |
(or switches dired-listing-switches)) |
(or switches dired-listing-switches)) |
1293 |
(set (make-local-variable 'font-lock-defaults) '(dired-font-lock-keywords t)) |
(set (make-local-variable 'font-lock-defaults) '(dired-font-lock-keywords t)) |