From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 1 Jun 1994 18:28:06 +0000 (+0000)
Subject: (completion-list-mode-map): Unbind down-mouse-2.
X-Git-Tag: emacs-19.34~8091
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=eaf7606559759ce9abbd92a423bd4fdeafd4ae05;p=emacs.git

(completion-list-mode-map): Unbind down-mouse-2.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index 4b00ad6f8fc..b55487968e6 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -2425,6 +2425,7 @@ it were the arg to `interactive' (which see) to interactively read the value."
 (or completion-list-mode-map
     (let ((map (make-sparse-keymap)))
       (define-key map [mouse-2] 'mouse-choose-completion)
+      (define-key map [down-mouse-2] nil)
       (define-key map "\C-m" 'choose-completion)
       (define-key map [return] 'choose-completion)
       (setq completion-list-mode-map map)))