Mercurial > emacs
comparison lisp/isearch.el @ 25572:ab9550c61b8a
(isearch-mode-map): Add mouse-2.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Mon, 06 Sep 1999 21:33:27 +0000 |
| parents | ef8649234d91 |
| children | 2ae0f7963ccc |
comparison
equal
deleted
inserted
replaced
| 25571:86658a5ab908 | 25572:ab9550c61b8a |
|---|---|
| 309 (define-key map [iconify-frame] nil) | 309 (define-key map [iconify-frame] nil) |
| 310 (define-key map [make-frame-visible] nil) | 310 (define-key map [make-frame-visible] nil) |
| 311 ;; For searching multilingual text. | 311 ;; For searching multilingual text. |
| 312 (define-key map "\C-\\" 'isearch-toggle-input-method) | 312 (define-key map "\C-\\" 'isearch-toggle-input-method) |
| 313 (define-key map "\C-^" 'isearch-toggle-specified-input-method) | 313 (define-key map "\C-^" 'isearch-toggle-specified-input-method) |
| 314 | |
| 315 ;; People expect to be able to paste with the mouse. | |
| 316 (define-key map [mouse-2] #'isearch-yank-kill) | |
| 317 (define-key map [down-mouse-2] nil) | |
| 314 | 318 |
| 315 (setq isearch-mode-map map) | 319 (setq isearch-mode-map map) |
| 316 )) | 320 )) |
| 317 | 321 |
| 318 ;; Some bindings you may want to put in your isearch-mode-hook. | 322 ;; Some bindings you may want to put in your isearch-mode-hook. |