mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-01 11:14:55 +00:00
Code Issues Releases Activity

(vc-cvs-after-dir-status, vc-cvs-parse-status): Detect

Browse Source 
removed files.
This commit is contained in:
Dan Nicolaescu 2008-03-24 08:36:22 +00:00
parent d6f47dff59
commit 874f31a6f0
2 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/ChangeLog
View File

@ -1,5 +1,8 @@
2008-03-24 Dan Nicolaescu <dann@ics.uci.edu>
* 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.

2
lisp/vc-cvs.el
View File

@ -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))))))