amogus2/emacs-dotfiles
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Rename load-user-lisp -> minimal-emacs-load-user-init

Browse Source
This commit is contained in:
James Cherti
2024-06-19 16:16:44 -04:00
parent 0c3aad6d99
commit 314fbd8388
2 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
early-init.el
View File

@@ -14,14 +14,14 @@
;;; Code: ;;; Code:
(defun load-user-lisp (filename) (defun minimal-emacs-load-user-init (filename)
"Execute a file of Lisp code named FILENAME." "Execute a file of Lisp code named FILENAME."
(let ((user-init-file (expand-file-name filename (let ((user-init-file (expand-file-name filename
user-emacs-directory))) user-emacs-directory)))
(when (file-exists-p user-init-file) (when (file-exists-p user-init-file)
(load user-init-file)))) (load user-init-file))))
(load-user-lisp "user-pre-early-init.el") (minimal-emacs-load-user-init "user-pre-early-init.el")
;; Garbage collection significantly affects startup times. This setting delays ;; Garbage collection significantly affects startup times. This setting delays
;; garbage collection during startup but will be reset later. ;; garbage collection during startup but will be reset later.
@@ -49,7 +49,7 @@
(when (fboundp 'horizontal-scroll-bar-mode) (when (fboundp 'horizontal-scroll-bar-mode)
(horizontal-scroll-bar-mode -1)) (horizontal-scroll-bar-mode -1))
(load-user-lisp "user-post-early-init.el") (minimal-emacs-load-user-init "user-post-early-init.el")
(provide 'early-init) (provide 'early-init)

4
init.el
View File

@@ -15,7 +15,7 @@
;;; Code: ;;; Code:
;;; Load user-pre-init.el ;;; Load user-pre-init.el
(load-user-lisp "user-pre-init.el") (minimal-emacs-load-user-init "user-pre-init.el")
;;; package: Set package archives for package installation ;;; package: Set package archives for package installation
(progn (progn
@@ -53,7 +53,7 @@
(require 'use-package))) (require 'use-package)))
;;; Load user-pre-init.el ;;; Load user-pre-init.el
(load-user-lisp "user-post-init.el") (minimal-emacs-load-user-init "user-post-init.el")
(provide 'init) (provide 'init)