(U-00021641): Use `<-vulgar*sources' instead of char-ref in

`<-vulgar'.

diff --git a/lisp/utf-2000/Ideograph-R037-Big.el b/lisp/utf-2000/Ideograph-R037-Big.el
index 2829fe7..664625d 100644 (file)
--- a/lisp/utf-2000/Ideograph-R037-Big.el
+++ b/lisp/utf-2000/Ideograph-R037-Big.el
@@ -1960,10 +1960,10 @@
     (ideographic-strokes . 8)
     (total-strokes      . 11)
     (<-vulgar
-     (:sources (sougen-irai-zokujifu morohashi-daikanwa)
-      :char    ((=daikanwa          . 19746)   ; &I-M-19746;
-                )
+     ((=daikanwa         . 19746)      ; &I-M-19746;
       ))
+    (<-vulgar*sources
+     songyuan-yilai-suzipu daikanwa)
     (=ucs              . #x21641)      ; 𡙁
     (=cns11643-4       . #x3127)       ; &I-C4-3127;
     (=big5-cdp         . #x856E)       ; &I-CDP-856E;
@@ -2533,6 +2533,7 @@
      ((<-vulgar
        ((shinjigen-1       . 796)
        (=ucs               . #x5333)   ; 匳
+       (=jis-x0208         . #x523D)   ; &I-J90-523D;
        ))
       (<-vulgar*sources
        shinjigen-1)