1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-05 20:43:08 +00:00

(vc-follow-link): Complete last change.

This commit is contained in:
Stefan Monnier 2008-11-23 05:10:53 +00:00
parent 179bdd6061
commit 066b7259c2
2 changed files with 5 additions and 1 deletions

View File

@ -1,3 +1,7 @@
2008-11-23 Stefan Monnier <monnier@iro.umontreal.ca>
* vc-hooks.el (vc-follow-link): Complete last change.
2008-11-23 Juanma Barranquero <lekktu@gmail.com>
* textmodes/remember.el (remember-region): Doc fix.

View File

@ -853,7 +853,7 @@ current, and kill the buffer that visits the link."
(let* ((true-buffer (find-buffer-visiting buffer-file-truename))
(this-buffer (current-buffer)))
(if (eq true-buffer this-buffer)
(progn
(let ((truename buffer-file-truename))
(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.