projects
/
chise
/
xemacs-chise.git.1
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(U-000200BD): Use `ideographic-{radical|strokes}@{ucs|cns}' and
[chise/xemacs-chise.git.1]
/
lisp
/
utf-2000
/
Ideograph-R102-Field.el
diff --git
a/lisp/utf-2000/Ideograph-R102-Field.el
b/lisp/utf-2000/Ideograph-R102-Field.el
index
f7833d5
..
c0cd100
100644
(file)
--- a/
lisp/utf-2000/Ideograph-R102-Field.el
+++ b/
lisp/utf-2000/Ideograph-R102-Field.el
@@
-642,6
+642,9
@@
'((ideographic-radical . 102) ; ⽥
(ideographic-strokes . 4)
(total-strokes . 9)
'((ideographic-radical . 102) ; ⽥
(ideographic-strokes . 4)
(total-strokes . 9)
+ (<-vulgar
+ ((=ucs . #x200BD) ; 𠂽
+ ))
(shinjigen-1 . 5030)
(shinjigen-2 . 5030)
(=ucs . #x754F) ; 畏
(shinjigen-1 . 5030)
(shinjigen-2 . 5030)
(=ucs . #x754F) ; 畏
@@
-1182,17
+1185,19
@@
(=daikanwa . 21827) ; &I-M-21827;
))
(define-char
(=daikanwa . 21827) ; &I-M-21827;
))
(define-char
- '((ideographic- (:radical 102 ; ⽥
- :strokes 5
- :sources (cns-11643 morohashi-daikanwa))
- (:radical 4 ; ⼃
- :strokes 9
- :sources (ucs)))
+ '((ideographic-radical@ucs . 4) ; ⼃
+ (ideographic-strokes@ucs . 9)
+ (ideographic-radical@cns . 102) ; ⽥
+ (ideographic-strokes@cns . 5)
+ (ideographic-radical@cns*sources
+ cns11643 daikanwa)
(total-strokes . 10)
(total-strokes . 10)
- (->vulgar-ideograph
- (:char ((=daikanwa . 21778) ; &I-M-21778;
- )
- :sources (morohashi-daikanwa)))
+ (->vulgar
+ ((=ucs . #x754F) ; 畏
+ (=daikanwa . 21778) ; &I-M-21778;
+ ))
+ (->vulgar*sources
+ daikanwa)
(hanyu-dazidian 1 41 4)
(ideographic-structure
((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
(hanyu-dazidian 1 41 4)
(ideographic-structure
((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")