Commit 4d0bbcb6 authored by Dan Nicolaescu's avatar Dan Nicolaescu
Browse files

(vc-dir-resynch-file): Update the vc-dir header when

resyncing a directory.
parent 607d4369
2010-01-17 Dan Nicolaescu <dann@ics.uci.edu>
* vc-dir.el (vc-dir-resynch-file): Update the vc-dir header when
resyncing a directory.
2010-01-17 Stephen Leake <stephen_leake@member.fsf.org>
* progmodes/ada-mode.el: Fix bug#1920, bug#5400.
......
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment