Remove dead code.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 05d6da8f3e5ce0993e9eae5c145dfe937273ddab..93da1b848601cdb80fceb296e55fa48ef12208c6 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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.

diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index e8c04684619c8fee11ec265473b8144c7cb42f66..f9b82aab497a78f322e658bd2a3554b0af22d6e3 100644 (file)
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -531,12 +531,11 @@ For registered files, the value returned is one of:
 
 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 @@ status of this file."
              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))