Mercurial > emacs
comparison lisp/vc-svn.el @ 87450:71fc7b1db920
* vc-hooks.el (vc-state): Document new 'ignored and 'unregistered
states. and the new return-value convention. These are not
actually used yet, just set.
* vc-svn.el (vc-svn-parse-status): Set 'ignored and 'unregistered
states when appropriate.
* vc-hg.el (vc-hg-state,vc-hg-dir-state): Set 'ignored and
'unregistered' when appropriate.
* vc-git.el: Document that we don't set the new states yet.
* vc.el (vc-dired-state-info): Display 'unregistered and
'ignored states.
* vc-cvs.el (vc-cvs-parse-status): Set the 'ignored state when
appropriate.
* vc-bzr.el (vc-bzr-dir-state): Set 'ignored and
'unregistered' when appropriate.
author | Eric S. Raymond <esr@snark.thyrsus.com> |
---|---|
date | Fri, 28 Dec 2007 18:16:55 +0000 |
parents | 7477a697d7e1 |
children | b5060e79eb98 56a72e2bd635 |
comparison
equal
deleted
inserted
replaced
87449:7477a697d7e1 | 87450:71fc7b1db920 |
---|---|
576 'edited) | 576 'edited) |
577 ((memq status '(?M ?C)) | 577 ((memq status '(?M ?C)) |
578 (if (eq (char-after (match-beginning 1)) ?*) | 578 (if (eq (char-after (match-beginning 1)) ?*) |
579 'needs-merge | 579 'needs-merge |
580 'edited)) | 580 'edited)) |
581 ((eq status ?I) | |
582 (vc-file-setprop file 'vc-state 'ignored)) | |
583 ((eq status ??) | |
584 (vc-file-setprop file 'vc-state 'unregistered)) | |
581 (t 'edited))))) | 585 (t 'edited))))) |
582 (if filename (vc-file-getprop filename 'vc-state)))) | 586 (if filename (vc-file-getprop filename 'vc-state)))) |
583 | 587 |
584 (defun vc-svn-dir-state-heuristic (dir) | 588 (defun vc-svn-dir-state-heuristic (dir) |
585 "Find the SVN state of all files in DIR, using only local information." | 589 "Find the SVN state of all files in DIR, using only local information." |