2499 |
;; normal-mode and minibuffer-setup-hook. |
;; normal-mode and minibuffer-setup-hook. |
2500 |
(defun ucs-set-table-for-input (&optional buffer) |
(defun ucs-set-table-for-input (&optional buffer) |
2501 |
"Set up an appropriate `translation-table-for-input' for BUFFER. |
"Set up an appropriate `translation-table-for-input' for BUFFER. |
2502 |
BUFFER defaults to the current buffer. |
BUFFER defaults to the current buffer. This function is |
2503 |
This function is automatically called directly at the end of `get-buffer-create'." |
automatically called directly at the end of `get-buffer-create'." |
2504 |
(when (and unify-8859-on-encoding-mode |
(when (and unify-8859-on-encoding-mode |
2505 |
(not unify-8859-on-decoding-mode) |
(not unify-8859-on-decoding-mode) |
2506 |
(char-table-p translation-table-for-input)) |
(char-table-p translation-table-for-input)) |