diff options
| author | John Paul Wallington <jpw@pobox.com> | 2005-05-14 12:53:34 +0000 |
|---|---|---|
| committer | John Paul Wallington <jpw@pobox.com> | 2005-05-14 12:53:34 +0000 |
| commit | 2baf64db72fc81205da4f097d3905b02510a8375 (patch) | |
| tree | 460477cd0ca434d58a3257ba450649d68fba848c /lisp/ibuffer.el | |
| parent | 11efeb9b266026c10757f0fb68c88e6d3a9c3625 (diff) | |
| download | emacs-2baf64db72fc81205da4f097d3905b02510a8375.tar.gz | |
(define-ibuffer-column filename): If `dired-directory' is a list, use its car.
From: Daniel Brockman <daniel@brockman.se> (tiny change)
Diffstat (limited to 'lisp/ibuffer.el')
| -rw-r--r-- | lisp/ibuffer.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el index f2ebb5db324..213160b6f37 100644 --- a/lisp/ibuffer.el +++ b/lisp/ibuffer.el @@ -1688,7 +1688,9 @@ If point is on a group name, this function operates on that group." (abbreviate-file-name (or buffer-file-name (and (boundp 'dired-directory) - dired-directory) + (if (stringp dired-directory) + dired-directory + (car dired-directory))) "")))) (define-ibuffer-column filename-and-process |