diff options
author | Amin Bandali <bandali@kelar.org> | 2025-02-07 21:04:21 -0500 |
---|---|---|
committer | Amin Bandali <bandali@kelar.org> | 2025-02-07 21:09:36 -0500 |
commit | f0ad1b1cbe334c004012205fdb9af81bb7c3a538 (patch) | |
tree | 71b7266490fd11427c7e8efec82fd4e032401ce9 /.emacs.d/init.el | |
parent | c7b47e03e0ac16d6db84d59d8cff58291b22fbaa (diff) | |
download | configs-f0ad1b1cbe334c004012205fdb9af81bb7c3a538.tar.gz configs-f0ad1b1cbe334c004012205fdb9af81bb7c3a538.tar.xz configs-f0ad1b1cbe334c004012205fdb9af81bb7c3a538.zip |
A few small Emacs-related updates
Diffstat (limited to '')
-rw-r--r-- | .emacs.d/init.el | 39 |
1 files changed, 13 insertions, 26 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el index e79be6a..f9518c2 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -24,31 +24,19 @@ ;;; Code: -;;; Emacs initialization - -;; Temporarily increase `gc-cons-threshhold' and `gc-cons-percentage' -;; during startup to reduce garbage collection frequency. Clearing -;; `file-name-handler-alist' seems to help reduce startup time too. -(defconst b/gc-cons-threshold gc-cons-threshold) -(defconst b/gc-cons-percentage gc-cons-percentage) -(defvar b/file-name-handler-alist file-name-handler-alist) (setq - gc-cons-threshold (* 30 1024 1024) ; 30 MiB - gc-cons-percentage 0.6 - file-name-handler-alist nil) - -;; Set them back to their defaults once we're done initializing. -(defun b/post-init () - "My post-initialize function, run after loading `user-init-file'." - (setq - b/emacs-initialized t - gc-cons-threshold b/gc-cons-threshold - gc-cons-percentage b/gc-cons-percentage - file-name-handler-alist b/file-name-handler-alist) - - (require 'package) - (package-initialize)) -(add-hook 'after-init-hook #'b/post-init) + use-package-verbose init-file-debug + use-package-expand-minimally (not init-file-debug) + use-package-compute-statistics init-file-debug + debug-on-error init-file-debug + debug-on-quit init-file-debug) + +(require 'package) +(when (< emacs-major-version 29) + (unless (package-installed-p 'use-package) + (unless package-archive-contents + (package-refresh-contents)) + (package-install 'use-package))) ;; whoami (setq @@ -122,8 +110,7 @@ plain variables. This means that `setopt' will execute any ;; Separate custom file (don't want it mixing with init.el). (setopt custom-file (b/emacs.d "custom.el")) (with-eval-after-load 'custom - (when (file-exists-p custom-file) - (load custom-file))) + (load custom-file 'noerror)) ;; Start Emacs server ;; (https://www.gnu.org/software/emacs/manual/html_node/emacs/Emacs-Server.html) |