summaryrefslogtreecommitdiff
path: root/.config/emacs/modules/bd--themes.el
diff options
context:
space:
mode:
Diffstat (limited to '.config/emacs/modules/bd--themes.el')
-rw-r--r--.config/emacs/modules/bd--themes.el24
1 files changed, 13 insertions, 11 deletions
diff --git a/.config/emacs/modules/bd--themes.el b/.config/emacs/modules/bd--themes.el
index 3604be9..478f6fe 100644
--- a/.config/emacs/modules/bd--themes.el
+++ b/.config/emacs/modules/bd--themes.el
@@ -35,13 +35,17 @@ to.")
:config
;; Disable all other themes to avoid awkward blending:
(mapc #'disable-theme custom-enabled-themes)
- (defun bd/pad-mode-line (&rest _)
- "Inserts a large space around the modeline"
+ (defun bd/modus-set-faces (&rest _)
+ "Blends the modeline with the echo area,
+and some other minor face changes."
(modus-themes-with-colors
(custom-set-faces
- `(mode-line ((,c :box (:line-width 7 :color ,bg-main))))
- `(mode-line-inactive ((,c :box (:line-width 7 :color ,bg-main)))))))
- (add-hook 'modus-themes-post-load-hook #'bd/pad-mode-line)
+ `(mode-line ((,c :overline ,bg-button-active)))
+ `(mode-line-inactive ((,c :overline ,bg-button-inactive)))
+ `(hl-line ((,c :background nil :underline ,fg-main)))
+ `(line-number-current-line ((,c :underline ,fg-main)))
+ `(eshell-prompt ((,c :foreground ,fg-main :background ,bg-dim :height 1.1 :extend t))))))
+ (add-hook 'modus-themes-post-load-hook #'bd/modus-set-faces)
:custom
(modus-themes-to-toggle '(modus-operandi-tinted modus-vivendi-tinted))
(modus-themes-mixed-fonts t)
@@ -56,7 +60,8 @@ to.")
(t variable-pitch regular 1.0)))
(modus-themes-common-palette-overrides
- '((bg-mode-line-active bg-blue-nuanced)
+ '((bg-mode-line-active bg-main)
+ (bg-mode-line-inactive bg-main)
(border-mode-line-active bg-main)
(border-mode-line-inactive bg-main)
(bg-line-number-active bg-dim)
@@ -64,11 +69,8 @@ to.")
(fg-heading-1 fg-term-blue-bright)
(fg-heading-2 fg-term-magenta-bright)
(bg-tab-bar bg-main)
- (bg-tab-current bg-blue-nuanced)
- (bg-tab-other bg-mode-line-inactive)))
-
- (modus-vivendi-tritanopia-palette-overrides
- '((bg-blue-nuanced bg-red-subtle))))
+ (bg-tab-current bg-main)
+ (bg-tab-other bg-button-inactive))))
(load-theme 'modus-vivendi-tinted :no-confirm)
(run-hooks 'modus-themes-post-load-hook)