Reorganize repository

modules/emacs/early-init.el

@@ -1,43 +0,0 @@
-;;; early-init --- My emacs early init file
-;;; Commentary:
-;;; Code:
-(defun hm/reduce-gc ()
-  "Reduce the frequency of garbage collection."
-  (setq gc-cons-threshold most-positive-fixnum
-        gc-cons-percentage 0.6))
-
-(defun hm/restore-gc ()
-  "Restore the frequency of garbage collection."
-  (setq gc-cons-threshold 16777216
-        gc-cons-percentage 0.1))
-
-;; Make GC more rare during init, while minibuffer is active, and
-;; when shutting down. In the latter two cases we try doing the
-;; reduction early in the hook.
-(hm/reduce-gc)
-(add-hook 'minibuffer-setup-hook #'hm/reduce-gc -50)
-(add-hook 'kill-emacs-hook #'hm/reduce-gc -50)
-
-;; But make it more regular after startup and after closing minibuffer.
-(add-hook 'emacs-startup-hook #'hm/restore-gc)
-(add-hook 'minibuffer-exit-hook #'hm/restore-gc)
-
-;; Avoid unnecessary regexp matching while loading .el files.
-(defvar hm/file-name-handler-alist file-name-handler-alist)
-(setq file-name-handler-alist nil)
-
-(defun hm/restore-file-name-handler-alist ()
-  "Restore the 'file-name-handler-alist' variable."
-  (setq file-name-handler-alist hm/file-name-handler-alist)
-  (makunbound 'hm/file-name-handler-alist))
-
-(add-hook 'emacs-startup-hook #'hm/restore-file-name-handler-alist)
-
-;; Nix manages our packages
-(setq package-enable-at-startup nil)
-
-;; Avoid expensive frame resizing. Inspired by Doom Emacs.
-(setq frame-inhibit-implied-resize t)
-
-(provide 'early-init)
-;;; early-init.el ends here