Emacs: migrate to new modus-themes customisation
1 file changed, 26 insertions(+), 8 deletions(-)
jump to
M user/emacs/init.el → user/emacs/init.el
@@ -66,15 +66,33 @@ (when (or (daemonp) window-system) (use-package modus-themes :config (progn - (setq modus-themes-fringes 'subtle - modus-themes-lang-checkers '(background) - modus-themes-mode-line '(borderless accented) - modus-themes-syntax '(alt-syntax) - modus-themes-hl-line 'nil - modus-themes-region '(bg-only) - modus-themes-diffs 'desaturated) (let ((light-mode-theme 'modus-operandi) - (dark-mode-theme 'modus-vivendi)) + (dark-mode-theme 'modus-vivendi-tinted)) + (setq modus-themes-common-palette-overrides + `((builtin magenta) + (comment yellow-faint) + (constant magenta-cooler) + (docstring green-faint) + (docmarkup magenta-faint) + (fnname magenta-warmer) + (keyword cyan) + (preprocessor cyan-cooler) + (string green-cooler) + (type magenta-cooler) + (variable blue-warmer) + (rx-construct magenta-warmer) + (rx-backslash blue-cooler) + (border-mode-line-active unspecified) + (border-mode-line-inactive unspecified) + (bg-mode-line-active bg-blue-subtle) + (fg-mode-line-active fg-main) + (fg-line-number-inactive "gray50") + (fg-line-number-active fg-main) + (bg-line-number-active bg-dim) + ,@modus-themes-preset-overrides-faint) + modus-themes-to-toggle `(,light-mode-theme ,dark-mode-theme)) + (load-theme light-mode-theme :noconfirm :noenable) + (load-theme dark-mode-theme :noconfirm :noenable) (defun my/set-dark-or-light-theme () (interactive) (let ((appearance (plist-get (mac-application-state) :appearance)))