diff options
Diffstat (limited to 'lisp/language/china-util.el')
| -rw-r--r-- | lisp/language/china-util.el | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/lisp/language/china-util.el b/lisp/language/china-util.el index 8cdf3901225..a4a2569a3d0 100644 --- a/lisp/language/china-util.el +++ b/lisp/language/china-util.el @@ -28,25 +28,19 @@ (defun setup-chinese-gb-environment () "Setup multilingual environment (MULE) for Chinese GB2312 users." (interactive) - (setup-english-environment) - (set-language-environment-coding-systems "Chinese-GB") - (setq default-input-method "chinese-py-punct")) + (set-language-environment "Chinese-GB")) ;;;###autoload (defun setup-chinese-big5-environment () "Setup multilingual environment (MULE) for Chinese Big5 users." (interactive) - (setup-english-environment) - (set-language-environment-coding-systems "Chinese-BIG5") - (setq default-input-method "chinese-py-punct-b5")) + (set-language-environment "Chinese-BIG5")) ;;;###autoload (defun setup-chinese-cns-environment () "Setup multilingual environment (MULE) for Chinese CNS11643 family users." (interactive) - (setup-english-environment) - (set-language-environment-coding-systems "Chinese-CNS") - (setq default-input-method "chinese-cns-quick")) + (set-language-environment "Chinese-CNS")) ;; Hz/ZW encoding stuffs |