Mercurial > emacs
changeset 94860:8c21639e34cc
Remove dead code.
| author | Eric S. Raymond <esr@snark.thyrsus.com> |
|---|---|
| date | Sun, 11 May 2008 18:15:59 +0000 |
| parents | 53f6ff0ac075 |
| children | 142a56989604 |
| files | lisp/ChangeLog lisp/vc-hooks.el |
| diffstat | 2 files changed, 7 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun May 11 15:36:33 2008 +0000 +++ b/lisp/ChangeLog Sun May 11 18:15:59 2008 +0000 @@ -1,3 +1,7 @@ +2008-05-11 Eric S. Raymond <esr@snark.thyrsus.com> + + * vc-hooks.el (vc-recompute-state): Removed (dead code). + 2008-05-10 Dan Nicolaescu <dann@ics.uci.edu> * vc-dispatcher.el (ewoc): Require.
--- a/lisp/vc-hooks.el Sun May 11 15:36:33 2008 +0000 +++ b/lisp/vc-hooks.el Sun May 11 18:15:59 2008 +0000 @@ -531,12 +531,11 @@ A return of nil from this function means we have no information on the status of this file." - ;; Note: in Emacs 22 and older, return of nil meant the file was unregistered. - ;; This is potentially a source of backward-compatibility bugs. + ;; Note: in Emacs 22 and older, return of nil meant the file was + ;; unregistered. This is potentially a source of + ;; backward-compatibility bugs. ;; FIXME: New (sub)states needed (?): - ;; - `conflict' (i.e. `edited' with conflict markers) - ;; - `removed' ;; - `copied' and `moved' (might be handled by `removed' and `added') (or (vc-file-getprop file 'vc-state) (when (> (length file) 0) @@ -546,12 +545,6 @@ file 'vc-state (vc-call-backend backend 'state-heuristic file))))))) -(defun vc-recompute-state (file) - "Recompute the version control state of FILE, and return it. -This calls the possibly expensive function vc-BACKEND-state, -rather than the heuristic." - (vc-file-setprop file 'vc-state (vc-call state file))) - (defsubst vc-up-to-date-p (file) "Convenience function that checks whether `vc-state' of FILE is `up-to-date'." (eq (vc-state file) 'up-to-date))