[Emacs-diffs] emacs/lisp/language korean.el

[Kenichi Handa]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Kenichi Handa <handa>   09/06/18 01:15:32

Modified files:
        lisp/language  : korean.el 

Log message:
        ("Korean"): Fix `documentation' property of this language environment.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/language/korean.el?cvsroot=emacs&r1=1.41&r2=1.42

Patches:
Index: korean.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/language/korean.el,v
retrieving revision 1.41
retrieving revision 1.42
diff -u -b -r1.41 -r1.42
--- korean.el   5 Jan 2009 03:22:27 -0000       1.41
+++ korean.el   18 Jun 2009 01:15:32 -0000      1.42
@@ -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
+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")
+  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)