Don't signal error in vc-deduce-backend

* lisp/vc/vc.el (vc-deduce-backend): Return nil if
vc-responsible-backend signals an error.
This commit is contained in:
Andreas Schwab 2018-02-13 12:13:27 +01:00
parent f568c916b6
commit 69e804669b

View file

@ -996,7 +996,9 @@ Within directories, only files already under version control are noticed."
((derived-mode-p 'diff-mode) diff-vc-backend)
;; Maybe we could even use comint-mode rather than shell-mode?
((derived-mode-p 'dired-mode 'shell-mode 'compilation-mode)
(vc-responsible-backend default-directory))
(condition-case nil
(vc-responsible-backend default-directory)
(error nil)))
(vc-mode (vc-backend buffer-file-name))))
(declare-function vc-dir-current-file "vc-dir" ())