summaryrefslogtreecommitdiff
path: root/lisp/language/korea-util.el
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1998-01-22 01:45:51 +0000
committerKenichi Handa <handa@m17n.org>1998-01-22 01:45:51 +0000
commit8f3969f8ab93f4c7361097f5aeac9a8b9430ae77 (patch)
tree64b2ecacc6baf58ac34bc82064920d721d555228 /lisp/language/korea-util.el
parent5e92d2b80109ccad114ed62591b9f6d518a0e800 (diff)
downloademacs-8f3969f8ab93f4c7361097f5aeac9a8b9430ae77.tar.gz
In setup-LANGUAGE-environment functions,
call set-language-environment-coding-systems.
Diffstat (limited to 'lisp/language/korea-util.el')
-rw-r--r--lisp/language/korea-util.el9
1 files changed, 1 insertions, 8 deletions
diff --git a/lisp/language/korea-util.el b/lisp/language/korea-util.el
index c9ca349776d..c2a0310a3c7 100644
--- a/lisp/language/korea-util.el
+++ b/lisp/language/korea-util.el
@@ -65,14 +65,7 @@
"Setup multilingual environment (MULE) for Korean."
(interactive)
(setup-english-environment)
- (setq coding-category-iso-8-2 'korean-iso-8bit)
-
- (set-coding-priority
- '(coding-category-iso-7
- coding-category-iso-8-2
- coding-category-iso-8-1))
-
- (set-default-coding-systems 'korean-iso-8bit)
+ (set-language-environment-coding-systems "Korean")
(setq default-input-method "korean-hangul")