From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 24 Jun 2021 22:43:06 +0000 (+0900)
Subject: (MJ056865): Unify hanaJU+2CF16 instead of IU+2CF16; add
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1068ae1afbbbe626374a523857e56e60a16b0c35;p=chise%2Fxemacs-chise.git

(MJ056865): Unify hanaJU+2CF16 instead of IU+2CF16; add
`<-formed@sideways' for U+722A.
---

diff --git a/lisp/utf-2000/Ideograph-R005-Second.el b/lisp/utf-2000/Ideograph-R005-Second.el
index 012d5d6..dc0cf2e 100644
--- a/lisp/utf-2000/Ideograph-R005-Second.el
+++ b/lisp/utf-2000/Ideograph-R005-Second.el
@@ -1141,7 +1141,7 @@
     (<-formed*sources
      koseki)
     (<-formed@koseki
-     ((=ucs@iso		  . #x2CF16)	; &MJ056865;
+     ((=ucs@JP/hanazono	  . #x2CF16)	; &MJ056865;
       (=mj		  . 056865)	; &MJ056865;
       ))
     (->subsumptive
@@ -1172,7 +1172,7 @@
     (ideographic-radical . 5)	; ⼄
     (ideographic-strokes . 2)
     (total-strokes	 . 3)
-    (=ucs@iso		. #x2CF16)	; &MJ056865;
+    (=ucs@JP/hanazono	. #x2CF16)	; &MJ056865;
     (=mj		. 056865)	; &MJ056865;
     (<-formed
      ((=mj		  . 006462)	; &MJ006462;
@@ -1182,14 +1182,15 @@
     (<-formed@component
      ((=ucs		  . #x722A)	; 爪
       ))
+    (<-formed@sideways
+     ((=ucs		  . #x722A)	; 爪
+      ))
     (->subsumptive
-     ((==ucs@iso	  . #x2CF16)	; &g2-MJ056865;
+     ((==ucs@JP/hanazono  . #x2CF16)	; &g2-MJ056865;
       (==mj		  . 056865)	; &g2-MJ056865;
       (->subsumptive
        ((===mj		    . 056865)	; &R-MJ056865;
 	)
-       ((===ucs@iso	    . #x2CF16)	; &R-U-0002CF16;
-	)
        ((===hng-nkk	    . 03300)	; &HNG039-03300;
 	))
       ))