# HG changeset patch # User Kenichi Handa # Date 1204163862 0 # Node ID d38d15e5ee31e9330ac2ded33c5c7a96dc63d00c # Parent 7898dbba29fe3773a44feadad44a7579315eb4ec (isearch-printing-char): Don't check keyboard-coding-system. Call isearch-process-search-multibyte-characters only when current-input-method is non-nil. diff -r 7898dbba29fe -r d38d15e5ee31 lisp/isearch.el --- a/lisp/isearch.el Wed Feb 27 22:53:11 2008 +0000 +++ b/lisp/isearch.el Thu Feb 28 01:57:42 2008 +0000 @@ -1842,15 +1842,9 @@ (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 \.