changeset 15196:414e523050d5

(vc-find-file-hook): Follow multiple links all the way.
author Richard M. Stallman <rms@gnu.org>
date Thu, 09 May 1996 19:45:49 +0000
parents 160e99f12c6d
children a97349b06c2c
files lisp/vc-hooks.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc-hooks.el	Thu May 09 17:41:53 1996 +0000
+++ b/lisp/vc-hooks.el	Thu May 09 19:45:49 1996 +0000
@@ -953,7 +953,7 @@
 	     (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