mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(vc-find-file-hook): Follow multiple links all the way.

Browse Source
This commit is contained in:
Richard M. Stallman 1996-05-09 19:45:49 +00:00
parent 9998d430a7
commit 227d2bed63
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/vc-hooks.el
View File

@ -953,7 +953,7 @@ control system name."
(make-local-variable 'backup-inhibited)
(setq backup-inhibited t))))
((let* ((link (file-symlink-p buffer-file-name))
(link-type (and link (vc-backend link))))
(link-type (and link (vc-backend (file-chase-links link)))))
(if link-type
(cond ((eq vc-follow-symlinks nil)
(message