From b69855c3c3df3fc94ce5086fe091fbf0c04e5a19 Mon Sep 17 00:00:00 2001 From: tomo Date: Mon, 16 Dec 2002 16:19:01 +0000 Subject: [PATCH] Change order. --- install-ids.el | 25 +++++++++++++------------ 1 file changed, 13 insertions(+), 12 deletions(-) diff --git a/install-ids.el b/install-ids.el index dbb82fe..79a2335 100644 --- a/install-ids.el +++ b/install-ids.el @@ -11,17 +11,7 @@ (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) @@ -31,7 +21,18 @@ (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) -- 1.7.10.4