# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1215281036 0
# Node ID 4b43e6ed58500b5b65303fbe4384b6bfcc4837ae
# Parent  b250e775669bd64c08fdd1324d903690daf923dd
(vc-hg-registered): Do not set vc-state.

diff -r b250e775669b -r 4b43e6ed5850 lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Jul 05 18:03:02 2008 +0000
+++ b/lisp/ChangeLog	Sat Jul 05 18:03:56 2008 +0000
@@ -1,5 +1,7 @@
 2008-07-05  Dan Nicolaescu  <dann@ics.uci.edu>
 
+	* vc-hg.el (vc-hg-registered): Do not set vc-state.
+
 	* vc-annotate.el (vc-annotate-mode-menu): Add separator.
 
 2008-07-05  Nick Roberts  <nickrob@snap.net.nz>
diff -r b250e775669b -r 4b43e6ed5850 lisp/vc-hg.el
--- a/lisp/vc-hg.el	Sat Jul 05 18:03:02 2008 +0000
+++ b/lisp/vc-hg.el	Sat Jul 05 18:03:56 2008 +0000
@@ -143,7 +143,6 @@
   "Return non-nil if FILE is registered with hg."
   (when (vc-hg-root file)           ; short cut
     (let ((state (vc-hg-state file)))  ; expensive
-      (vc-file-setprop file 'vc-state state)
       (and state (not (memq state '(ignored unregistered)))))))
 
 (defun vc-hg-state (file)