From 75768a78e26cfa47c7071a0239cd01cc7f81e5a4 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 23 Mar 2018 13:25:10 +0900
Subject: [PATCH] (A-cgnU+6094): Changed from U+6094. (U+6094): Changed from
 A-IWDSU+6094 and A-UU+6094. (U-0002F8A3): Use U+6094
 instead of A-IWDSU+6094 as its mother. (HNG-KAR0876-0): Use
 A-cgnU+6094 instead of U+6094 as its mother. (U+FA3D): Use
 U+6094 instead of A-IWDSU+6094 as its mother.

---
 lisp/utf-2000/Ideograph-R061-Heart.el |   26 ++++++++++++++++----------
 1 file changed, 16 insertions(+), 10 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R061-Heart.el b/lisp/utf-2000/Ideograph-R061-Heart.el
index 0d0d6cd..057f353 100644
--- a/lisp/utf-2000/Ideograph-R061-Heart.el
+++ b/lisp/utf-2000/Ideograph-R061-Heart.el
@@ -9668,11 +9668,19 @@
     ))
 (define-char
   '((ideographic-radical . 61)	; â¼¼
-    (=ucs		. #x6094)	; 悔
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5FC4)	; 忄
+      )
+     ((=>ucs@cognate	  . #x6BCF)	; &A-cgnU+6BCF;
+      ))
+    (=>ucs@cognate	. #x6094)	; &A-cgnU+6094;
     ))
 (define-char
   '((<-denotational
-     ((=ucs		  . #x6094)	; 悔
+     ((=>ucs@cognate	  . #x6094)	; &A-cgnU+6094;
       ))
     (ideographic-radical . 61)	; â¼¼
     (ideographic-structure
@@ -9681,15 +9689,14 @@
       )
      ((=ucs		  . #x5FC4)	; 忄
       )
-     ((=>jis-x0208@1997	  . #x4B68)	; &J97-4B68; [43-72]
+     ((=>ucs@iwds-1	  . #x6BCF)	; &J97-4B68;
+      (=>jis-x0208@1997	  . #x4B68)	; &J97-4B68; [43-72]
       ))
-    (=>ucs@iwds-1	. #x6094)	; &A-IWDSU+6094;
-    (=>ucs@unicode	. #x6094)	; &A-IWDSU+6094;
+    (=ucs		. #x6094)	; 悔
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@iwds-1	  . #x6094)	; &A-IWDSU+6094;
-      (=>ucs@unicode	  . #x6094)	; &A-IWDSU+6094;
+     ((=ucs		  . #x6094)	; 悔
       ))
     (=>ucs*		. #x6094)	; 悔
     (ideographic-radical . 61)	; â¼¼
@@ -9759,7 +9766,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs		  . #x6094)	; 悔
+     ((=>ucs@cognate	  . #x6094)	; &A-cgnU+6094;
       ))
     (ideographic-radical . 61)	; â¼¼
     (ideographic-strokes . 7)
@@ -11150,8 +11157,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@iwds-1	  . #x6094)	; &A-IWDSU+6094;
-      (=>ucs@unicode	  . #x6094)	; &A-IWDSU+6094;
+     ((=ucs		  . #x6094)	; 悔
       ))
     (=>ucs*		. #x6094)	; 悔
     (ideographic-radical . 61)	; â¼¼
-- 
1.7.10.4