From: Juanma Barranquero <lekktu@gmail.com>
Date: Thu, 29 Jan 2009 08:53:37 +0000 (+0000)
Subject: Exclude VCS metadata dirs from completion.
X-Git-Tag: emacs-pretest-23.0.90~94
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bcca751d83bb8aacf53fc4e166534cb4e9def821;p=emacs.git

Exclude VCS metadata dirs from completion.

* bindings.el (completion-ignored-extensions):
  Add entries for VCS metadata directories (CVS/, .svn, etc).

* pcvs.el (completion-ignored-extensions):
* vc-svn.el (completion-ignored-extensions): Don't add VCS-specific
  directory, now done in bindings.el.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 65d7917c616..e7877671742 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,12 @@
+2009-01-29  Juanma Barranquero  <lekktu@gmail.com>
+
+	* bindings.el (completion-ignored-extensions):
+	Add entries for VCS metadata directories (CVS/, .svn, etc).
+
+	* pcvs.el (completion-ignored-extensions):
+	* vc-svn.el (completion-ignored-extensions): Don't add VCS-specific
+	directory, now done in bindings.el.
+
 2009-01-29  Klaus Straubinger  <KSNetz@UseNet.ArcorNews.DE>  (tiny change)
 
 	* pcmpl-rpm.el (pcmpl-rpm): Doc fix.
@@ -42,8 +51,8 @@
 
 2009-01-28  Michael Albinus  <michael.albinus@gmx.de>
 
-	* net/dbus.el (dbus-event-error-hooks): Fix docstring.  Describe
-	second parameter of hook functions.
+	* net/dbus.el (dbus-event-error-hooks): Fix docstring.
+	Describe second parameter of hook functions.
 	(dbus-handle-event): Apply it.
 
 2009-01-28  Chong Yidong  <cyd@stupidchicken.com>
diff --git a/lisp/bindings.el b/lisp/bindings.el
index 36f9489c998..88073a85da1 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -600,6 +600,8 @@ is okay.  See `mode-line-format'.")
 		".a" ".ln" ".blg" ".bbl")))
        '(".elc" ".lof"
 	 ".glo" ".idx" ".lot"
+	 ;; VCS metadata directories
+	 ".svn/" ".hg/" ".git/" ".bzr/" "CVS/" "_darcs/" "_MTN/"
 	 ;; TeX-related
 	 ".fmt" ".tfm"
 	 ;; Java compiled
diff --git a/lisp/pcvs.el b/lisp/pcvs.el
index 64606f6dfe2..dc01c45ad3f 100644
--- a/lisp/pcvs.el
+++ b/lisp/pcvs.el
@@ -2325,9 +2325,6 @@ this file, or a list of arguments to send to the program."
 ;;;; useful global settings
 ;;;;
 
-;;;###autoload
-(add-to-list 'completion-ignored-extensions "CVS/")
-
 ;;
 ;; Hook to allow calling PCL-CVS by visiting the /CVS subdirectory
 ;;
diff --git a/lisp/vc-svn.el b/lisp/vc-svn.el
index 5c444ffee72..884ab4d2879 100644
--- a/lisp/vc-svn.el
+++ b/lisp/vc-svn.el
@@ -119,9 +119,6 @@ want to force an empty list of arguments, use t."
 ;;;###autoload       (load "vc-svn")
 ;;;###autoload       (vc-svn-registered f))))
 
-;;;###autoload
-(add-to-list 'completion-ignored-extensions ".svn/")
-
 (defun vc-svn-registered (file)
   "Check if FILE is SVN registered."
   (when (file-readable-p (expand-file-name (concat vc-svn-admin-directory