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 65d7917c6162d34c614367ca28bc13df70eb5ac7..e7877671742018f9ef4e28255db672f8751f3180 100644 (file)
--- 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 36f9489c9982815380ea2528214dbe9a74faae7d..88073a85da1a946b69f407f06b11b8e0aaeb4bec 100644 (file)
--- 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 64606f6dfe2e63f6b5f7290c80f4639b3768b4f0..dc01c45ad3f5783755bb382e4676492c7ba2d525 100644 (file)
--- 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 5c444ffee72ea61959aa4455376f3fea403e7f27..884ab4d2879c3323364dd242a4a7f31937ae3fda 100644 (file)
--- 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