(define-ibuffer-column filename): When the major mode is `vc-dir-mode'

show the buffer's default directory.

2 files changed, 7 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e22f4cb2ba7..a4db6dcb6a0 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-04-30  John Paul Wallington  <jpw@pobox.com>
+
+        * 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  <sds@gnu.org>
 
         * vc.el (vc-dir-delete-file): Add.
diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 4aafea04855..fbd3769edd7 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