From: John Paul Wallington <jpw@pobox.com>
Date: Sat, 18 Sep 2004 08:14:36 +0000 (+0000)
Subject: (define-ibuffer-filter filename): Expand dired-directory since
X-Git-Tag: ttn-vms-21-2-B4~4894
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dc711054e2d0fdba8da7fb0c5d3ce7260a8df714;p=emacs.git

(define-ibuffer-filter filename): Expand dired-directory since
buffer-file-name is absolute.
From Romain Francoise <romain@orebokech.com>.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ce81cb422fd..999fda0a02b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-09-17  Romain Francoise  <romain@orebokech.com>
+
+	* ibuf-ext.el (define-ibuffer-filter filename): Expand
+	dired-directory since buffer-file-name is absolute.
+
 2004-09-17  Dan Nicolaescu  <dann@ics.uci.edu>
 
 	* ediff-init.el (ediff-current-diff-face-A)
diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el
index b7e6741e9d4..5d24964362a 100644
--- a/lisp/ibuf-ext.el
+++ b/lisp/ibuf-ext.el
@@ -1018,7 +1018,8 @@ currently used by buffers."
   (ibuffer-awhen (with-current-buffer buf
 		   (or buffer-file-name
 		       (and (boundp 'dired-directory)
-			    dired-directory)))
+			    dired-directory
+			    (expand-file-name dired-directory))))
     (string-match qualifier it)))
 
 ;;;###autoload (autoload 'ibuffer-filter-by-size-gt  "ibuf-ext.el")