From dc711054e2d0fdba8da7fb0c5d3ce7260a8df714 Mon Sep 17 00:00:00 2001 From: John Paul Wallington Date: Sat, 18 Sep 2004 08:14:36 +0000 Subject: [PATCH] (define-ibuffer-filter filename): Expand dired-directory since buffer-file-name is absolute. From Romain Francoise . --- lisp/ChangeLog | 5 +++++ lisp/ibuf-ext.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) 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 + + * ibuf-ext.el (define-ibuffer-filter filename): Expand + dired-directory since buffer-file-name is absolute. + 2004-09-17 Dan Nicolaescu * 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") -- 2.39.2