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

Improve state updating for VC tag commands.

Browse source 
* lisp/vc.el (vc-create-tag, vc-retrieve-tag): Call vc-resynch-buffer
to update the state of all buffers in the directory.
This commit is contained in:
Dan Nicolaescu 2010-06-01 02:37:49 -07:00
parent c4ce1145cb
commit 5828f6cacc
2 changed files with 6 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,5 +1,9 @@
2010-06-01 Dan Nicolaescu <dann@ics.uci.edu>
Improve state updating for VC tag commands.
* vc.el (vc-create-tag, vc-retrieve-tag): Call vc-resynch-buffer
to update the state of all buffers in the directory.
* vc-dir.el (vc-dir-update): Remove entries with a nil state (bug#5539).
2010-06-01 Stefan Monnier <monnier@iro.umontreal.ca>

2
lisp/vc.el
View file

@ -1903,6 +1903,7 @@ checked out in that new branch."
(when (file-directory-p dir) (setq dir (file-name-as-directory dir)))
(vc-call-backend (vc-responsible-backend dir)
'create-tag dir name branchp)
(vc-resynch-buffer dir t t)
(message "Making %s... done" (if branchp "branch" "tag")))
;;;###autoload
@ -1923,6 +1924,7 @@ allowed and simply skipped)."
(message "%s" msg)
(vc-call-backend (vc-responsible-backend dir)
'retrieve-tag dir name update)
(vc-resynch-buffer dir t t)
(message "%s" (concat msg "done"))))
;; Miscellaneous other entry points