diff options
| -rw-r--r-- | lisp/isearch.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index bcc82b79b8b..05710466adc 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -966,7 +966,11 @@ If no previous match was done, just beep." | |||
| 966 | (isearch-yank-string (current-kill 0))) | 966 | (isearch-yank-string (current-kill 0))) |
| 967 | 967 | ||
| 968 | (defun isearch-yank-x-selection () | 968 | (defun isearch-yank-x-selection () |
| 969 | "Pull current X selection into search string." | 969 | "Pull current X selection into search string. |
| 970 | Some users like to put this command on Mouse-2. | ||
| 971 | To do that, evaluate these expressions: | ||
| 972 | (define-key isearch-mode-map [down-mouse-2] nil) | ||
| 973 | (define-key isearch-mode-map [mouse-2] 'isearch-yank-x-selection)" | ||
| 970 | (interactive) | 974 | (interactive) |
| 971 | (isearch-yank-string (x-get-selection))) | 975 | (isearch-yank-string (x-get-selection))) |
| 972 | 976 | ||