From e9e198332bb13d82964e89bad1cee521c0362070 Mon Sep 17 00:00:00 2001 From: John Paul Wallington Date: Thu, 1 May 2008 00:08:38 +0000 Subject: [PATCH] (define-ibuffer-filter filename): When the major mode is `vc-dir-mode' use the buffer's default directory as filename. --- lisp/ChangeLog | 3 +++ lisp/ibuf-ext.el | 6 ++++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a4db6dcb6a0..dadd12046bd 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -3,6 +3,9 @@ * ibuffer.el (define-ibuffer-column filename): When the major mode is `vc-dir-mode' show the buffer's default directory. + * ibuf-ext.el (define-ibuffer-filter filename): Likewise when the + major mode is `vc-dir-mode' use the buffer's default directory. + 2008-04-30 Sam Steingold * vc.el (vc-dir-delete-file): Add. diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el index 82face5eccb..8be5a73b5f4 100644 --- a/lisp/ibuf-ext.el +++ b/lisp/ibuf-ext.el @@ -1039,8 +1039,10 @@ currently used by buffers." dired-directory (car dired-directory)))) (and dired-dir - (expand-file-name dired-dir)))))) - (string-match qualifier it))) + (expand-file-name dired-dir)))) + (and (eq major-mode 'vc-dir-mode) + (bound-and-true-p default-directory)))) + (string-match qualifier it))) ;;;###autoload (autoload 'ibuffer-filter-by-size-gt "ibuf-ext") (define-ibuffer-filter size-gt -- 2.39.2