# HG changeset patch # User Eli Zaretskii # Date 1170427358 0 # Node ID e50186bf86ca6fd19f5651c6d391a737a76f0b76 # Parent df15b3ed8eb1b6a92cd56812c767a92ef7219ee3 : New bindings. diff -r df15b3ed8eb1 -r e50186bf86ca lisp/mouse.el --- 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.