From: Dan Nicolaescu <dann@ics.uci.edu>
Date: Thu, 5 Jul 2007 19:48:06 +0000 (+0000)
Subject: * vc-hooks.el (vc-handled-backends): Add HG.
X-Git-Tag: emacs-pretest-23.0.90~12042
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c2ba4a6b0ad54fcf1ce20f7a84261d957558e359;p=emacs.git

* vc-hooks.el (vc-handled-backends): Add HG.

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 653dd294452..f0e38047bda 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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 --git a/lisp/vc-hg.el b/lisp/vc-hg.el
index 7bfa6953e60..a301a3ad5d8 100644
--- a/lisp/vc-hg.el
+++ b/lisp/vc-hg.el
@@ -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 --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index 22935ab7f3b..89d271431fa 100644
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -62,7 +62,7 @@ interpreted as hostnames."
   :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