# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1183664886 0
# Node ID 88604a3ac7e420fa5d5d87e42369cde387072bcb
# Parent  d71be1e373219d36ab71995036d2e9c890a2eed2
* vc-hooks.el (vc-handled-backends): Add HG.

* vc-hg.el (vc-handled-backends): Remove, done in vc-hooks.el now.

diff -r d71be1e37321 -r 88604a3ac7e4 lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Jul 05 19:42:43 2007 +0000
+++ b/lisp/ChangeLog	Thu Jul 05 19:48:06 2007 +0000
@@ -1,3 +1,9 @@
+2007-07-05  Dan Nicolaescu  <dann@ics.uci.edu>
+
+	* vc-hooks.el (vc-handled-backends): Add HG.
+
+	* vc-hg.el (vc-handled-backends): Remove, done in vc-hooks.el now.
+
 2007-07-05  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* complete.el (PC-do-complete-and-exit): Add support for the new
diff -r d71be1e37321 -r 88604a3ac7e4 lisp/vc-hg.el
--- a/lisp/vc-hg.el	Thu Jul 05 19:42:43 2007 +0000
+++ b/lisp/vc-hg.el	Thu Jul 05 19:48:06 2007 +0000
@@ -58,10 +58,6 @@
 (eval-when-compile
   (require 'vc))
 
-;; XXX This should be moved to vc-hooks when we can be sure that vc-state
-;; and friends are always harmless.
-(add-to-list 'vc-handled-backends 'HG)
-
 ;;; Customization options
 
 (defcustom vc-hg-global-switches nil
diff -r d71be1e37321 -r 88604a3ac7e4 lisp/vc-hooks.el
--- a/lisp/vc-hooks.el	Thu Jul 05 19:42:43 2007 +0000
+++ b/lisp/vc-hooks.el	Thu Jul 05 19:48:06 2007 +0000
@@ -62,7 +62,7 @@
   :type 'regexp
   :group 'vc)
 
-(defcustom vc-handled-backends '(RCS CVS SVN SCCS Arch MCVS)
+(defcustom vc-handled-backends '(RCS CVS SVN SCCS HG Arch MCVS)
   ;; Arch and MCVS come last because they are per-tree rather than per-dir.
   "*List of version control backends for which VC will be used.
 Entries in this list will be tried in order to determine whether a