emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/vc-fossil 4d3e1cb 086/111: Update vc-dir header info after


From: ELPA Syncer
Subject: [nongnu] elpa/vc-fossil 4d3e1cb 086/111: Update vc-dir header info after fossil commands.
Date: Wed, 29 Sep 2021 08:59:26 -0400 (EDT)

branch: elpa/vc-fossil
commit 4d3e1cba76cf54132d01d328dc43bc836eaf7f5c
Author: pdo <pdo>
Commit: pdo <pdo>

    Update vc-dir header info after fossil commands.
---
 vc/el/vc-fossil.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/vc/el/vc-fossil.el b/vc/el/vc-fossil.el
index 83bf040..11cff12 100644
--- a/vc/el/vc-fossil.el
+++ b/vc/el/vc-fossil.el
@@ -112,7 +112,9 @@ If nil, use the value of `vc-diff-switches'.  If t, use no 
switches."
 (defun vc-fossil--command (buffer okstatus file-or-list &rest flags)
   "A wrapper around `vc-do-command' for use in vc-fossil.el.
   The difference to vc-do-command is that this function always invokes 
`fossil'."
-  (apply #'vc-do-command (or buffer "*vc*") okstatus "fossil" file-or-list 
flags))
+  (apply #'vc-do-command (or buffer "*vc*") okstatus "fossil" file-or-list 
flags)
+  (when (eql major-mode 'vc-dir-mode)  ; update header info
+    (revert-buffer (current-buffer))))
 
 (defun vc-fossil--get-id (dir)
   (let* ((default-directory dir)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]