From d086b1a2491d8da73f65ae6dbfe11146e226a9dc Mon Sep 17 00:00:00 2001
From: "Kim F. Storm" <storm@cua.dk>
Date: Fri, 17 Dec 2004 15:17:35 +0000
Subject: [PATCH] (cvs-mode-map): Map follow-link to a function which checks if
 position is in a filename, rather than some other clickable item.  Function
 looks for cvs-filename-face at position.

---
 lisp/pcvs-defs.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/pcvs-defs.el b/lisp/pcvs-defs.el
index 6bdd6bb6dd8..27629c5ddc6 100644
--- a/lisp/pcvs-defs.el
+++ b/lisp/pcvs-defs.el
@@ -380,6 +380,8 @@ This variable is buffer local and only used in the *cvs* buffer.")
     ("+" .	cvs-mode-tree)
     ;; mouse bindings
     ([mouse-2] . cvs-mode-find-file)
+    ([follow-link] . (lambda (pos)
+		       (if (eq (get-char-property pos 'face) 'cvs-filename-face) t)))
     ([(down-mouse-3)] . cvs-menu)
     ;; dired-like bindings
     ("\C-o" .   cvs-mode-display-file)
-- 
2.11.4.GIT