1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(vc-recompute-state): Moved here from vc.el.

This commit is contained in:
André Spiegel 2004-11-30 11:03:09 +00:00
parent 5124dd38c8
commit 588c1bf9a9

View file

@ -461,6 +461,12 @@ For registered files, the value returned is one of:
(vc-file-setprop file 'vc-state
(vc-call 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))