diff options
| author | Kenichi Handa <handa@m17n.org> | 2005-12-10 01:14:23 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2005-12-10 01:14:23 +0000 |
| commit | 332ee54425a3a0710a83960945168a8e465ff5e0 (patch) | |
| tree | 84567540b8f719a5de7a13b30997f0abaca65cad /lisp/isearch.el | |
| parent | ea9fc1bdb20fec973618f1bca525bbefaefa69eb (diff) | |
| download | emacs-332ee54425a3a0710a83960945168a8e465ff5e0.tar.gz | |
(isearch-process-search-char): Translate CHAR by
translation-table-for-input.
Diffstat (limited to 'lisp/isearch.el')
| -rw-r--r-- | lisp/isearch.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index fe764b3d41d..65fc1f0a394 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -1809,6 +1809,8 @@ Isearch mode." ((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) |