diff options
| author | John Paul Wallington <jpw@pobox.com> | 2005-05-14 12:56:18 +0000 |
|---|---|---|
| committer | John Paul Wallington <jpw@pobox.com> | 2005-05-14 12:56:18 +0000 |
| commit | 39c7eb8a6c37fa587b1ad72b79298109647246ef (patch) | |
| tree | e78f1375308c42341c92b4aa28c25ca7e0e36d18 /lisp/ibuf-ext.el | |
| parent | 2baf64db72fc81205da4f097d3905b02510a8375 (diff) | |
| download | emacs-39c7eb8a6c37fa587b1ad72b79298109647246ef.tar.gz | |
(define-ibuffer-filter filename): If `dired-directory' is a list, use its car.
Diffstat (limited to 'lisp/ibuf-ext.el')
| -rw-r--r-- | lisp/ibuf-ext.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el index e2e5d251371..87d9eb707eb 100644 --- a/lisp/ibuf-ext.el +++ b/lisp/ibuf-ext.el @@ -1024,7 +1024,9 @@ currently used by buffers." (ibuffer-awhen (with-current-buffer buf (or buffer-file-name (and (boundp 'dired-directory) - dired-directory + (if (stringp dired-directory) + dired-directory + (car dired-directory)) (expand-file-name dired-directory)))) (string-match qualifier it))) |