;;; early-init.el --- Early initialization -*- lexical-binding: t -*-

;;; Commentary:

;;; Code:

;; make garbage collector less invasive
(setq gc-cons-threshold most-positive-fixnum)
(setq gc-cons-percentage 0.6)

;; disable GUI elements
(scroll-bar-mode -1)      ; hide the scroll bar
(tool-bar-mode -1)        ; hide the tool bar
(menu-bar-mode -1)        ; hide the menu
(blink-cursor-mode -1)    ; don't blink the cursor

(setq make-pointer-invisible t)  ;; hide cursor while typing
(setq use-dialog-box nil)        ;; do not show GUI dialogs
(setq inhibit-startup-screen t)  ;; hide the startup screen

;; increase font size
(set-face-attribute 'default nil :height 130)

(invert-face 'default)

(setq init-file-debug t)
(setq debug-on-error init-file-debug)

(add-hook
 'emacs-startup-hook
 (lambda (&rest _)
   (setq garbage-collection-messages t) ;; log when the gc kicks in
   ;; Make gc pauses faster by decreasing the threshold.
   (setq gc-cons-threshold (* 2 1000 1000))
   ;; Portion of heap used for allocation.  Defaults to 0.1.
   (setq gc-cons-percentage 0.6)))

;;; early-init.el ends here