diff options
| author | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-07-11 16:20:49 +0200 |
|---|---|---|
| committer | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-07-12 19:16:16 +0200 |
| commit | 82ce70bf2478658a8d943cc1c7ef4f4a32329ea1 (patch) | |
| tree | 161aca47980007428de31e19ff7048b0a6e48ea6 /suweren | |
| parent | f70736e6092fe42d3c1aa886e32f645531ef8798 (diff) | |
prepare modular Emacs configuration
Diffstat (limited to 'suweren')
| -rw-r--r-- | suweren/home/emacs-init.el | 5 | ||||
| -rw-r--r-- | suweren/home/services.scm | 11 |
2 files changed, 13 insertions, 3 deletions
diff --git a/suweren/home/emacs-init.el b/suweren/home/emacs-init.el new file mode 100644 index 0000000..c9080f0 --- /dev/null +++ b/suweren/home/emacs-init.el @@ -0,0 +1,5 @@ +;; This is a DRY expression to load a list of Emacs configuration files. +(mapcar (lambda (file-name) + (let ((file-path (concat "$XDG_CONFIG_HOME/emacs/" file-name))) + (load-file file-path))) + (list "configuration.el")) diff --git a/suweren/home/services.scm b/suweren/home/services.scm index db2e0df..0bd92b1 100644 --- a/suweren/home/services.scm +++ b/suweren/home/services.scm @@ -13,11 +13,16 @@ (bash-profile bash-profile)))) (define-public suweren-home-xdg-configuration-files-extension - (let* ((emacs-init-file (local-file "emacs-configuration.el")) + (let* ((emacs-configuration-file (local-file "emacs-configuration.el")) + (emacs-init-file (local-file "emacs-init.el")) - (emacs-init (list "emacs/init.el" emacs-init-file)) + (emacs-configuration (list "emacs/configuration.el" + emacs-configuration-file)) + (emacs-init (list "emacs/init.el" + emacs-init-file)) - (value (list emacs-init))) + (value (list emacs-configuration + emacs-init))) (simple-service 'suweren-home-xdg-configuration-files home-xdg-configuration-files-service-type value))) |