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

2 files changed, 24 insertions, 0 deletions

diff --git a/Doom/.config/doom/modules/private/startup/README.org b/Doom/.config/doom/modules/private/startup/README.org
new file mode 100644
index 0000000..68b4376
--- /dev/null
+++ b/Doom/.config/doom/modules/private/startup/README.org
@@ -0,0 +1,10 @@
+#+TITLE:   private/startup
+#+DATE:    July 15, 2020
+
+* Description
+Basically setup the default Emacs mode-line and the scratch buffer for ease of use.
+This replaces the =modeline= and =doom-dashboard= modules as it leverages the default Emacs utilities.
+* Prerequisites
+Emacs of some kind, preferably 27 just for the sake of preserving versioning.
+* Requirements
+None
diff --git a/Doom/.config/doom/modules/private/startup/config.el b/Doom/.config/doom/modules/private/startup/config.el
new file mode 100644
index 0000000..48c4f5f
--- /dev/null
+++ b/Doom/.config/doom/modules/private/startup/config.el
@@ -0,0 +1,14 @@
+;;; private/startup/config.el -*- lexical-binding: t; -*-
+
+(defun +startup/create-scratch-message ()
+  "Generate a string for the scratch buffer"
+  (format "Welcome to Emacs! (｡◕‿◕｡)
+Load time was %s
+Time of startup: %s"
+          (emacs-init-time)
+          (current-time-string (current-time))))
+
+(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))))