dot/emacs: Remove VCS directories from `completion-ignored-extensions'

[profile] / dot / emacs

diff --git a/dot/emacs b/dot/emacs
index e5ae0b8..708817f 100644 (file)
--- a/dot/emacs
+++ b/dot/emacs
@@ -500,6 +500,13 @@
 
 (setq completion-ignored-extensions
       (append `(".hc" ".hi") completion-ignored-extensions))
+(dolist (dir (remove-if-not (lambda (ext)
+                             (= (aref ext (- (length ext) 1)) ?/))
+                           completion-ignored-extensions))
+  (if (/= (aref dir 0) ?/)
+      (setq completion-ignored-extensions
+           (cons (concat "/" dir)
+                 (remove dir completion-ignored-extensions)))))
 
 ;; Some common local definitions.