Add some `total-strokes' features.

(U+7714): Use `<-original-ideograph*sources' instead of
char-ref in `<-original-ideograph'.
(C4-2E55): Likewise.
(U+7786): Fix strokes.

diff --git a/lisp/utf-2000/Ideograph-R109-Eye.el b/lisp/utf-2000/Ideograph-R109-Eye.el
index e810eb1..96ff0f2 100644 (file)
--- a/lisp/utf-2000/Ideograph-R109-Eye.el
+++ b/lisp/utf-2000/Ideograph-R109-Eye.el
@@ -2131,10 +2131,10 @@
     (ideographic-strokes . 5)
     (total-strokes      . 10)
     (<-original-ideograph
-     (:sources (morohashi-daikanwa)
-      :char    ((=daikanwa          . 23221)   ; �����
-                )
+     ((=daikanwa         . 23221)      ; �����
       ))
+    (<-original-ideograph*sources
+     daikanwa)
     (=ucs              . #x7714)       ; 眔
     (=daikanwa         . 49364)        ; �����
     ))
@@ -2145,10 +2145,10 @@
     (ideographic-strokes . 5)
     (total-strokes      . 10)
     (<-original-ideograph
-     (:sources (morohashi-daikanwa)
-      :char    ((=daikanwa          . 23221)   ; �����
-                )
+     ((=daikanwa         . 23221)      ; �����
       ))
+    (<-original-ideograph*sources
+     daikanwa)
     (=cns11643-4       . #x2E55)       ; �����
     ))
 (define-char
@@ -2161,6 +2161,7 @@
 (define-char
   '((ideographic-radical . 109)        ; ⽬
     (ideographic-strokes . 5)
+    (total-strokes      . 10)
     (=ucs              . #x772C)       ; 眬
     (=iso-ir165                . #x7D4C)       ; �����
     ))
@@ -3684,6 +3685,7 @@
 (define-char
   '((ideographic-radical . 109)        ; ⽬
     (ideographic-strokes . 7)
+    (total-strokes      . 12)
     (hanyu-dazidian    4 2490 7)
     (=ucs              . #x7750)       ; 睐
     (=gb2312           . #x6D79)       ; �����
@@ -3692,6 +3694,7 @@
 (define-char
   '((ideographic-radical . 109)        ; ⽬
     (ideographic-strokes . 7)
+    (total-strokes      . 12)
     (hanyu-dazidian    4 2492 1)
     (=ucs              . #x7751)       ; 睑
     (=gb2312           . #x6D7A)       ; �����
@@ -5552,6 +5555,13 @@
     (=cns11643-2       . #x4C2C)       ; �����
     ))
 (define-char
+  '((ideographic-radical . 109)        ; ⽬
+    (ideographic-strokes . 9)
+    (total-strokes      . 14)
+    (=ucs              . #x7786)       ; 瞆
+    (=iso-ir165                . #x7D4D)       ; �����
+    ))
+(define-char
   '((=>ucs             . #x7787)       ; 瞇
     (ideographic-radical . 109)        ; ⽬
     (ideographic-strokes . 10)
@@ -7961,12 +7971,6 @@
 (define-char
   '((ideographic-radical . 109)        ; ⽬
     (ideographic-strokes . 12)
-    (=ucs              . #x7786)       ; 瞆
-    (=iso-ir165                . #x7D4D)       ; �����
-    ))
-(define-char
-  '((ideographic-radical . 109)        ; ⽬
-    (ideographic-strokes . 12)
     (total-strokes      . 17)
     (=ucs              . #x77B7)       ; 瞷
     (=cns11643-2       . #x5D69)       ; �����