(U+6C08): Use `=>jis-x0208' and `=>jis-x0213-1' instead of

`=jis-x0208@1997'.

diff --git a/lisp/utf-2000/Ideograph-R082-Fur.el b/lisp/utf-2000/Ideograph-R082-Fur.el
index 77fde9b..b3434f9 100644 (file)
--- a/lisp/utf-2000/Ideograph-R082-Fur.el
+++ b/lisp/utf-2000/Ideograph-R082-Fur.el
@@ -2769,7 +2769,8 @@
     (ideographic-strokes . 13)
     (total-strokes      . 17)
     (=ucs              . #x6C08)       ; 氈
-    (=jis-x0208@1997   . #x5D61)       ; 氈 [61-65]
+    (=>jis-x0208       . #x5D61)       ; 氈 [61-65]
+    (=>jis-x0213-1     . #x5D61)       ; 氈 [61-65]
     ))
 (define-char
   '((<-denotational
@@ -2778,19 +2779,24 @@
     (ideographic-radical . 82) ; ⽑
     (ideographic-strokes . 13)
     (total-strokes      . 17)
-    (=big5             . #xC0D6)       ; &B-C0D6;
     (->subsumptive
-     ((=ucs@jis                  . #x6C08)     ; &GT-21755;
-      (=jis-x0208@1990   . #x5D61)     ; &GT-21755; [61-65]
-      (=jis-x0213-1      . #x5D61)     ; &I-JX1-5D61; [61-65]
-      (=gt               . 21755)      ; &I-GT-21755;
-      (=gt-pj-1                  . #x5D61)     ; &I-GT-21755; [61-65]
-      (=daikanwa         . 16982)      ; &I-M-16982;
-      )
-     ((=ucs@unicode      . #x6C08)     ; &UU+6C08;
-      (=gb12345                  . #x5531)     ; &UU+6C08; [53-17]
+     ((=big5             . #xC0D6)     ; &B-C0D6;
+      (->subsumptive
+       ((=ucs@jis          . #x6C08)   ; &GT-21755;
+       (=jis-x0208@1990    . #x5D61)   ; &GT-21755; [61-65]
+       (=jis-x0213-1       . #x5D61)   ; &I-JX1-5D61; [61-65]
+       (=gt                . 21755)    ; &I-GT-21755;
+       (=gt-pj-1           . #x5D61)   ; &I-GT-21755; [61-65]
+       (=daikanwa          . 16982)    ; &I-M-16982;
+       )
+       ((=ucs@unicode      . #x6C08)   ; &UU+6C08;
+       (=gb12345           . #x5531)   ; &UU+6C08; [53-17]
+       )
+       ((=cns11643-1       . #x7421)   ; &C1-7421; [84-01]
+       ))
       )
-     ((=cns11643-1       . #x7421)     ; &C1-7421; [84-01]
+     ((=ks-x1001         . #x6E7D)     ; &K0-6E7D; [78-93]
+      (=shinjigen        .  4033)      ; &K0-6E7D;
       ))
     ))
 (define-char
@@ -2804,16 +2810,6 @@
     (=jis-x0208@1983   . #x5D61)       ; &I-J83-5D61; [61-65]
     ))
 (define-char
-  '((<-denotational
-     ((=ucs              . #x6C08)     ; 氈
-      ))
-    (ideographic-radical . 82) ; ⽑
-    (ideographic-strokes . 13)
-    (total-strokes      . 17)
-    (=ks-x1001         . #x6E7D)       ; &K0-6E7D; [78-93]
-    (=shinjigen@rev    .  4033)        ; &K0-6E7D;
-    ))
-(define-char
   '((ideographic-radical . 82) ; ⽑
     (ideographic-strokes . 13)
     (total-strokes      . 17)