(J78-3228): Unify JX3-3228.

(J90-3228): Use `=jis-x0213-1@2000' instead of `=jis-x0213-1' for
JX1-3228; Use `=ucs@jis/1990' and `=ucs@jis/2000' instead of
`=ucs@jis' for J00U+8956.

diff --git a/lisp/utf-2000/Ideograph-R145-Clothes.el b/lisp/utf-2000/Ideograph-R145-Clothes.el
index 885fded..9ad924c 100644 (file)
--- a/lisp/utf-2000/Ideograph-R145-Clothes.el
+++ b/lisp/utf-2000/Ideograph-R145-Clothes.el
@@ -8801,7 +8801,9 @@
     (ideographic-strokes . 13)
     (total-strokes      . 19)
     (->subsumptive
-     ((=jis-x0208@1978   . #x3228)     ; &M-34629; [18-08]
+     ((=ucs@jis/2004     . 35158)
+      (=jis-x0208@1978   . #x3228)     ; &M-34629; [18-08]
+      (=jis-x0213-1@2004  . #x3228)    ; &I-JX3-3228; [18-08]
       (=daikanwa         . 34629)      ; &I-M-34629;
       )
      ((=cns11643-1       . #x7878)     ; &C1-7878; [88-88]
@@ -8818,12 +8820,14 @@
     (->subsumptive
      ((=jis-x0208@1983   . #x3228)     ; &GT-46563; [18-08]
       (=jis-x0208@1990   . #x3228)     ; &I-J90-3228; [18-08]
-      (=jis-x0213-1      . #x3228)     ; &I-JX1-3228; [18-08]
+      (=jis-x0213-1@2000  . #x3228)    ; &I-JX1-3228; [18-08]
       (=gt               . 46563)      ; &I-GT-46563;
       (=gt-pj-1                  . #x3228)     ; &I-GT-46563; [18-08]
-      (=ucs@jis                  . #x8956)     ; &GT-46563;
+      (=ucs@jis/1990     . #x8956)     ; &GT-46563;
+      (=ucs@jis/2000     . #x8956)     ; &GT-46563;
       (<-simplified@JP/jis
        ((=jis-x0208@1978    . #x3228)  ; &M-34629; [18-08]
+       (=jis-x0213-1@2004  . #x3228)   ; &I-JX3-3228; [18-08]
        (=daikanwa          . 34629)    ; &I-M-34629;
        ))
       )