Mercurial > emacs

changeset 62322:78d078c92479

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(define-ibuffer-filter filename): If `dired-directory' is a list, use its car.
author John Paul Wallington <jpw@pobox.com>
date Sat, 14 May 2005 12:55:03 +0000
parents d8390b93c19c
children 402cf3db9550
files lisp/ibuf-ext.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ibuf-ext.el	Sat May 14 12:53:34 2005 +0000
+++ b/lisp/ibuf-ext.el	Sat May 14 12:55:03 2005 +0000
@@ -1024,7 +1024,9 @@
   (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)))