diff options
| author | Dmitry Gutov <dgutov@yandex.ru> | 2023-04-12 02:03:14 +0300 |
|---|---|---|
| committer | Dmitry Gutov <dgutov@yandex.ru> | 2023-04-12 02:03:14 +0300 |
| commit | 7972b76c2c7426745fad8ea0fc9325f475f728b6 (patch) | |
| tree | b1e75eb25789d76c53c688826a9f7d9803753830 | |
| parent | e9fef1d70ff6b5ed48681e6a1c62e650b108cd55 (diff) | |
| download | emacs-7972b76c2c7426745fad8ea0fc9325f475f728b6.tar.gz | |
; vc-checkout: Wrap var lookup in 'bound-and-true-p'
| -rw-r--r-- | lisp/vc/vc.el | 2 |
1 files changed, 1 insertions, 1 deletions
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) |