# HG changeset patch
# User John Paul Wallington <jpw@pobox.com>
# Date 1116075303 0
# Node ID 78d078c92479dcb5a11d153aac42724fc683a995
# Parent  d8390b93c19c6a0618e088be4be3e9c9bdac1fc6
(define-ibuffer-filter filename): If `dired-directory' is a list, use its car.

diff -r d8390b93c19c -r 78d078c92479 lisp/ibuf-ext.el
--- 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)))