Mercurial > emacs
changeset 75610:e50186bf86ca
<left-fringe mouse-2, right-fringe mouse-3, left-fringe mouse-3>: New bindings.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Fri, 02 Feb 2007 14:42:38 +0000 |
| parents | df15b3ed8eb1 |
| children | 3152205d89a5 |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Fri Feb 02 14:39:39 2007 +0000 +++ b/lisp/mouse.el Fri Feb 02 14:42:38 2007 +0000 @@ -2426,7 +2426,10 @@ (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.