OpenWrt packages
Sign in or create your account | Project List | Help
OpenWrt packages Git Source Tree
Root/
1 | Index: emacs23.2-openwrt-q/lisp/loadup.el |
2 | =================================================================== |
3 | --- emacs23.2-openwrt-q.orig/lisp/loadup.el 2010-12-18 20:22:56.000000000 +0100 |
4 | +++ emacs23.2-openwrt-q/lisp/loadup.el 2010-12-18 20:23:14.000000000 +0100 |
5 | @@ -47,6 +47,14 @@ |
6 | |
7 | ;;; Code: |
8 | |
9 | +;; This reduces memory usage by a few MB. So far no negative consequences |
10 | +;; have been witnessed. |
11 | +(setq inhibit-load-charset-map t) |
12 | + |
13 | +;; Purify does in fact _safe_ memory (more efficient than normal' heap?) so |
14 | +;; do not disable it for now. |
15 | +;(setq purify-flag nil) |
16 | + |
17 | ;; Add subdirectories to the load-path for files that might get |
18 | ;; autoloaded when bootstrapping. |
19 | (if (or (equal (nth 3 command-line-args) "bootstrap") |
20 | @@ -80,9 +88,10 @@ |
21 | (load "emacs-lisp/backquote") |
22 | (load "subr") |
23 | |
24 | +;; not doing garbage collection this often decreases start-up time by 5s |
25 | ;; Do it after subr, since both after-load-functions and add-hook are |
26 | ;; implemented in subr.el. |
27 | -(add-hook 'after-load-functions '(lambda (f) (garbage-collect))) |
28 | +;(add-hook 'after-load-functions '(lambda (f) (garbage-collect))) |
29 | |
30 | ;; We specify .el in case someone compiled version.el by mistake. |
31 | (load "version.el") |
32 |