=+>jis-x0208
=+>jis-x0213-1
=+>jis-x0213-2
+ =+>adobe-japan1-0
+ =+>adobe-japan1-1
+ =+>adobe-japan1-2
+ =+>adobe-japan1-3
+ =+>adobe-japan1-4
+ =+>adobe-japan1-5
+ =+>adobe-japan1-6
=+>jis-x0208@1978
- =+>adobe-japan1
=>jis-x0208
=>jis-x0208@1997
=>jis-x0213-1
=daikanwa/+2p =>>daikanwa/+2p
=gt =>>>gt =>>gt =+>gt =>gt
=gt-k =>>gt-k =>gt-k
- =adobe-japan1-0 =>>>adobe-japan1-0 =>>adobe-japan1-0
- =adobe-japan1-1 =>>>adobe-japan1-1 =>>adobe-japan1-1
- =adobe-japan1-2 =>>>adobe-japan1-2 =>>adobe-japan1-2
- =adobe-japan1-3 =>>>adobe-japan1-3 =>>adobe-japan1-3
- =adobe-japan1-4 =>>>adobe-japan1-4 =>>adobe-japan1-4
- =adobe-japan1-5 =>>>adobe-japan1-5 =>>adobe-japan1-5
- =adobe-japan1-6 =>>>adobe-japan1-6 =>>adobe-japan1-6
- =+>adobe-japan1
+ =adobe-japan1-0 =>>>adobe-japan1-0
+ =adobe-japan1-1 =>>>adobe-japan1-1
+ =adobe-japan1-2 =>>>adobe-japan1-2
+ =adobe-japan1-3 =>>>adobe-japan1-3
+ =adobe-japan1-4 =>>>adobe-japan1-4
+ =adobe-japan1-5 =>>>adobe-japan1-5
+ =adobe-japan1-6 =>>>adobe-japan1-6
+ =>>adobe-japan1-0 =+>adobe-japan1-0
+ =>>adobe-japan1-1 =+>adobe-japan1-1
+ =>>adobe-japan1-2 =+>adobe-japan1-2
+ =>>adobe-japan1-3 =+>adobe-japan1-3
+ =>>adobe-japan1-4 =+>adobe-japan1-4
+ =>>adobe-japan1-5 =+>adobe-japan1-5
+ =>>adobe-japan1-6 =+>adobe-japan1-6
=cbeta =>>cbeta
=zinbun-oracle =>zinbun-oracle))
;; (string-match "^=adobe-" (symbol-name name))
=jis-x0212
=jis-x0208@1983
=jis-x0208@1978
- =shinjigen))))
+ =shinjigen
+ =shinjigen@1ed
+ =shinjigen@rev
+ =shinjigen/+p@rev))))
((eq source 'CN)
(setq required-features
(union required-features
(setq strokes value)))
(setq attributes (delq 'cns-strokes attributes))
)
- (when (and (memq 'shinjigen-1-radical attributes)
- (setq value (get-char-attribute char 'shinjigen-1-radical)))
- (unless (eq value radical)
- (insert (format "(shinjigen-1-radical . %S)\t; %c%s"
- value
- (ideographic-radical value)
- line-breaking))
- (or radical
- (setq radical value)))
- (setq attributes (delq 'shinjigen-1-radical attributes))
- )
+ ;; (when (and (memq 'shinjigen-1-radical attributes)
+ ;; (setq value (get-char-attribute char 'shinjigen-1-radical)))
+ ;; (unless (eq value radical)
+ ;; (insert (format "(shinjigen-1-radical . %S)\t; %c%s"
+ ;; value
+ ;; (ideographic-radical value)
+ ;; line-breaking))
+ ;; (or radical
+ ;; (setq radical value)))
+ ;; (setq attributes (delq 'shinjigen-1-radical attributes))
+ ;; )
(when (and (memq 'ideographic- attributes)
(setq value (get-char-attribute char 'ideographic-)))
(insert "(ideographic- ")