Get rid of doom-pre-init-hook

core/core-os.el

@@ -4,19 +4,20 @@
 (defconst IS-LINUX   (eq system-type 'gnu/linux))
 (defconst IS-WINDOWS (memq system-type '(cygwin windows-nt ms-dos)))
 
-;; clipboard
-(setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING)
+(unless noninteractive
+  ;; clipboard
+  (setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING)
         ;; Use a shared clipboard
         select-enable-clipboard t
         select-enable-primary t)
 
-;; stop copying each visual state move to the clipboard:
-;; https://bitbucket.org/lyro/evil/issue/336/osx-visual-state-copies-the-region-on
-;; Most of this code grokked from:
-;; http://stackoverflow.com/questions/15873346/elisp-rename-macro
-(advice-add #'evil-visual-update-x-selection :override #'ignore)
+  ;; stop copying each visual state move to the clipboard:
+  ;; https://bitbucket.org/lyro/evil/issue/336/osx-visual-state-copies-the-region-on
+  ;; Most of this code grokked from:
+  ;; http://stackoverflow.com/questions/15873346/elisp-rename-macro
+  (advice-add #'evil-visual-update-x-selection :override #'ignore)
 
-(cond (IS-MAC
+  (cond (IS-MAC
          (setq mac-command-modifier 'meta
                mac-option-modifier  'alt
                ;; sane trackpad/mouse scroll settings
@@ -35,7 +36,6 @@
            ;; A known problem with GUI Emacs on MacOS: it runs in an isolated
            ;; environment, so envvars will be wrong. That includes the PATH Emacs
            ;; picks up. `exec-path-from-shell' fixes this.
-         (defun doom|init-exec-path ()
            (when (require 'exec-path-from-shell nil t)
              (def-setting! :env (&rest vars)
                "Inject VARS from your shell environment into Emacs."
@@ -43,8 +43,7 @@
              (setq exec-path-from-shell-check-startup-files nil
                    exec-path-from-shell-arguments (delete "-i" exec-path-from-shell-arguments))
              (defvaralias 'exec-path-from-shell-debug 'doom-debug-mode)
-             (exec-path-from-shell-initialize)))
-         (add-hook 'doom-pre-init-hook #'doom|init-exec-path)))
+             (exec-path-from-shell-initialize))))
 
         (IS-LINUX
          (setq x-gtk-use-system-tooltips nil    ; native tooltips are ugly!
@@ -52,7 +51,7 @@
 
         (IS-WINDOWS
          (setq w32-get-true-file-attributes nil) ; fix file io slowdowns
-       ))
+         )))
 
 (provide 'core-os)
 ;;; core-os.el ends here

core/core-packages.el

@@ -268,7 +268,10 @@ to least)."
       (unless (or force-p noninteractive)
         (doom//reload-package-autoloads))))
   ;; Initialize Doom core
+  (require 'core-os)
   (unless noninteractive
+    (add-hook! 'emacs-startup-hook
+      #'(doom|post-init doom|display-benchmark))
     (require 'core-ui)
     (require 'core-editor)
     (require 'core-projects)
@@ -282,10 +285,6 @@ non-nil."
     ;; Set `doom-init-modules-p' early, so `doom-pre-init-hook' won't infinitely
     ;; recurse by accident if any of them need `doom-initialize-modules'.
     (setq doom-init-modules-p t)
-    (unless noninteractive
-      (add-hook! 'emacs-startup-hook
-        #'(doom|post-init doom|display-benchmark)))
-    (run-hooks 'doom-pre-init-hook)
     (when doom-private-dir
       (let ((load-prefer-newer t))
         (load (expand-file-name "init" doom-private-dir)

core/core.el

@@ -59,10 +59,6 @@ Use this for files that change often, like cache files.")
 XDG directory conventions if ~/.config/doom exists.")
 
 ;; Doom hooks
-(defvar doom-pre-init-hook nil
-  "Hooks run after Doom is first initialized; after Doom's core files are
-loaded, but before your private init.el file or anything else is loaded.")
-
 (defvar doom-init-hook nil
   "Hooks run after all init.el files are loaded, including your private and all
 module init.el files, but before their config.el files are loaded.")
@@ -199,7 +195,6 @@ this, you'll get stuttering and random freezes) and resets
 
 (require 'core-lib)
 (require 'core-packages)
-(require 'core-os)
 
 (doom-initialize noninteractive)
 (if noninteractive