diff options
| author | Richard M. Stallman | 1996-05-09 19:45:49 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-05-09 19:45:49 +0000 |
| commit | 227d2bed6303ced24f5ac1ea4306be685d8665f9 (patch) | |
| tree | 7f6ef2b497c198c889384f71fb527595f097a690 | |
| parent | 9998d430a7abbafc6a89911d679248a77a3c8ad3 (diff) | |
| download | emacs-227d2bed6303ced24f5ac1ea4306be685d8665f9.tar.gz emacs-227d2bed6303ced24f5ac1ea4306be685d8665f9.zip | |
(vc-find-file-hook): Follow multiple links all the way.
| -rw-r--r-- | lisp/vc-hooks.el | 2 |
1 files changed, 1 insertions, 1 deletions
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." | |||
| 953 | (make-local-variable 'backup-inhibited) | 953 | (make-local-variable 'backup-inhibited) |
| 954 | (setq backup-inhibited t)))) | 954 | (setq backup-inhibited t)))) |
| 955 | ((let* ((link (file-symlink-p buffer-file-name)) | 955 | ((let* ((link (file-symlink-p buffer-file-name)) |
| 956 | (link-type (and link (vc-backend link)))) | 956 | (link-type (and link (vc-backend (file-chase-links link))))) |
| 957 | (if link-type | 957 | (if link-type |
| 958 | (cond ((eq vc-follow-symlinks nil) | 958 | (cond ((eq vc-follow-symlinks nil) |
| 959 | (message | 959 | (message |