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