diff options
author | Eli Zaretskii <[email protected]> | 2001-12-24 16:52:50 +0000 |
---|---|---|
committer | Eli Zaretskii <[email protected]> | 2001-12-24 16:52:50 +0000 |
commit | a9a9b2e3c31fdc242ddb5033571e137c9bdc203d (patch) | |
tree | b78040b07af9b6d556e8b52d4a80bdba650fc597 /lisp/term | |
parent | 7c425d82b0c1adaf86d1a038e1c353d7331c4eb1 (diff) |
(dos-cpNNN-setup, dos-codepage-setup):
Call IT-setup-unicode-display here instead of adding it to
dos-codepage-setup-hook, so that Unicode display tables are set
before dos-codepage-setup-hook runs.
Diffstat (limited to 'lisp/term')
-rw-r--r-- | lisp/term/internal.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/term/internal.el b/lisp/term/internal.el index ede278129a..1aa3c5b181 100644 --- a/lisp/term/internal.el +++ b/lisp/term/internal.el @@ -607,6 +607,9 @@ display tables, and the language environment options as appropriate." (setq default-terminal-coding-system (intern (concat cp "-unix")))) (IT-display-table-setup cp) + ;; It's time: too many input methods in leim/quail produce + ;; Unicode characters. Let the user see them. + (IT-setup-unicode-display) (prefer-coding-system (intern (concat cp "-dos"))) (if default-enable-multibyte-characters ;; We want this in multibyte version only, since unibyte version @@ -705,6 +708,9 @@ list. You can (and should) also run it whenever the value of ;; Assume they support non-ASCII Latin characters like the IBM ;; codepage 437 does. (IT-display-table-setup "cp437") + ;; It's time: too many input methods in leim/quail produce + ;; Unicode characters. Let the user see them. + (IT-setup-unicode-display) (prefer-coding-system coding-dos) (if default-enable-multibyte-characters (setq unibyte-display-via-language-environment t)) @@ -714,9 +720,6 @@ list. You can (and should) also run it whenever the value of ;; until after the terminal is set and user's .emacs is processed, ;; because people might define their `dos-codepage-setup-hook' there. (add-hook 'term-setup-hook 'dos-codepage-setup) -;; It's time: too many input methods in leim/quail produce -;; Unicode characters. Let the user see them. -(add-hook 'term-setup-hook 'IT-setup-unicode-display t) ;; In multibyte mode, we want unibyte buffers to be displayed using ;; the terminal coding system, so that they display correctly on the |