summaryrefslogtreecommitdiff
path: root/emacs/init.el
diff options
context:
space:
mode:
authorGrégoire Duchêne <gduchene@awhk.org>2025-01-11 15:49:44 +0000
committerGrégoire Duchêne <gduchene@awhk.org>2025-01-11 15:49:44 +0000
commiteca7b640967eab0806d0b5eb72983ae95b715c7a (patch)
tree91f8022afe1eba79496bd8c235925304eb702712 /emacs/init.el
parent2ef6316ae717c53071ceecc6e055d890ae0a0bfb (diff)
darwin/emacs: Automatically pick and switch themes
Diffstat (limited to 'emacs/init.el')
-rw-r--r--emacs/init.el18
1 files changed, 13 insertions, 5 deletions
diff --git a/emacs/init.el b/emacs/init.el
index fe0cbff..7604227 100644
--- a/emacs/init.el
+++ b/emacs/init.el
@@ -108,17 +108,25 @@
;; Theme Management
-(defvar my/day-theme nil "Theme to use during the day.")
-
-(defvar my/night-theme nil "Theme to use during the night.")
-
-(defvar my/fonts
+(defconst my/fonts
'((:family "Iosevka Fixed Slab" :height 140)
(:family "Iosevka SS04" :height 140)
(:family "Iosevka" :height 140)
(:family "Menlo" :height 120))
"Fonts to try as default.")
+(defconst my/themes
+ `((day . (adwaita
+ leuven
+ modus-operandi
+ tango
+ ,nil))
+ (night . (tango-dark
+ misterioso
+ modus-vivendi
+ wombat)))
+ "Themes to try.")
+
(let ((hook (cond ((daemonp) 'server-after-make-frame-hook)
(window-system 'after-init-hook))))
(when hook (add-hook hook #'my/set-frame-font)))