changeset 81709:88604a3ac7e4

* vc-hooks.el (vc-handled-backends): Add HG. * vc-hg.el (vc-handled-backends): Remove, done in vc-hooks.el now.
author Dan Nicolaescu <dann@ics.uci.edu>
date Thu, 05 Jul 2007 19:48:06 +0000
parents d71be1e37321
children 941c1cfacdc7
files lisp/ChangeLog lisp/vc-hg.el lisp/vc-hooks.el
diffstat 3 files changed, 7 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- 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
--- 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
--- 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