461 |
(vc-file-setprop file 'vc-state |
(vc-file-setprop file 'vc-state |
462 |
(vc-call state-heuristic file))))) |
(vc-call state-heuristic file))))) |
463 |
|
|
464 |
|
(defun vc-recompute-state (file) |
465 |
|
"Recompute the version control state of FILE, and return it. |
466 |
|
This calls the possibly expensive function vc-BACKEND-state, |
467 |
|
rather than the heuristic." |
468 |
|
(vc-file-setprop file 'vc-state (vc-call state file))) |
469 |
|
|
470 |
(defsubst vc-up-to-date-p (file) |
(defsubst vc-up-to-date-p (file) |
471 |
"Convenience function that checks whether `vc-state' of FILE is `up-to-date'." |
"Convenience function that checks whether `vc-state' of FILE is `up-to-date'." |
472 |
(eq (vc-state file) 'up-to-date)) |
(eq (vc-state file) 'up-to-date)) |