Mercurial > emacs
changeset 62321:d8390b93c19c
(define-ibuffer-column filename): If `dired-directory' is a list, use its car.
From: Daniel Brockman <daniel@brockman.se> (tiny change)
| author | John Paul Wallington <jpw@pobox.com> |
|---|---|
| date | Sat, 14 May 2005 12:53:34 +0000 |
| parents | 250393a33b15 |
| children | 78d078c92479 |
| files | lisp/ibuffer.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ibuffer.el Sat May 14 12:30:08 2005 +0000 +++ b/lisp/ibuffer.el Sat May 14 12:53:34 2005 +0000 @@ -1688,7 +1688,9 @@ (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