summaryrefslogtreecommitdiff
path: root/lisp/vc-dispatcher.el
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2009-07-24 05:41:17 +0000
committerDan Nicolaescu <dann@ics.uci.edu>2009-07-24 05:41:17 +0000
commitba83b7b62f12b0305585261f7b08bf1a699aa86b (patch)
treeddc634cd056561c48a0f49be9d552da41f4574a6 /lisp/vc-dispatcher.el
parent1d2faf9803bcd171fdb1d305b1b8f266c445b9dd (diff)
downloademacs-ba83b7b62f12b0305585261f7b08bf1a699aa86b.tar.gz
emacs-ba83b7b62f12b0305585261f7b08bf1a699aa86b.tar.bz2
emacs-ba83b7b62f12b0305585261f7b08bf1a699aa86b.zip
* vc-dispatcher.el (vc-resynch-buffers-in-directory): Make sure
the buffer we try to sync is current when calling vc-resynch-buffer. * vc-dir.el (vc-dir-resynch-file): Make sure vc-dir-update does not show up to date files.
Diffstat (limited to 'lisp/vc-dispatcher.el')
-rw-r--r--lisp/vc-dispatcher.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/vc-dispatcher.el b/lisp/vc-dispatcher.el
index c51a4896b76..f03f16ede98 100644
--- a/lisp/vc-dispatcher.el
+++ b/lisp/vc-dispatcher.el
@@ -484,7 +484,8 @@ editing!"
(dolist (buffer (buffer-list))
(let ((fname (buffer-file-name buffer)))
(when (and fname (vc-string-prefix-p directory fname))
- (vc-resynch-buffer fname keep noquery)))))
+ (with-current-buffer buffer
+ (vc-resynch-buffer fname keep noquery))))))
(defun vc-resynch-buffer (file &optional keep noquery)
"If FILE is currently visited, resynch its buffer."