[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: isearch and yank word doubt
From: |
Kevin Rodgers |
Subject: |
Re: isearch and yank word doubt |
Date: |
Thu, 30 May 2013 22:57:36 -0600 |
User-agent: |
Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10.4; en-US; rv:1.9.2.28) Gecko/20120306 Thunderbird/3.1.20 |
On 5/30/13 12:42 AM, Luca Ferrari wrote:
Hi all,
according to the manual the C-s C-w yanks the next word the cursor is
on as the string to search with isearch. Often I found myself having
the cursor in the middle of a word, so I have to go back to the
beginning and then do the yank, is there a better way to instrument
C-s C-w to get the word the cursor is in?
I like it!
(defun isearch-yank-word-at-point ()
"Pull the word around point from buffer into search string."
(interactive)
;; see isearch-yank-word-or-char and isearch-yank-internal:
(isearch-yank-string
(save-excursion
(when (and (not isearch-forward) isearch-other-end)
(goto-char isearch-other-end))
(when (= (char-syntax (or (char-after (1- (point))) 0)) ?w)
(forward-word -1))
(buffer-substring-no-properties (point)
(progn (forward-word 1) (point))))))
(define-key isearch-mode-map "\C-w" 'isearch-yank-word-at-point)
--
Kevin Rodgers
Denver, Colorado, USA