1809 |
((eq char ?|) (isearch-fallback t nil t))) |
((eq char ?|) (isearch-fallback t nil t))) |
1810 |
|
|
1811 |
;; Append the char to the search string, update the message and re-search. |
;; Append the char to the search string, update the message and re-search. |
1812 |
|
(if (char-table-p translation-table-for-input) |
1813 |
|
(setq char (or (aref translation-table-for-input char) char))) |
1814 |
(isearch-process-search-string |
(isearch-process-search-string |
1815 |
(char-to-string char) |
(char-to-string char) |
1816 |
(if (>= char ?\200) |
(if (>= char ?\200) |