From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 9 May 1996 19:45:49 +0000 (+0000)
Subject: (vc-find-file-hook): Follow multiple links all the way.
X-Git-Tag: emacs-19.34~666
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=227d2bed6303ced24f5ac1ea4306be685d8665f9;p=emacs.git

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

diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index 38b91ddef85..5005c30383a 100644
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -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