Mercurial > emacs
changeset 93239:3d37b67e5a01
(vc-default-mode-line-string): Deal with 'removed
and 'missing files.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Wed, 26 Mar 2008 04:46:42 +0000 |
| parents | a2947a0dab56 |
| children | 231f72336aed |
| files | lisp/ChangeLog lisp/vc-hooks.el |
| diffstat | 2 files changed, 11 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Mar 26 03:43:43 2008 +0000 +++ b/lisp/ChangeLog Wed Mar 26 04:46:42 2008 +0000 @@ -1,3 +1,8 @@ +2008-03-26 Dan Nicolaescu <dann@ics.uci.edu> + + * vc-hooks.el (vc-default-mode-line-string): Deal with 'removed + and 'missing files. + 2008-03-26 Stefan Monnier <monnier@iro.umontreal.ca> * calendar/holidays.el (list-holidays): Make Y2 optional.
--- a/lisp/vc-hooks.el Wed Mar 26 03:43:43 2008 +0000 +++ b/lisp/vc-hooks.el Wed Mar 26 04:46:42 2008 +0000 @@ -862,6 +862,12 @@ ((eq state 'added) (setq state-echo "Locally added file") (concat backend "@" rev)) + ((eq state 'removed) + (setq state-echo "File removed from the VC system") + (concat backend "!" rev)) + ((eq state 'missing) + (setq state-echo "File tracked by the VC system, but missing from the file system") + (concat backend "^" rev)) (t ;; Not just for the 'edited state, but also a fallback ;; for all other states. Think about different symbols