From: tomo <tomo>
Date: Sat, 8 May 2004 15:35:20 +0000 (+0000)
Subject: Install IDS-HZK{01..12}.txt.
X-Git-Tag: ids-0_0-1~27
X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fids.git;a=commitdiff_plain;h=fdae3e1e2ccaea78c73bf05bba9ff6b293b68971

Install IDS-HZK{01..12}.txt.
---

diff --git a/install-ids.el b/install-ids.el
index 73471de..0aeda5a 100644
--- 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-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)