diff options
Diffstat (limited to 'lisp/vc-git.el')
| -rw-r--r-- | lisp/vc-git.el | 21 |
1 files changed, 6 insertions, 15 deletions
diff --git a/lisp/vc-git.el b/lisp/vc-git.el index c0cfc1e88cc..256be2c6f03 100644 --- a/lisp/vc-git.el +++ b/lisp/vc-git.el @@ -111,13 +111,6 @@ (eval-when-compile (require 'cl) (require 'vc)) -;; XXX when this backend is considered sufficiently reliable this -;; should be moved to vc-hooks.el -(add-to-list 'vc-handled-backends 'GIT) -(eval-after-load "vc" - '(add-to-list 'vc-directory-exclusion-list ".git" t)) - - (defvar git-commits-coding-system 'utf-8 "Default coding system for git commits.") @@ -331,14 +324,12 @@ (push (match-string 2) table))) table)) -;; Commented out on the 22.x branch, VC here does not support it yet -;; and when bytecompiling it max-specpdl-size is exceeded. -;; (defun vc-git-revision-completion-table (file) -;; (lexical-let ((file file) -;; table) -;; (setq table (lazy-completion-table -;; table (lambda () (vc-git-revision-table file)))) -;; table)) +(defun vc-git-revision-completion-table (file) + (lexical-let ((file file) + table) + (setq table (lazy-completion-table + table (lambda () (vc-git-revision-table file)))) + table)) (defun vc-git-diff-tree (dir &optional rev1 rev2) (vc-git-diff dir rev1 rev2)) |