From b4c5fc9ff1df6799c2b69a3e56de85bfb701e9d2 Mon Sep 17 00:00:00 2001 From: John Paul Wallington Date: Wed, 30 Apr 2008 23:55:05 +0000 Subject: [PATCH] (define-ibuffer-column filename): When the major mode is `vc-dir-mode' show the buffer's default directory. --- lisp/ChangeLog | 5 +++++ lisp/ibuffer.el | 2 ++ 2 files changed, 7 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e22f4cb2ba..a4db6dcb6a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2008-04-30 John Paul Wallington + + * ibuffer.el (define-ibuffer-column filename): When the major mode + is `vc-dir-mode' show the buffer's default directory. + 2008-04-30 Sam Steingold * vc.el (vc-dir-delete-file): Add. diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el index 4aafea0485..fbd3769edd 100644 --- a/lisp/ibuffer.el +++ b/lisp/ibuffer.el @@ -1759,6 +1759,8 @@ If point is on a group name, this function operates on that group." (if (stringp dired-directory) dired-directory (car dired-directory))) + (and (eq major-mode 'vc-dir-mode) + (bound-and-true-p default-directory)) "")))) (define-ibuffer-column filename-and-process -- 2.39.2