~~/.doom.d -> ~/.config/doom

Doom/.config/doom/init.el

@@ -9,12 +9,12 @@
 ;; found in modules/README.org.
 (doom! :private
        ;;(oreoline)
-       (bindings)
-       (startup)
-       (gentemplate)
+       bindings
+       startup
+       gentemplate
+       narrow
        ;; (ocaml +lsp)
        ;; (rss +elfeed)
-       (narrow)
        ;;(completion)
 
        :input

Doom/.config/doom/modules/private/startup/config.el

@@ -8,5 +8,7 @@ Time of startup: %s"
           (emacs-init-time)
           (current-time-string (current-time))))
 
-(setq-default mode-line-format (list "%l:%c %P \t %+%b(" '(:eval (format "%s" major-mode)) ") \t %I \t" vc-mode mode-line-end-spaces))
-(setq initial-scratch-message (+startup/create-scratch-message))
+(add-hook 'doom-first-input-hook
+          #'(lambda ()
+              (setq-default mode-line-format (list "%l:%c %P \t %+%b(" '(:eval (format "%s" major-mode)) ") \t %I \t" vc-mode mode-line-end-spaces))
+              (setq-default initial-scratch-message (+startup/create-scratch-message))))