Improve state updating for VC tag commands.

* lisp/vc.el (vc-create-tag, vc-retrieve-tag): Call vc-resynch-buffer
to update the state of all buffers in the directory.

lisp/ChangeLog

 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>

lisp/vc.el

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