blob: 30841d1eb860770a1acad5bda9dae37f736e5f29 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
(setq gc-cons-threshold 402653184
gc-cons-percentage 0.6)
(defvar startup/file-name-handler-alist file-name-handler-alist)
(setq file-name-handler-alist nil)
(defun startup/revert-file-name-handler-alist ()
(setq file-name-handler-alist startup/file-name-handler-alist))
(defun startup/reset-gc ()
(setq gc-cons-threshold 16777216
gc-cons-percentage 0.1))
(add-hook 'emacs-startup-hook 'startup/revert-file-name-handler-alist)
(add-hook 'emacs-startup-hook 'startup/reset-gc)
(provide 'nemacs-boilerplate)
|
