branch: externals/urgrep
commit f2ac6d6b02e2b523f273a47676ca7749cf524dbe
Author: Jim Porter <jporterb...@gmail.com>
Commit: Jim Porter <jporterb...@gmail.com>
Fix getting vc backend
---
urgrep.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/urgrep.el b/urgrep.el
index fee83317fc..b69448f899 100644
--- a/urgrep.el
+++ b/urgrep.el
@@ -106,9 +106,10 @@
(let ((tool-executable (urgrep-get-property tool 'executable-name))
(tool-vc-backend (urgrep-get-property tool 'vc-backend)))
;; Cache the VC backend name if we need it.
- (when (and tool-vc-backend (not vc-backend-name))
+ (when-let (((and tool-vc-backend (not vc-backend-name)))
+ (curr-proj (project-current)))
(setq vc-backend-name
- (vc-responsible-backend (project-root (project-current)))))
+ (vc-responsible-backend (project-root curr-proj))))
(when (and (executable-find tool-executable t)
(or (not tool-vc-backend)
(string= vc-backend-name tool-vc-backend)))
