From 791869eb88a410f5cb8a176c081e7a675a7f2c5e Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Mon, 30 Jul 2007 17:12:10 +0000 Subject: [PATCH] * vc-hg.el (vc-hg-registered): Set the vc-state property. --- lisp/ChangeLog | 1 + lisp/vc-hg.el | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index dfa662b791c..4d5f051cf33 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -9,6 +9,7 @@ * vc.el (vc-directory-exclusion-list): Add .git and .hg. * vc-hg.el (vc-hg-revision-completion-table): Re-enable. + (vc-hg-registered): Set the vc-state property. * diff-mode.el (diff-mode-menu): New entries. diff --git a/lisp/vc-hg.el b/lisp/vc-hg.el index 972adeed675..c9a69a7e5ea 100644 --- a/lisp/vc-hg.el +++ b/lisp/vc-hg.el @@ -138,7 +138,7 @@ (defun vc-hg-registered (file) "Return non-nil if FILE is registered with hg." (when (vc-hg-root file) ; short cut - (vc-hg-state file))) ; expensive + (vc-file-setprop file 'vc-state (vc-hg-state file)))) ; expensive (defun vc-hg-state (file) "Hg-specific version of `vc-state'." -- 2.39.2