Mercurial > emacs
changeset 99367:ce0076e88ed4
(vc-dir-headers): Undo previous change.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Tue, 04 Nov 2008 08:58:24 +0000 |
| parents | 27341c507614 |
| children | 4a940838ff4c |
| files | lisp/ChangeLog lisp/vc-dir.el |
| diffstat | 2 files changed, 9 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Tue Nov 04 07:35:57 2008 +0000 +++ b/lisp/ChangeLog Tue Nov 04 08:58:24 2008 +0000 @@ -1,3 +1,7 @@ +2008-11-04 Dan Nicolaescu <dann@ics.uci.edu> + + * vc-dir.el (vc-dir-headers): Undo previous change. + 2008-11-04 Nick Roberts <nickrob@snap.net.nz> * vc-cvs.el (vc-cvs-dir-extra-headers): Add tag name to header.
--- a/lisp/vc-dir.el Tue Nov 04 07:35:57 2008 +0000 +++ b/lisp/vc-dir.el Tue Nov 04 08:58:24 2008 +0000 @@ -929,11 +929,14 @@ It calls the `dir-extra-headers' backend method to display backend specific headers." (concat - (vc-call-backend backend 'dir-extra-headers dir) + ;; First layout the common headers. (propertize "VC backend : " 'face 'font-lock-type-face) (propertize (format "%s\n" backend) 'face 'font-lock-variable-name-face) (propertize "Working dir: " 'face 'font-lock-type-face) - (propertize (format "%s\n" dir) 'face 'font-lock-variable-name-face))) + (propertize (format "%s\n" dir) 'face 'font-lock-variable-name-face) + ;; Then the backend specific ones. + (vc-call-backend backend 'dir-extra-headers dir) + "\n")) (defun vc-dir-refresh-files (files default-state) "Refresh some files in the *VC-dir* buffer."