[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: isearch C-o patch (post-freeze resubmission)
From: |
Kenichi Handa |
Subject: |
Re: isearch C-o patch (post-freeze resubmission) |
Date: |
Mon, 3 Dec 2001 10:46:48 +0900 (JST) |
User-agent: |
SEMI/1.14.3 (Ushinoya) FLIM/1.14.2 (Yagi-Nishiguchi) APEL/10.2 Emacs/21.1.30 (sparc-sun-solaris2.6) MULE/5.0 (SAKAKI) |
address@hidden (Kim F. Storm) writes:
> Please try this version - it handles the above case nicely
> but isn't greedy if there are multiple non-word characters
> between words!
> (defun isearch-yank-word ()
> "Pull next word or symbol from buffer into search string."
> (interactive)
> (isearch-yank-internal (lambda ()
> (if (or (= (char-syntax (or (char-after) 0)) ?w)
> (= (char-syntax (or (char-after (1+
> (point))) 0)) ?w))
> (forward-word 1)
> (forward-char 1)) (point))))
Thank you. Yes, it works quite well for me (although it
seems that the trick used there is somewhat ad hoc).
---
Ken'ichi HANDA
address@hidden