early-init.el

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

;; GNU Emacs / N Λ N O - Emacs made simple
;; Copyright (C) 2023-2024 - N Λ N O developers

;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.

;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;; GNU General Public License for more details.

;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.

;;; Commentary:

;; The very first initialization code Emacs runs. Used for lowlevel
;; optimizations and special settings.

;;; Code:

(setq
 site-run-file nil                         ; No site-wide run-time initializations.
 inhibit-default-init t                    ; No site-wide default library
 package-enable-at-startup nil)            ; We'll use straight.el

;; Tweak gc to make startup faster.
;; See https://emacsconf.org/2023/talks/gc/
(setq gc-cons-threshold (* 80 1024 1024))

;; Reset garbage collector limit after init process has ended (800Kb)
(add-hook 'after-init-hook
          #'(lambda () (setq gc-cons-threshold 800000)))

(setq native-comp-eln-load-path
      (list (expand-file-name "eln-cache" user-emacs-directory)))

;; Start Emacs maximixed without scrollbars
(setq default-frame-alist '((fullscreen . maximized)
                            (vertical-scroll-bars . nil)
                            (horizontal-scroll-bars . nil)))

;; No menu bar
(menu-bar-mode 0)

;;; early-init.el ends here