[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/language korean.el
From: |
Kenichi Handa |
Subject: |
[Emacs-diffs] emacs/lisp/language korean.el |
Date: |
Thu, 18 Jun 2009 01:15:32 +0000 |
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)
- [Emacs-diffs] emacs/lisp/language korean.el,
Kenichi Handa <=