1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-24 17:00:44 -08:00

(vc-follow-link): Kill buffer before creating new one.

This commit is contained in:
Richard M. Stallman 1996-02-26 00:19:35 +00:00
parent e7f5ddc2c8
commit d822195158

View file

@ -929,11 +929,11 @@ control system name."
(this-buffer (current-buffer)))
(if (eq true-buffer this-buffer)
(progn
(kill-buffer this-buffer)
;; In principle, we could do something like set-visited-file-name.
;; However, it can't be exactly the same as set-visited-file-name.
;; I'm not going to work out the details right now. -- rms.
(set-buffer (find-file-noselect truename))
(kill-buffer this-buffer))
(set-buffer (find-file-noselect truename)))
(set-buffer true-buffer)
(kill-buffer this-buffer))))