minor speed improvements
This commit is contained in:
parent
8c1171b018
commit
160da56845
7
init.el
7
init.el
@ -10,6 +10,8 @@
|
||||
|
||||
;;; Code:
|
||||
|
||||
(setq gc-cons-threshold (* 8 5000 5000))
|
||||
|
||||
(setq load-prefer-newer t) ; why ever use stale code, ever?
|
||||
;; Load the files that I put my settings in...
|
||||
(defvar mir-directory
|
||||
@ -27,7 +29,8 @@
|
||||
|
||||
;; do the things
|
||||
(add-hook 'server-after-make-frame-hook #'mir/graphical-setup)
|
||||
(if (display-graphic-p) (mir/graphical-setup))
|
||||
(if (display-graphic-p)
|
||||
(add-hook 'elpaca-after-init-hook #'mir/graphical-setup))
|
||||
|
||||
;; Control backups/swapfiles
|
||||
(defvar backup-directory
|
||||
@ -93,7 +96,7 @@
|
||||
(setq debug-on-error nil)
|
||||
|
||||
;; lower gc threshold again
|
||||
(setq gc-cons-threshold (* 2 1000 1000))
|
||||
(setq gc-cons-threshold (* 2 100 1000))
|
||||
;; (add-function :before #'after-focus-change-function #'garbage-collect)
|
||||
|
||||
;;; init.el ends here
|
||||
|
Loading…
Reference in New Issue
Block a user