diff options
| author | Kenichi Handa <handa@m17n.org> | 2009-06-18 07:21:49 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2009-06-18 07:21:49 +0000 |
| commit | 647123d8f2b20d02fd7adc2a4c8816e766f65234 (patch) | |
| tree | b1f02dc54e9e18babb68f6dbcfea79d2dce1be91 /lisp/language | |
| parent | ec276252509c1f5b98904fb370ba609233725a47 (diff) | |
| download | emacs-647123d8f2b20d02fd7adc2a4c8816e766f65234.tar.gz | |
Cancel the unexpected changes.
Diffstat (limited to 'lisp/language')
| -rw-r--r-- | lisp/language/korean.el | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/lisp/language/korean.el b/lisp/language/korean.el index e8e78bfc47b..2a1c96c9757 100644 --- a/lisp/language/korean.el +++ b/lisp/language/korean.el @@ -43,6 +43,7 @@ (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)." @@ -57,14 +58,6 @@ (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) |