help-gnu-emacs
[Top][All Lists]
Advanced

[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




reply via email to

[Prev in Thread] Current Thread [Next in Thread]