From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 2 Feb 2007 14:42:38 +0000 (+0000)
Subject: <left-fringe mouse-2, right-fringe mouse-3, left-fringe mouse-3>: New bindings.
X-Git-Tag: emacs-pretest-22.0.94~452
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=84e42e60e1660e9f20f0b2a785a08d452a8b12c2;p=emacs.git

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

diff --git a/lisp/mouse.el b/lisp/mouse.el
index c221a9bee99..dae098ec117 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -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.