Mercurial > emacs

changeset 14674:f585d3bf3a73

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-follow-link): Kill buffer before creating new one.
author Richard M. Stallman <rms@gnu.org>
date Mon, 26 Feb 1996 00:19:35 +0000
parents 8f8a4224147b
children 17721fd2267b
files lisp/vc-hooks.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc-hooks.el	Mon Feb 26 00:17:43 1996 +0000
+++ b/lisp/vc-hooks.el	Mon Feb 26 00:19:35 1996 +0000
@@ -929,11 +929,11 @@
 	 (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))))