emacs-devel
[Top][All Lists]
Advanced
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

cp949 support

From: Eduard Wiebe
Subject: cp949 support
Date: Mon, 15 Jun 2009 23:11:14 +0200
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.3 (berkeley-unix) 
  Hi,

the following patch adds cp949 charset support to Emacs.
Btw, i compared etc/charsets/CP949-2BYTE.map with
http://unicode.org/Public/MAPPINGS/VENDORS/MICSFT/WINDOWS/CP949.TXT and
found no descrepances.

2009-06-15  Eduard Wiebe  <address@hidden>

        * international/mule-conf.el: Add cp949-2-byte, cp949.

-- 
Eduard Wiebe

diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el
old mode 100644
new mode 100755
index 8bd9301..f8cfa09
--- a/lisp/international/mule-conf.el
+++ b/lisp/international/mule-conf.el
@@ -486,7 +486,19 @@
   :code-offset #x27c218                        ; ... #x280839
   :unify-map "BIG5-HKSCS")
 
-;; Fixme: Korean cp949/UHC
+(define-charset 'cp949-2-byte
+  "2-byte part of CP949"
+  :dimension 2
+  :map "CP949-2BYTE"
+  :code-space [#x41 #xFE #x81 #xFD]
+  :supplementary-p t)
+
+(define-charset 'cp949
+  "CP949 (Korean)"
+  :short-name "CP949"
+  :long-name  "CP949 (Korean)"
+  :code-space [#x00 #xFE #x00 #xFD]
+  :superset '(ascii cp949-2-byte))
 
 (define-charset 'chinese-sisheng
   "SiSheng characters for PinYin/ZhuYin"
reply via email to
[Prev in Thread] Current Thread [Next in Thread]