From: Jakub Czajka <jakub@ekhem.eu.org>
Date: Thu, 22 Dec 2022 20:51:57 +0000 (+0100)
Subject: [emacs] Define dotfile.
X-Git-Url: https://git.ekhem.eu.org/?a=commitdiff_plain;h=5847df2e8e27ba008e310c1e7fde623fecf7c0dc;p=guix.git

[emacs] Define dotfile.

This commit creates init.el, which is evaluated on startup.
---

diff --git a/conf/home/emacs.scm b/conf/home/emacs.scm
index aaf22fa..b188c07 100644
--- a/conf/home/emacs.scm
+++ b/conf/home/emacs.scm
@@ -31,7 +31,8 @@
 	    (packages
 	     (list emacs))
 	    (dotfiles
-	     (list "emacs/.local/bin/emacs_client")))))
+	     (list "emacs/.config/emacs/init.el"
+		   "emacs/.local/bin/emacs_client")))))
 
 (define emacs-services
   (list emacs-daemon-service
diff --git a/emacs/.config/emacs/init.el b/emacs/.config/emacs/init.el
new file mode 100644
index 0000000..b6e8b23
--- /dev/null
+++ b/emacs/.config/emacs/init.el
@@ -0,0 +1,11 @@
+;; Copyright (c) 2022 Jakub Czajka <jakub@ekhem.eu.org>.
+;; License: GPL-3.0 or later.
+;;
+;; init.el - emacs initialization file. Loads all files from the ./conf
+;; directory.
+
+(let ((conf-directory (expand-file-name "conf" user-emacs-directory)))
+  (push conf-directory load-path)
+
+  (dolist (file (directory-files conf-directory nil ".+\\.el?$"))
+    (require (intern (file-name-sans-extension file)))))