diff options
author | Po Lu <luangruo@yahoo.com> | 2022-10-06 10:55:25 +0800 |
---|---|---|
committer | Po Lu <luangruo@yahoo.com> | 2022-10-06 10:56:27 +0800 |
commit | 8e8d37aa326870ebf0ff6c07b4e37ae6abcf79b6 (patch) | |
tree | 36f50fe87723e2d7b43ff0a25e0a085bb010ed13 /lisp | |
parent | c690d1f15d274d50ed21d4aa1b98a23de8d7e1e6 (diff) | |
download | emacs-8e8d37aa326870ebf0ff6c07b4e37ae6abcf79b6.tar.gz emacs-8e8d37aa326870ebf0ff6c07b4e37ae6abcf79b6.tar.bz2 emacs-8e8d37aa326870ebf0ff6c07b4e37ae6abcf79b6.zip |
Minor fixes to IM locale handling
* lisp/term/x-win.el (x-get-input-coding-system): Translate locales.
* src/xterm.c (x_term_init): If the X library doesn't support
the current locale, don't set up input methods.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/term/x-win.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index 57c6b785e73..62684f52cc9 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el @@ -1623,7 +1623,7 @@ found." (if (equal x-locale "C") ;; Treat the C locale specially, as it means "ascii" under X. 'ascii - (let ((locale (downcase x-locale))) + (let ((locale (locale-translate (downcase x-locale)))) (or (locale-name-match locale locale-preferred-coding-systems) (when locale (if (string-match "\\.\\([^@]+\\)" locale) |