aboutsummaryrefslogtreecommitdiff
path: root/bard-emacs-modules
diff options
context:
space:
mode:
authorbard <[email protected]>2024-01-28 15:00:59 -0500
committerbard <[email protected]>2024-01-28 15:00:59 -0500
commit8d461663515b8c5f26c94cd12814a918163b0d4c (patch)
tree9e574df248bdfb7dc38d7f9d46ef7fefa8bbd0b4 /bard-emacs-modules
parent76c629cddabb7fbd1fb35566c7f71e46442cbae7 (diff)
light/dark faces and border
Diffstat (limited to 'bard-emacs-modules')
-rw-r--r--bard-emacs-modules/bard-emacs-modeline.el26
1 files changed, 23 insertions, 3 deletions
diff --git a/bard-emacs-modules/bard-emacs-modeline.el b/bard-emacs-modules/bard-emacs-modeline.el
index c36755c..a1cf965 100644
--- a/bard-emacs-modules/bard-emacs-modeline.el
+++ b/bard-emacs-modules/bard-emacs-modeline.el
@@ -32,12 +32,32 @@
;; Face customization
-(defun bard/modus-themes-faces ()
+(defun bard/modus-light-faces ()
+ (modus-themes-with-colors
+ (custom-set-faces
+ `(mode-line ((t :background ,bg-ochre :foreground ,fg-main :box ,yellow-warmer))))
+ (custom-set-faces
+ `(mode-line-inactive ((t :background ,bg-ochre :foreground ,fg-dim :box ,yellow-cooler))))))
+
+(defun bard/modus-dark-faces ()
(modus-themes-with-colors
(custom-set-faces
- `(mode-line ((t :background ,bg-magenta-subtle :foreground ,fg-main :box ,border))))
+ `(mode-line ((t :background ,bg-magenta-subtle :foreground ,fg-main :box ,magenta-cooler))))
(custom-set-faces
- `(mode-line-inactive ((t :background ,bg-magenta-nuanced :foreground ,fg-dim :box ,border))))))
+ `(mode-line-inactive ((t :background ,bg-magenta-subtle :foreground ,fg-dim :box ,magenta-faint))))))
+
+(defun bard/modus-themes-faces ()
+ (if (or (memq 'modus-operandi custom-enabled-themes)
+ (memq 'modus-operandi-tinted custom-enabled-themes))
+ (bard/modus-light-faces)
+ (bard/modus-dark-faces)
+ ))
+
+;; (modus-themes-with-colors
+;; (custom-set-faces
+;; `(mode-line ((t :background ,bg-purple-subtle :foreground ,fg-main :box (:line-width 3 :color ,purple-cooler)))))
+;; (custom-set-faces
+;; `(mode-line-inactive ((t :background ,bg-purple-nuanced :foreground ,fg-dim :box (:line-width 3 :color ,purple-faint))))))
(add-hook 'modus-themes-after-load-theme-hook #'bard/modus-themes-faces)