[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#6220: subword support in isearch-yank-word-or-char
From: |
Masatake YAMATO |
Subject: |
bug#6220: subword support in isearch-yank-word-or-char |
Date: |
Wed, 19 May 2010 19:28:03 +0900 (JST) |
This is not a bug report. This is a request to include my patch to
official emacs tree.
With the patch you can pull a subword as yank text when you do
\C-w in isearch.
(I've submitted this to emacs-devel the last year.
http://lists.gnu.org/archive/html/emacs-devel/2009-12/msg00604.html)
Masatake YAMATO
2009-12-15 Masatake YAMATO <yamato@redhat.com>
* isearch.el (isearch-yank-word-or-char): Pull next subword
when `subword-mode' is activated.
--- isearch.el 7 Dec 2009 17:30:05 -0000 1.351
+++ isearch.el 15 Dec 2009 08:58:40 -0000
@@ -1538,14 +1538,18 @@
(interactive "p")
(isearch-yank-internal (lambda () (forward-char arg) (point))))
+(declare-function subword-forward "subword" (&optional arg))
(defun isearch-yank-word-or-char ()
- "Pull next character or word from buffer into search string."
+ "Pull next character, subword or word from buffer into search string.
+Subword is used when `subword-mode' is activated. "
(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)
+ (if (and (fboundp 'subword-mode) subword-mode)
+ (subword-forward 1)
+ (forward-word 1))
(forward-char 1)) (point))))
(defun isearch-yank-word ()
--- progmodes/subword.el 1 Dec 2009 09:28:23 -0000 1.3
+++ progmodes/subword.el 15 Dec 2009 08:58:40 -0000
@@ -76,7 +76,7 @@
;; the old `c-forward-into-nomenclature' originally contributed by
;; Terry_Glanfield dot Southern at rxuk dot xerox dot com.
-;; TODO: ispell-word and subword oriented C-w in isearch.
+;; TODO: ispell-word.
;;; Code:
- bug#6220: subword support in isearch-yank-word-or-char,
Masatake YAMATO <=