diff options
Diffstat (limited to 'lisp/man.el')
| -rw-r--r-- | lisp/man.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/man.el b/lisp/man.el index a384bf34e29..e9503ca883a 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -415,13 +415,15 @@ Otherwise, the value is whatever the function ;; buttons (define-button-type 'Man-xref-man-page 'action (lambda (button) (man-follow (button-label button))) - 'help-echo "RET, mouse-2: display this man page") + 'follow-link t + 'help-echo "mouse-2, RET: display this man page") (define-button-type 'Man-xref-header-file 'action (lambda (button) (let ((w (button-get button 'Man-target-string))) (unless (Man-view-header-file w) (error "Cannot find header file: %s" w)))) + 'follow-link t 'help-echo "mouse-2: display this header file") (define-button-type 'Man-xref-normal-file @@ -433,6 +435,7 @@ Otherwise, the value is whatever the function (view-file f) (error "Cannot read a file: %s" f)) (error "Cannot find a file: %s" f)))) + 'follow-link t 'help-echo "mouse-2: display this file") |