From: Dmitry Gutov <dgutov@yandex.ru>
Date: Fri, 2 Dec 2022 02:03:03 +0000 (+0200)
Subject: project-files (VC-aware): Make sure the VC backend is loaded
X-Git-Tag: emacs-29.0.90~1386
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3bccef6f52598dd5aea37016254a3bc17893298d;p=emacs.git

project-files (VC-aware): Make sure the VC backend is loaded

* lisp/progmodes/project.el (project-files):
Make sure the VC backend is loaded (bug#59734).
---

diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
index 1cf50df0366..3f4a5fb04bc 100644
--- a/lisp/progmodes/project.el
+++ b/lisp/progmodes/project.el
@@ -1,7 +1,7 @@
 ;;; project.el --- Operations on the current project  -*- lexical-binding: t; -*-
 
 ;; Copyright (C) 2015-2022 Free Software Foundation, Inc.
-;; Version: 0.9.0
+;; Version: 0.9.1
 ;; Package-Requires: ((emacs "26.1") (xref "1.4.0"))
 
 ;; This is a GNU ELPA :core package.  Avoid using functionality that
@@ -583,9 +583,10 @@ project backend implementation of `project-external-roots'.")
   (mapcan
    (lambda (dir)
      (let ((ignores project-vc-ignores)
-           backend)
+           (backend (cadr project)))
+       (when backend
+         (require (intern (concat "vc-" (downcase (symbol-name backend))))))
        (if (and (file-equal-p dir (nth 2 project))
-                (setq backend (cadr project))
                 (cond
                  ((eq backend 'Hg))
                  ((and (eq backend 'Git)