# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1134177203 0
# Node ID e6b4f71376993dd309dc6c7482e1fa4aef0259cc
# Parent  0d03cdfa9108f23a6a9aa0ca491450053e3664f5
(isearch-process-search-char): Translate CHAR by
translation-table-for-input.

diff -r 0d03cdfa9108 -r e6b4f7137699 lisp/isearch.el
--- a/lisp/isearch.el	Sat Dec 10 01:12:25 2005 +0000
+++ b/lisp/isearch.el	Sat Dec 10 01:13:23 2005 +0000
@@ -1809,6 +1809,8 @@
    ((eq   char ?|)       (isearch-fallback t nil t)))
 
   ;; Append the char to the search string, update the message and re-search.
+  (if (char-table-p translation-table-for-input)
+      (setq char (or (aref translation-table-for-input char) char)))
   (isearch-process-search-string
    (char-to-string char)
    (if (>= char ?\200)