projects
/
chise
/
xemacs-chise.git-
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(U+4E47): Add ideographic-structure.
[chise/xemacs-chise.git-]
/
lisp
/
update-elc.el
diff --git
a/lisp/update-elc.el
b/lisp/update-elc.el
index
53ca9ee
..
13524f6
100644
(file)
--- a/
lisp/update-elc.el
+++ b/
lisp/update-elc.el
@@
-87,6
+87,9
@@
(let (preloaded-file-list site-load-packages need-to-dump dumped-exe)
(load (expand-file-name "../lisp/dumped-lisp.el"))
(let (preloaded-file-list site-load-packages need-to-dump dumped-exe)
(load (expand-file-name "../lisp/dumped-lisp.el"))
+ (when (featurep 'utf-2000)
+ (load (expand-file-name "../lisp/utf-2000/dumped-chars.el")))
+
(setq dumped-exe
(cond ((file-exists-p "../src/xemacs.exe") "../src/xemacs.exe")
((file-exists-p "../src/xemacs") "../src/xemacs")
(setq dumped-exe
(cond ((file-exists-p "../src/xemacs.exe") "../src/xemacs.exe")
((file-exists-p "../src/xemacs") "../src/xemacs")
@@
-106,6
+109,8
@@
(setq preloaded-file-list
(append packages-hardcoded-lisp
preloaded-file-list
(setq preloaded-file-list
(append packages-hardcoded-lisp
preloaded-file-list
+ (if (featurep 'utf-2000)
+ system-char-db-source-file-list)
site-load-packages))
(while preloaded-file-list
(let ((arg (car preloaded-file-list)))
site-load-packages))
(while preloaded-file-list
(let ((arg (car preloaded-file-list)))