Set garbage collection threshold to 20 MiB for slow computers.
Only temporarily, to speed up initialization.
This commit is contained in:
parent
f4e4075e29
commit
b35e64f966
16
init.el
16
init.el
|
@ -1,16 +1,11 @@
|
||||||
;;; init.el --- tastytea's Emacs init file.
|
;;; init.el --- tastytea's Emacs init file.
|
||||||
;;; Time-stamp: <2019-03-22 01:57:36 CET>
|
;;; Time-stamp: <2019-03-22 02:55:57 CET>
|
||||||
|
|
||||||
;;; Commentary:
|
;;; Commentary:
|
||||||
;;; I am using this file with Emacs 26, but most of it will probably work with
|
;;; I am using this file with Emacs 26, but most of it will probably work with
|
||||||
;;; Emacs 24 and above.
|
;;; Emacs 24 and above.
|
||||||
|
|
||||||
;;; Code:
|
;;; Code:
|
||||||
|
|
||||||
;; Set garbage collection threshold to 100 MiB to speed up init
|
|
||||||
;; It is reset at the end of the file
|
|
||||||
(setq gc-cons-threshold (* 100 1024 1024))
|
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;; Packages ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;; Packages ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
(require 'package)
|
(require 'package)
|
||||||
;; (add-to-list 'package-archives
|
;; (add-to-list 'package-archives
|
||||||
|
@ -62,6 +57,12 @@
|
||||||
(setq slow-computer t)) ; localhost is schnibble
|
(setq slow-computer t)) ; localhost is schnibble
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;; Configure some essential things ;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;; Configure some essential things ;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
;; Set garbage collection threshold to 100 MiB (or 20 MiB) to speed up init
|
||||||
|
;; It is reset at the end of the file
|
||||||
|
(if slow-computer
|
||||||
|
(setq gc-cons-threshold (* 20 1024 1024))
|
||||||
|
(setq gc-cons-threshold (* 100 1024 1024)))
|
||||||
|
|
||||||
;; Accelerate startup by not printing so much
|
;; Accelerate startup by not printing so much
|
||||||
(setf inhibit-startup-screen t
|
(setf inhibit-startup-screen t
|
||||||
inhibit-startup-echo-area-message t
|
inhibit-startup-echo-area-message t
|
||||||
|
@ -128,6 +129,9 @@
|
||||||
;; Paste text where the cursor is, not where the mouse is.
|
;; Paste text where the cursor is, not where the mouse is.
|
||||||
(setq mouse-yank-at-point t)
|
(setq mouse-yank-at-point t)
|
||||||
|
|
||||||
|
;; Put scrollbar to ther ight side
|
||||||
|
(set-scroll-bar-mode 'right)
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;; Keybindings ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;; Keybindings ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
;; Scroll in other window
|
;; Scroll in other window
|
||||||
(global-set-key (kbd "S-<prior>") 'scroll-other-window-down)
|
(global-set-key (kbd "S-<prior>") 'scroll-other-window-down)
|
||||||
|
|
|
@ -1,2 +1,2 @@
|
||||||
127.0.0.1:51313 17682
|
127.0.0.1:51313 32580
|
||||||
phahw2ohVoh0oopheish7IVie9desh8aequeenei3uo8wahShe%thuadaeNa4ieh
|
phahw2ohVoh0oopheish7IVie9desh8aequeenei3uo8wahShe%thuadaeNa4ieh
|
Loading…
Reference in New Issue
Block a user