projects
/
chise
/
chiset.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Sync up with the current environment.
[chise/chiset.git]
/
char-db-turtle.el
diff --git
a/char-db-turtle.el
b/char-db-turtle.el
index
edc9357
..
9f367ff
100644
(file)
--- a/
char-db-turtle.el
+++ b/
char-db-turtle.el
@@
-54,10
+54,12
@@
=ucs-itaiji-004
=ucs-itaiji-005
=ucs-itaiji-006
=ucs-itaiji-004
=ucs-itaiji-005
=ucs-itaiji-006
+ =ucs-itaiji-007
=ucs-itaiji-009
=ucs-itaiji-084
=ucs-var-001
=ucs-var-002
=ucs-itaiji-009
=ucs-itaiji-084
=ucs-var-001
=ucs-var-002
+ =ucs-var-003
=ucs-var-004
=cns11643-1 =cns11643-2 =cns11643-3
=cns11643-4 =cns11643-5 =cns11643-6 =cns11643-7
=ucs-var-004
=cns11643-1 =cns11643-2 =cns11643-3
=cns11643-4 =cns11643-5 =cns11643-6 =cns11643-7
@@
-74,10
+76,12
@@
=daikanwa
=ruimoku-v6
=cbeta =jef-china3
=daikanwa
=ruimoku-v6
=cbeta =jef-china3
+ =daikanwa/+2p
=+>ucs@iso =+>ucs@unicode
=+>ucs@jis
=+>ucs@cns
=+>ucs@ks
=+>ucs@iso =+>ucs@unicode
=+>ucs@jis
=+>ucs@cns
=+>ucs@ks
+ =+>ucs@jis/1990
=>mj
=>jis-x0208 =>jis-x0213-1
=>jis-x0208@1997
=>mj
=>jis-x0208 =>jis-x0213-1
=>jis-x0208@1997
@@
-92,6
+96,7
@@
=>>ucs@iso =>>ucs@unicode
=>>ucs@jis =>>ucs@cns =>>ucs@ks
=>>gt-k
=>>ucs@iso =>>ucs@unicode
=>>ucs@jis =>>ucs@cns =>>ucs@ks
=>>gt-k
+ =>>hanyo-denshi/ks
==mj
==ucs@iso
==ucs@unicode
==mj
==ucs@iso
==ucs@unicode
@@
-115,7
+120,9
@@
==daikanwa
==gt-k
==ucs@gb
==daikanwa
==gt-k
==ucs@gb
+ ==ucs-itaiji-003
==ucs@JP/hanazono
==ucs@JP/hanazono
+ ==daikanwa/+2p
=>>jis-x0208 =>>jis-x0213-1 =>>jis-x0213-2
=+>jis-x0208 =+>jis-x0213-1 =+>jis-x0213-2
=+>hanyo-denshi/jt
=>>jis-x0208 =>>jis-x0213-1 =>>jis-x0213-2
=+>jis-x0208 =+>jis-x0213-1 =+>jis-x0213-2
=+>hanyo-denshi/jt
@@
-140,6
+147,7
@@
===ucs@ks
===ucs@gb
=shinjigen
===ucs@ks
===ucs@gb
=shinjigen
+ =shinjigen@rev
=shinjigen@1ed
=shinjigen/+p@rev
==shinjigen
=shinjigen@1ed
=shinjigen/+p@rev
==shinjigen
@@
-957,7
+965,7
@@
line-separator))
(setq col (current-column))
(insert (format ":context domain:%-7s ;\n%s:target %S"
line-separator))
(setq col (current-column))
(insert (format ":context domain:%-7s ;\n%s:target %S"
- domain
+ (chise-turtle-uri-encode-ccs-name domain)
(make-string col ?\ )
value))
(setq attributes (delq key attributes))
(make-string col ?\ )
value))
(setq attributes (delq key attributes))
@@
-1112,7
+1120,7
@@
))
)
((eq name 'ideographic-structure)
))
)
((eq name 'ideographic-structure)
- (insert (isd-turtle-format-char nil nil value nil
+ (insert (isd-turtle-format-char nil nil value (/ column 4)
'isd 'without-head-char))
(insert " ;")
)
'isd 'without-head-char))
(insert " ;")
)