Add mappings between CNS 11643-4 and CJK Compatibility Ideographs

Supplement of UCS.

diff --git a/lisp/utf-2000/Ideograph-R061-Heart.el b/lisp/utf-2000/Ideograph-R061-Heart.el
index 86a70d6..798e4c4 100644 (file)
--- a/lisp/utf-2000/Ideograph-R061-Heart.el
+++ b/lisp/utf-2000/Ideograph-R061-Heart.el
@@ -3910,14 +3910,15 @@
     (ucs               . #x6074)       ; 恴
     ))
 (define-char
-  '((=>ucs             . #x6094)       ; 悔
+  '((=>ucs*            . #x6094)       ; 悔
     (morohashi-daikanwa        10617 1)
     (ideographic-radical . 61) ; ⼼
     (ideographic-strokes . 6)
     (total-strokes      . 9)
     (=jis-x0208                . #x3279)       ; �����
     (chinese-cns11643-4 . #x294A)      ; �����
-    (ucs-jis           . #x6094)       ; �����
+    (ucs-jis           . #x6094)       ; 悔
+    (ucs               . #x2F8A3)      ; 悔
     ))
 (define-char
   '((ideographic-radical . 61) ; ⼼
@@ -11771,14 +11772,15 @@
     (ideograph-daikanwa . 11188)       ; �����
     ))
 (define-char
-  '((=>ucs             . #x618E)       ; 憎
+  '((=>ucs*            . #x618E)       ; 憎
     (morohashi-daikanwa        11188 1)
     (ideographic-radical . 61) ; ⼼
     (ideographic-strokes . 11)
     (total-strokes      . 14)
     (=jis-x0208                . #x417E)       ; �����
     (chinese-cns11643-4 . #x4351)      ; �����
-    (ucs-jis           . #x618E)       ; �����
+    (ucs-jis           . #x618E)       ; 憎
+    (ucs               . #x2F8AB)      ; 憎
     ))
 (define-char
   '((ideographic-radical . 61) ; ⼼
@@ -14722,7 +14724,8 @@
     (=jis-x0208                . #x4428)       ; �����
     (chinese-cns11643-4 . #x5B2C)      ; �����
     (china3-jef                . #x4DE8)       ; �����
-    (ucs-jis           . #x61F2)       ; �����
+    (ucs-jis           . #x61F2)       ; 懲
+    (ucs               . #x2F8B0)      ; 懲
     ))
 (define-char
   '((ideographic-radical . 61) ; ⼼

diff --git a/lisp/utf-2000/Ideograph-R064-Hand.el b/lisp/utf-2000/Ideograph-R064-Hand.el
index 20abd0e..365857d 100644 (file)
--- a/lisp/utf-2000/Ideograph-R064-Hand.el
+++ b/lisp/utf-2000/Ideograph-R064-Hand.el
@@ -13988,14 +13988,27 @@
     (china3-jef                        . #x50A2)       ; �����
     ))
 (define-char
-  '((morohashi-daikanwa        12716 0 2)
+  '((=>ucs-cns         . #x2F8C5)      ; 撝
+    (morohashi-daikanwa        12716 0 1)
     (ideographic-radical . 64) ; ⼿
     (ideographic-strokes . 12)
     (total-strokes      . 15)
-    (chinese-cns11643-4 . #x4A27)      ; �����
+    (->same-ideograph
+     ((ucs               . #x2F8C5)    ; 撝
+      ))
     (ucs               . #x649D)       ; 撝
     ))
 (define-char
+  '((=>ucs*            . #x649D)       ; 撝
+    (morohashi-daikanwa        12716 0 2)
+    (ideographic-radical . 64) ; ⼿
+    (ideographic-strokes . 12)
+    (total-strokes      . 15)
+    (chinese-cns11643-4 . #x4A27)      ; �����
+    (ucs-gb            . #x649D)       ; 撝
+    (ucs               . #x2F8C5)      ; 撝
+    ))
+(define-char
   '((=>ucs             . #x649D)       ; 撝
     (morohashi-daikanwa        12716 0 5)
     (ideographic-radical . 64) ; ⼿

diff --git a/lisp/utf-2000/Ideograph-R066-Rap.el b/lisp/utf-2000/Ideograph-R066-Rap.el
index 9072c0b..67ddd52 100644 (file)
--- a/lisp/utf-2000/Ideograph-R066-Rap.el
+++ b/lisp/utf-2000/Ideograph-R066-Rap.el
@@ -1085,7 +1085,8 @@
     (total-strokes      . 10)
     (=jis-x0208                . #x4952)       ; �����
     (chinese-cns11643-4 . #x2D46)      ; �����
-    (ucs-jis           . #x654F)       ; �����
+    (ucs-jis           . #x654F)       ; 敏
+    (ucs               . #x2F8C8)      ; 敏
     ))
 (define-char
   '((ideographic-      (:radical       135 ; ⾆