summaryrefslogtreecommitdiff
path: root/lisp/vc-dir.el
diff options
context:
space:
mode:
authorNick Roberts <nickrob@snap.net.nz>2008-11-04 07:25:26 +0000
committerNick Roberts <nickrob@snap.net.nz>2008-11-04 07:25:26 +0000
commitd7377c46bc1a64286e6038747d4ae1f41e02c301 (patch)
tree61883090b64eaf9478756dfd16b084e418b99770 /lisp/vc-dir.el
parenta7cb7fd25138d7a09c07ec63cdd2694e0e7f3eca (diff)
* vc-cvs.el (vc-cvs-dir-extra-headers): Add tag name to header.
* vc-dir.el (vc-dir-headers): Order headers as in PCL-CVS.
Diffstat (limited to 'lisp/vc-dir.el')
-rw-r--r--lisp/vc-dir.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/vc-dir.el b/lisp/vc-dir.el
index 9f7111e154..4fbdc99d50 100644
--- a/lisp/vc-dir.el
+++ b/lisp/vc-dir.el
@@ -929,12 +929,11 @@ commands act on the files in those directories displayed in the
It calls the `dir-extra-headers' backend method to display backend
specific headers."
(concat
+ (vc-call-backend backend 'dir-extra-headers dir)
(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)
- (vc-call-backend backend 'dir-extra-headers dir)
- "\n"))
+ (propertize (format "%s\n" dir) 'face 'font-lock-variable-name-face)))
(defun vc-dir-refresh-files (files default-state)
"Refresh some files in the *VC-dir* buffer."