From: Dmitry Gutov <dgutov@yandex.ru>
Date: Tue, 11 Apr 2023 23:03:14 +0000 (+0300)
Subject: ; vc-checkout: Wrap var lookup in 'bound-and-true-p'
X-Git-Tag: emacs-29.0.91~150
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7972b76c2c7426745fad8ea0fc9325f475f728b6;p=emacs.git

; vc-checkout: Wrap var lookup in 'bound-and-true-p'
---

diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index de1e38a0ef9..c64da1233d1 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -1594,7 +1594,7 @@ After check-out, runs the normal hook `vc-checkout-hook'."
        (vc-call make-version-backups-p file)
        (vc-up-to-date-p file)
        (vc-make-version-backup file))
-  (let ((backend (or vc-dir-backend (vc-backend file))))
+  (let ((backend (or (bound-and-true-p vc-dir-backend) (vc-backend file))))
     (with-vc-properties (list file)
       (condition-case err
           (vc-call-backend backend 'checkout file rev)