From: tomo <tomo>
Date: Mon, 16 May 2005 15:09:42 +0000 (+0000)
Subject: (J0-555F): Add S1-1801.
X-Git-Tag: r21-4-15-chise-0_22^2~61
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=6f5a6867a70836b2cfe03292d8f84ab2357fd1f5;p=chise%2Fxemacs-chise.git

(J0-555F): Add S1-1801.
---

diff --git a/lisp/utf-2000/Ideograph-R040-Roof.el b/lisp/utf-2000/Ideograph-R040-Roof.el
index 33f4244..4b5b795 100644
--- a/lisp/utf-2000/Ideograph-R040-Roof.el
+++ b/lisp/utf-2000/Ideograph-R040-Roof.el
@@ -5,7 +5,8 @@
     (total-strokes	 . 3)
     (=ucs		. #x5B80)	; 宀
     (->subsumptive
-     ((shinjigen-2	  . 1801)
+     ((shinjigen-1	  . 1801)
+      (shinjigen-2	  . 1801)
       (=jis-x0208	  . #x555F)	; &GT-08869; [53-63]
       (=big5-cdp	  . #x8AF8)	; &I-CDP-8AF8;
       (=gt		  . 08869)	; &I-GT-08869;
@@ -1893,7 +1894,7 @@
     (->subsumptive
      ((=big5-cdp	  . #x8C5F)	; &CDP-8C5F;
       )
-     ((=ucs@iso		  . #x21A04)	; &UU+21A04;
+     ((=ucs@iso		  . #x21A04)	; &U-00021A04;
       ))
     ))
 (define-char
@@ -3698,7 +3699,7 @@
     (->subsumptive
      ((=daikanwa	  . 07259)	; &M-07259;
       )
-     ((=ucs@iso		  . #x21A63)	; &UU+21A63;
+     ((=ucs@iso		  . #x21A63)	; &U-00021A63;
       )
      ((=cns11643-5	  . #x3E63)	; &C5-3E63; [30-67]
       ))
@@ -3754,7 +3755,7 @@
     (->subsumptive
      ((=daikanwa	  . 07263)	; &M-07263;
       )
-     ((=ucs@iso		  . #x21A65)	; &UU+21A65;
+     ((=ucs@iso		  . #x21A65)	; &U-00021A65;
       )
      ((=cns11643-5	  . #x3E64)	; &C5-3E64; [30-68]
       ))
@@ -3819,7 +3820,7 @@
     (->subsumptive
      ((=daikanwa	  . 07268)	; &M-07268;
       )
-     ((=ucs@iso		  . #x21A68)	; &UU+21A68;
+     ((=ucs@iso		  . #x21A68)	; &U-00021A68;
       )
      ((=cns11643-6	  . #x5176)	; &C6-5176; [49-86]
       ))
@@ -3859,7 +3860,7 @@
       )
      ((=cns11643-4	  . #x3C6D)	; &C4-3C6D; [28-77]
       )
-     ((=ucs@iso		  . #x21A69)	; &UU+21A69;
+     ((=ucs@iso		  . #x21A69)	; &U-00021A69;
       ))
     ))
 (define-char
@@ -3975,7 +3976,7 @@
      ((=daikanwa	  . 49027)	; &M-49027;
       (=cbeta		  . 02796)	; &I-CB02796;
       )
-     ((=ucs@iso		  . #x21A77)	; &UU+21A77;
+     ((=ucs@iso		  . #x21A77)	; &U-00021A77;
       ))
     ))
 (define-char