(ids-read-file file simplify soft)
(princ "done.\n"))
-(let ((i 1))
- (while (<= i 12)
- (install-ids-read-file (format "IDS-Daikanwa-%02d.txt" i)
- load-ids-simplify t)
- (setq i (1+ i))))
-
-(install-ids-read-file "IDS-CBETA.txt" load-ids-simplify t)
-
-(install-ids-read-file "IDS-Daikanwa-dx.txt" load-ids-simplify t)
-
-(install-ids-read-file "IDS-Daikanwa-ho.txt" load-ids-simplify t)
+(install-ids-read-file "IDS-JIS-X0208-1990.txt" load-ids-simplify t)
(install-ids-read-file "IDS-UCS-Basic.txt" load-ids-simplify t)
(install-ids-read-file (format "IDS-UCS-Ext-B-%d.txt" i)
load-ids-simplify t)
(setq i (1+ i))))
-(install-ids-read-file "IDS-JIS-X0208-1990.txt" load-ids-simplify t)
+
+(install-ids-read-file "IDS-CBETA.txt" load-ids-simplify t)
+
+(let ((i 1))
+ (while (<= i 12)
+ (install-ids-read-file (format "IDS-Daikanwa-%02d.txt" i)
+ load-ids-simplify t)
+ (setq i (1+ i))))
+
+(install-ids-read-file "IDS-Daikanwa-dx.txt" load-ids-simplify t)
+
+(install-ids-read-file "IDS-Daikanwa-ho.txt" load-ids-simplify t)
(princ "Saving into ")
(princ exec-directory)