mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

<left-fringe mouse-2, right-fringe mouse-3, left-fringe mouse-3>: New bindings.

Browse Source
This commit is contained in:
Eli Zaretskii 2007-02-02 14:42:38 +00:00
parent 4bbe413d84
commit 84e42e60e1
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/mouse.el
View File

@ -2426,7 +2426,10 @@ and selects that window."
(global-set-key [mouse-2] 'mouse-yank-at-click)
;; Allow yanking also when the corresponding cursor is "in the fringe".
(global-set-key [right-fringe mouse-2] 'mouse-yank-at-click)
(global-set-key [left-fringe mouse-2] 'mouse-yank-at-click)
(global-set-key [mouse-3] 'mouse-save-then-kill)
(global-set-key [right-fringe mouse-3] 'mouse-save-then-kill)
(global-set-key [left-fringe mouse-3] 'mouse-save-then-kill)
;; By binding these to down-going events, we let the user use the up-going
;; event to make the selection, saving a click.