Mercurial > emacs
changeset 59022:0b09c3970de0
(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.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Fri, 17 Dec 2004 15:17:35 +0000 |
| parents | cef0d0d34987 |
| children | fa849ef3cf2c |
| files | lisp/pcvs-defs.el |
| diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/pcvs-defs.el Fri Dec 17 15:17:22 2004 +0000 +++ b/lisp/pcvs-defs.el Fri Dec 17 15:17:35 2004 +0000 @@ -380,6 +380,8 @@ ("+" . 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)