mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
(vc-hg-workfile-unchanged-p): New function.
This commit is contained in:
parent
7c0953573e
commit
a272e668c9
2 changed files with 6 additions and 1 deletions
|
|
@ -48,7 +48,7 @@
|
|||
;; * workfile-version (file) OK
|
||||
;; - latest-on-branch-p (file) ??
|
||||
;; * checkout-model (file) OK
|
||||
;; - workfile-unchanged-p (file) ??
|
||||
;; - workfile-unchanged-p (file) OK
|
||||
;; - mode-line-string (file) NOT NEEDED
|
||||
;; - dired-state-info (file) OK
|
||||
;; STATE-CHANGING FUNCTIONS
|
||||
|
|
@ -407,6 +407,10 @@ REV is the revision to check out into WORKFILE."
|
|||
(defun vc-hg-checkout-model (file)
|
||||
'implicit)
|
||||
|
||||
;; Modelled after the similar function in vc-bzr.el
|
||||
(defun vc-hg-workfile-unchanged-p (file)
|
||||
(eq 'up-to-date (vc-hg-state file)))
|
||||
|
||||
(defun vc-hg-dired-state-info (file)
|
||||
"Hg-specific version of `vc-dired-state-info'."
|
||||
(let ((hg-state (vc-state file)))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue