(mouse-sel-mode): Register mouse-2 as a click type.
This commit is contained in:
parent
c417f2a3c7
commit
92280c3284
1 changed files with 4 additions and 0 deletions
|
@ -244,6 +244,10 @@ primary selection and region."
|
|||
: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.
|
||||
|
|
Loading…
Reference in a new issue