[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 34ac7d90876: Make vc-hg-annotate-command async
From: |
Dmitry Gutov |
Subject: |
master 34ac7d90876: Make vc-hg-annotate-command async |
Date: |
Thu, 4 May 2023 19:46:18 -0400 (EDT) |
branch: master
commit 34ac7d908762663e4f91b678d3456286c494c237
Author: Spencer Baugh <sbaugh@janestreet.com>
Commit: Dmitry Gutov <dmitry@gutov.dev>
Make vc-hg-annotate-command async
There's no benefit in this running the process synchrounously, and
it's annoying for it to block the Emacs UI.
* lisp/vc/vc-hg.el (vc-hg-annotate-command):
Run asynchronously (bug#63123).
---
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 5bab9aa529e..78480fd8062 100644
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -578,7 +578,7 @@ This requires hg 4.4 or later, for the \"-L\" option of
\"hg log\"."
(defun vc-hg-annotate-command (file buffer &optional revision)
"Execute \"hg annotate\" on FILE, inserting the contents in BUFFER.
Optional arg REVISION is a revision to annotate from."
- (apply #'vc-hg-command buffer 0 file "annotate" "-dq" "-n"
+ (apply #'vc-hg-command buffer 'async file "annotate" "-dq" "-n"
(append (vc-switches 'hg 'annotate)
(if revision (list (concat "-r" revision))))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 34ac7d90876: Make vc-hg-annotate-command async,
Dmitry Gutov <=