diff options
| author | Richard M. Stallman | 1994-06-01 18:28:06 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-06-01 18:28:06 +0000 |
| commit | eaf7606559759ce9abbd92a423bd4fdeafd4ae05 (patch) | |
| tree | cfb1e018bb889fa66929e8ffb20ec9dbd6c34e65 | |
| parent | d098eb394e497e37fc65b1c52eb8a0704836d46a (diff) | |
| download | emacs-eaf7606559759ce9abbd92a423bd4fdeafd4ae05.tar.gz emacs-eaf7606559759ce9abbd92a423bd4fdeafd4ae05.zip | |
(completion-list-mode-map): Unbind down-mouse-2.
| -rw-r--r-- | lisp/simple.el | 1 |
1 files changed, 1 insertions, 0 deletions
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." | |||
| 2425 | (or completion-list-mode-map | 2425 | (or completion-list-mode-map |
| 2426 | (let ((map (make-sparse-keymap))) | 2426 | (let ((map (make-sparse-keymap))) |
| 2427 | (define-key map [mouse-2] 'mouse-choose-completion) | 2427 | (define-key map [mouse-2] 'mouse-choose-completion) |
| 2428 | (define-key map [down-mouse-2] nil) | ||
| 2428 | (define-key map "\C-m" 'choose-completion) | 2429 | (define-key map "\C-m" 'choose-completion) |
| 2429 | (define-key map [return] 'choose-completion) | 2430 | (define-key map [return] 'choose-completion) |
| 2430 | (setq completion-list-mode-map map))) | 2431 | (setq completion-list-mode-map map))) |