diff options
| author | Kenichi Handa <handa@m17n.org> | 2008-02-28 01:57:42 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2008-02-28 01:57:42 +0000 |
| commit | cc065a5c6b05b3e8197046bac1b057a023bc3b33 (patch) | |
| tree | 9388e43f4e1ad26e3abdd7d56d740292f9478d0e /lisp/isearch.el | |
| parent | 78b84d0095c5e1c875cf162b50f81285b8d5d29a (diff) | |
| download | emacs-cc065a5c6b05b3e8197046bac1b057a023bc3b33.tar.gz | |
(isearch-printing-char): Don't check
keyboard-coding-system. Call
isearch-process-search-multibyte-characters only when
current-input-method is non-nil.
Diffstat (limited to 'lisp/isearch.el')
| -rw-r--r-- | lisp/isearch.el | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index bbe2363d57b..750ed129b7e 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -1842,15 +1842,9 @@ Isearch mode." (let ((char last-command-char)) (if (= char ?\S-\ ) (setq char ?\s)) - (if (and enable-multibyte-characters - (>= char ?\200) - (<= char ?\377)) - (if (keyboard-coding-system) - (isearch-process-search-multibyte-characters char) - (isearch-process-search-char (unibyte-char-to-multibyte char))) - (if current-input-method - (isearch-process-search-multibyte-characters char) - (isearch-process-search-char char))))) + (if current-input-method + (isearch-process-search-multibyte-characters char) + (isearch-process-search-char char)))) (defun isearch-process-search-char (char) ;; * and ? are special in regexps when not preceded by \. |