summaryrefslogtreecommitdiff
path: root/lisp/vc-dir.el
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2010-01-17 12:36:21 -0800
committerDan Nicolaescu <dann@ics.uci.edu>2010-01-17 12:36:21 -0800
commit4d0bbcb62adfaa4d29657ee93dfbd7fec2bd51f5 (patch)
tree67f16df6087358fbde18e6185142d4f5a888b363 /lisp/vc-dir.el
parent607d436922d20758f2af4b70a0c53e73739b5487 (diff)
(vc-dir-resynch-file): Update the vc-dir header when
resyncing a directory.
Diffstat (limited to 'lisp/vc-dir.el')
-rw-r--r--lisp/vc-dir.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/vc-dir.el b/lisp/vc-dir.el
index 575a64c1f8..2f661e8bec 100644
--- a/lisp/vc-dir.el
+++ b/lisp/vc-dir.el
@@ -874,7 +874,10 @@ If it is a file, return the corresponding cons for the file itself."
(let ((ddir default-directory))
(when (vc-string-prefix-p ddir file)
(if (file-directory-p file)
- (vc-dir-resync-directory-files file)
+ (progn
+ (vc-dir-resync-directory-files file)
+ (ewoc-set-hf vc-ewoc
+ (vc-dir-headers vc-dir-backend default-directory) ""))
(let ((state (vc-dir-recompute-file-state file ddir)))
(vc-dir-update
(list state)