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

1 files changed, 20 insertions, 0 deletions

diff --git a/Doom/.config/doom/config.el b/Doom/.config/doom/config.el
new file mode 100644
index 0000000..dd54d9a
--- /dev/null
+++ b/Doom/.config/doom/config.el
@@ -0,0 +1,20 @@
+;;; ~/Dotfiles/doom.d/config.el -*- lexical-binding: t; -*-
+
+(defconst +bootstrap/org-files '("config.org" "personal.org") "Org files to load relative to =doom-private-dir=/org/*")
+(defconst +bootstrap/byte-compile t "Byte compile org files")
+
+(defun +bootstrap/apply-files (babel-func)
+  "Apply babel-func to a transformed list of org-files"
+  (cl-map nil #'(lambda (file) (funcall babel-func (expand-file-name (concat doom-private-dir "org/" file)))) +bootstrap/org-files))
+
+(defun +bootstrap/load-files ()
+  "Load org files into current Emacs session via =org-babel-load-file="
+  (interactive)
+  (+bootstrap/apply-files #'org-babel-load-file))
+
+(defun +bootstrap/compile-files ()
+  "Compile org files via =org-babel-tangle-file="
+  (interactive)
+  (+bootstrap/apply-files #'org-babel-tangle-file))
+
+(+bootstrap/load-files)