procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Set inhibit-load-charset-map to t while preloading

Browse source 
files.
This commit is contained in:
Kenichi Handa 2008-11-27 08:02:28 +00:00
parent f10fdbfd42
commit 8c766df1aa
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/loadup.el
View file

@ -46,6 +46,12 @@
(message "Using load-path %s" load-path)
(if (or (member (nth 3 command-line-args) '("dump" "bootstrap"))
(member (nth 4 command-line-args) '("dump" "bootstrap")))
;; To reduce the size of dumped Emacs, we avoid making huge
;; char-tables.
(setq inhibit-load-charset-map t))
;; We don't want to have any undo records in the dumped Emacs.
(set-buffer "*scratch*")
(setq buffer-undo-list t)
@ -325,6 +331,7 @@
(equal (nth 4 command-line-args) "bootstrap"))
(setcdr load-path nil))
(setq inhibit-load-charset-map nil)
(clear-charset-maps)
(garbage-collect)