projects
/
chise
/
ids.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
a0bceb5
)
Install IDS-HZK{01..12}.txt.
author
tomo
<tomo>
Sat, 8 May 2004 15:35:20 +0000
(15:35 +0000)
committer
tomo
<tomo>
Sat, 8 May 2004 15:35:20 +0000
(15:35 +0000)
install-ids.el
patch
|
blob
|
history
diff --git
a/install-ids.el
b/install-ids.el
index
73471de
..
0aeda5a
100644
(file)
--- a/
install-ids.el
+++ b/
install-ids.el
@@
-41,9
+41,11
@@
(install-ids-read-file "IDS-CBETA.txt" load-ids-simplify t)
(install-ids-read-file "IDS-CDP.txt" load-ids-simplify t)
(install-ids-read-file "IDS-CBETA.txt" load-ids-simplify t)
(install-ids-read-file "IDS-CDP.txt" load-ids-simplify t)
-;; (install-ids-read-file "IDS-HZK01.txt" load-ids-simplify t)
-;; (install-ids-read-file "IDS-HZK02.txt" load-ids-simplify t)
-;; (install-ids-read-file "IDS-HZK03.txt" load-ids-simplify t)
+(let ((i 1))
+ (while (<= i 12)
+ (install-ids-read-file (format "IDS-HZK%02d.txt" i)
+ load-ids-simplify t)
+ (setq i (1+ i))))
(princ "Updating char-feature `ideographic-structure'...")
(save-char-attribute-table 'ideographic-structure)
(princ "Updating char-feature `ideographic-structure'...")
(save-char-attribute-table 'ideographic-structure)