Mercurial > emacs
changeset 67447:e6b4f7137699
(isearch-process-search-char): Translate CHAR by
translation-table-for-input.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Sat, 10 Dec 2005 01:13:23 +0000 |
| parents | 0d03cdfa9108 |
| children | e6b0c5988518 |
| files | lisp/isearch.el |
| diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- 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)