Mercurial > emacs
changeset 74530:b1d0c631bbe2
(mouse-sel-mode): Register mouse-2 as a click type.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Sat, 09 Dec 2006 17:41:14 +0000 |
| parents | 0d7ab079b8a6 |
| children | 76a88b32996a |
| files | lisp/mouse-sel.el |
| diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse-sel.el Sat Dec 09 16:16:24 2006 +0000 +++ b/lisp/mouse-sel.el Sat Dec 09 17:41:14 2006 +0000 @@ -244,6 +244,10 @@ :group 'mouse-sel (if mouse-sel-mode (progn + ;; If mouse-2 has never been done by the user, initialize the + ;; `event-kind' property to ensure that `follow-link' clicks + ;; are interpreted correctly. + (put 'mouse-2 'event-kind 'mouse-click) (add-hook 'x-lost-selection-functions 'mouse-sel-lost-selection-hook) (when mouse-sel-default-bindings ;; Save original bindings and replace them with new ones.