Mercurial > emacs

changeset 78363:9b9e30a9b135

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* vc-hg.el (vc-hg-registered): Set the vc-state property.
author Dan Nicolaescu <dann@ics.uci.edu>
date Mon, 30 Jul 2007 17:12:10 +0000
parents 655e2c8d2f5f
children 419303d2f258
files lisp/ChangeLog lisp/vc-hg.el
diffstat 2 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Mon Jul 30 05:36:46 2007 +0000
+++ b/lisp/ChangeLog	Mon Jul 30 17:12:10 2007 +0000
@@ -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.
 
--- a/lisp/vc-hg.el	Mon Jul 30 05:36:46 2007 +0000
+++ b/lisp/vc-hg.el	Mon Jul 30 17:12:10 2007 +0000
@@ -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'."