# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 936653607 0
# Node ID ab9550c61b8aba46539522b084a1868b260b1f0b
# Parent  86658a5ab9083d3fcced06af1558f6b16ee5027b
(isearch-mode-map): Add mouse-2.

diff -r 86658a5ab908 -r ab9550c61b8a lisp/isearch.el
--- a/lisp/isearch.el	Mon Sep 06 21:24:50 1999 +0000
+++ b/lisp/isearch.el	Mon Sep 06 21:33:27 1999 +0000
@@ -312,6 +312,10 @@
       (define-key map "\C-\\" 'isearch-toggle-input-method)
       (define-key map "\C-^" 'isearch-toggle-specified-input-method)
 
+      ;; People expect to be able to paste with the mouse.
+      (define-key map [mouse-2] #'isearch-yank-kill)
+      (define-key map [down-mouse-2] nil)
+
       (setq isearch-mode-map map)
       ))