mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-03 14:10:47 -08:00
Code Issues Projects Releases Wiki Activity

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

Browse source 
resyncing a directory.
This commit is contained in:
Dan Nicolaescu 2010-01-17 12:36:21 -08:00
parent 607d436922
commit 4d0bbcb62a
2 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
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.

5
lisp/vc-dir.el
View file

@ -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)