Commit b2b8574b authored by Stefan Monnier's avatar Stefan Monnier
Browse files

* vc-dir.el (vc-dir-headers): Abbreviate the working dir.

parent 5f2484c2
2010-03-24 Stefan Monnier <monnier@iro.umontreal.ca>
* vc-dir.el (vc-dir-headers): Abbreviate the working dir.
2010-03-24 Glenn Morris <rgm@gnu.org> 2010-03-24 Glenn Morris <rgm@gnu.org>
* vc-bzr.el (vc-bzr-log-edit-mode): Add --fixes support to * vc-bzr.el (vc-bzr-log-edit-mode): Add --fixes support to
......
...@@ -950,7 +950,8 @@ specific headers." ...@@ -950,7 +950,8 @@ specific headers."
(propertize "VC backend : " 'face 'font-lock-type-face) (propertize "VC backend : " 'face 'font-lock-type-face)
(propertize (format "%s\n" backend) 'face 'font-lock-variable-name-face) (propertize (format "%s\n" backend) 'face 'font-lock-variable-name-face)
(propertize "Working dir: " 'face 'font-lock-type-face) (propertize "Working dir: " 'face 'font-lock-type-face)
(propertize (format "%s\n" dir) 'face 'font-lock-variable-name-face) (propertize (format "%s\n" (abbreviate-file-name dir))
'face 'font-lock-variable-name-face)
;; Then the backend specific ones. ;; Then the backend specific ones.
(vc-call-backend backend 'dir-extra-headers dir) (vc-call-backend backend 'dir-extra-headers dir)
"\n")) "\n"))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment