From 227d2bed6303ced24f5ac1ea4306be685d8665f9 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 9 May 1996 19:45:49 +0000 Subject: [PATCH] (vc-find-file-hook): Follow multiple links all the way. --- lisp/vc-hooks.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- 2.39.5