From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 26 Feb 1996 00:19:35 +0000 (+0000)
Subject: (vc-follow-link): Kill buffer before creating new one.
X-Git-Tag: emacs-19.34~1186
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d822195158685fb50fc637c461c0e8414b4d94de;p=emacs.git

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

diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index 9fce8a43d09..ea4fd6543f5 100644
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -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))))