[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master b5b0f07: Remove extra process call from vc-hg-registered
From: |
Dmitry Gutov |
Subject: |
master b5b0f07: Remove extra process call from vc-hg-registered |
Date: |
Tue, 10 Nov 2020 10:43:16 -0500 (EST) |
branch: master
commit b5b0f07b0a4acd6bdbbaf27744cf0e06f54d3008
Author: Tom Fitzhenry <tomfitzhenry@google.com>
Commit: Dmitry Gutov <dgutov@yandex.ru>
Remove extra process call from vc-hg-registered
Prefer vc-state to benefit from its caching (bug#44534)
This same technique is used in vc-git.el,
per commit 2018-06-28 "Remove extra process call from vc-git-find-file-hook"
93c41ce6aa64b14fc9bd7bdd0d909915a79191cd.
* lisp/vc/vc-hg.el (vc-hg-registered): Use vc-state rather than vc-hg-state.
---
lisp/vc/vc-hg.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el
index cb0657e..cacdee2 100644
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -222,7 +222,7 @@ If `ask', you will be prompted for a branch type."
(defun vc-hg-registered (file)
"Return non-nil if FILE is registered with hg."
(when (vc-hg-root file) ; short cut
- (let ((state (vc-hg-state file))) ; expensive
+ (let ((state (vc-state file 'Hg))) ; expensive
(and state (not (memq state '(ignored unregistered)))))))
(defun vc-hg-state (file)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master b5b0f07: Remove extra process call from vc-hg-registered,
Dmitry Gutov <=