diff options
| author | Dan Nicolaescu <[email protected]> | 2008-03-24 08:36:22 +0000 |
|---|---|---|
| committer | Dan Nicolaescu <[email protected]> | 2008-03-24 08:36:22 +0000 |
| commit | 874f31a6f0b3ef12bcf7ea25accb6e0e6c196164 (patch) | |
| tree | ff8270b523eb98c6fa63ceba2419b61674a3ed0e | |
| parent | d6f47dff597c7c0884be50a36acfbf1e694948bb (diff) | |
(vc-cvs-after-dir-status, vc-cvs-parse-status): Detect
removed files.
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/vc-cvs.el | 2 |
2 files changed, 5 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5d9e0ec760..05a5904e2e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2008-03-24 Dan Nicolaescu <[email protected]> + * vc-cvs.el (vc-cvs-after-dir-status, vc-cvs-parse-status): Detect + removed files. + * vc.el (vc-status-printer): Use a different face for missing files. (vc-status-hide-up-to-date): Rename from vc-status-remove-up-to-date. Update all callers. diff --git a/lisp/vc-cvs.el b/lisp/vc-cvs.el index a3a8b19895..a338b5115b 100644 --- a/lisp/vc-cvs.el +++ b/lisp/vc-cvs.el @@ -855,6 +855,7 @@ state." ((string-match "Needs Merge" status) 'needs-merge) ((string-match "Needs \\(Checkout\\|Patch\\)" status) 'needs-patch) ((string-match "Locally Added" status) 'added) + ((string-match "Locally Removed" status) 'removed) (t 'edited)))))))) (defun vc-cvs-dir-state-heuristic (dir) @@ -916,6 +917,7 @@ state." ((string-match "Needs \\(Checkout\\|Patch\\)" status-str) 'needs-patch) ((string-match "Locally Added" status-str) 'added) + ((string-match "Locally Removed" status-str) 'removed) (t 'edited))) (unless (eq status 'up-to-date) (push (cons file status) result)))))) |