summaryrefslogtreecommitdiff
path: root/lisp/language
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2009-06-18 01:15:43 +0000
committerKenichi Handa <handa@m17n.org>2009-06-18 01:15:43 +0000
commit5c7c11c37454ba637fc1f71c905afa1d2b98bbaa (patch)
tree25aa86461b1830a6089952e0ae9017af0771d045 /lisp/language
parent269a9d1a9aaaf78ab2929a8d547e9c528ff77136 (diff)
downloademacs-5c7c11c37454ba637fc1f71c905afa1d2b98bbaa.tar.gz
emacs-5c7c11c37454ba637fc1f71c905afa1d2b98bbaa.tar.bz2
emacs-5c7c11c37454ba637fc1f71c905afa1d2b98bbaa.zip
("Korean"): Fix `documentation' property of this language environment.
Diffstat (limited to 'lisp/language')
-rw-r--r--lisp/language/korean.el19
1 files changed, 14 insertions, 5 deletions
diff --git a/lisp/language/korean.el b/lisp/language/korean.el
index 731ded4c707..e8e78bfc47b 100644
--- a/lisp/language/korean.el
+++ b/lisp/language/korean.el
@@ -43,7 +43,6 @@
(define-coding-system-alias 'euc-kr 'korean-iso-8bit)
(define-coding-system-alias 'euc-korea 'korean-iso-8bit)
-(define-coding-system-alias 'cp949 'korean-iso-8bit)
(define-coding-system 'iso-2022-kr
"ISO 2022 based 7-bit encoding for Korean KSC5601 (MIME:ISO-2022-KR)."
@@ -58,6 +57,14 @@
(define-coding-system-alias 'korean-iso-7bit-lock 'iso-2022-kr)
+(define-coding-system 'korean-cp949
+ "CP949 (Microsoft Unified Hangul Code)"
+ :coding-type 'charset
+ :mnemonic ?K
+ :charset-list '(ascii cp949))
+
+(define-coding-system-alias 'cp949 'korean-cp949)
+
(set-language-info-alist
"Korean" '((setup-function . setup-korean-environment-internal)
(exit-function . exit-korean-environment)
@@ -70,10 +77,12 @@
(coding-priority korean-iso-8bit iso-2022-kr)
(sample-text . "Hangul ($(CGQ1[(B) $(C>H3gGO<<?d(B, $(C>H3gGO=J4O1n(B")
(documentation . "\
-The following key bindings are available while using Korean input methods:
- Shift-SPC: toggle-korean-input-mthod
- Control-F9: quail-hangul-switch-symbol-ksc
- F9: quail-hangul-switch-hanja")
+The following key bindings are available for controlling Korean input methods:
+ Shift-SPC, Hangul: toggle-korean-input-method
+ Control-F9: quail-hangul-switch-symbol-ksc
+ F9: quail-hangul-switch-hanja
+and the following key bindings are available within Korean input methods:
+ F9, Hangul_Hanja: hangul-to-hanja-conversion")
))
(provide 'korean)