diff options
author | Dan Nicolaescu <dann@ics.uci.edu> | 2008-03-24 08:36:22 +0000 |
---|---|---|
committer | Dan Nicolaescu <dann@ics.uci.edu> | 2008-03-24 08:36:22 +0000 |
commit | 874f31a6f0b3ef12bcf7ea25accb6e0e6c196164 (patch) | |
tree | ff8270b523eb98c6fa63ceba2419b61674a3ed0e /lisp/vc-cvs.el | |
parent | d6f47dff597c7c0884be50a36acfbf1e694948bb (diff) | |
download | emacs-874f31a6f0b3ef12bcf7ea25accb6e0e6c196164.tar.gz emacs-874f31a6f0b3ef12bcf7ea25accb6e0e6c196164.tar.bz2 emacs-874f31a6f0b3ef12bcf7ea25accb6e0e6c196164.zip |
(vc-cvs-after-dir-status, vc-cvs-parse-status): Detect
removed files.
Diffstat (limited to 'lisp/vc-cvs.el')
-rw-r--r-- | lisp/vc-cvs.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/vc-cvs.el b/lisp/vc-cvs.el index a3a8b198956..a338b5115b8 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)))))) |