Mercurial > emacs

comparison lisp/vc.el @ 58642:0bc7c34870e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-recompute-state): Moved into vc-hooks.el.
author André Spiegel <spiegel@gnu.org>
date Tue, 30 Nov 2004 11:03:46 +0000
parents f398ebfc07e2
children 816dc38b1981 549734260e34 f2ebccfa87d4
comparison
equal deleted inserted replaced
58641:6eccfc449b0e 58642:0bc7c34870e9
1113 (defun vc-default-latest-on-branch-p (backend file) 1113 (defun vc-default-latest-on-branch-p (backend file)
1114 "Return non-nil if FILE is the latest on its branch. 1114 "Return non-nil if FILE is the latest on its branch.
1115 This default implementation always returns non-nil, which means that 1115 This default implementation always returns non-nil, which means that
1116 editing non-current versions is not supported by default." 1116 editing non-current versions is not supported by default."
1117 t) 1117 t)
1118
1119 (defun vc-recompute-state (file)
1120 "Force a recomputation of the version control state of FILE.
1121 The state is computed using the exact, and possibly expensive
1122 function `vc-BACKEND-state', not the heuristic."
1123 (vc-file-setprop file 'vc-state (vc-call state file)))
1124 1118
1125 (defun vc-next-action-on-file (file verbose &optional comment) 1119 (defun vc-next-action-on-file (file verbose &optional comment)
1126 "Do The Right Thing for a given FILE under version control. 1120 "Do The Right Thing for a given FILE under version control.
1127 If COMMENT is specified, it will be used as an admin or checkin comment. 1121 If COMMENT is specified, it will be used as an admin or checkin comment.
1128 If VERBOSE is non-nil, query the user rather than using default parameters." 1122 If VERBOSE is non-nil, query the user rather than using default parameters."