[elpa] externals/modus-operandi-theme 750e342 05/99: Special colour for default active modeline border

[Stefan Monnier]

branch: externals/modus-operandi-theme
commit 750e342731a18033ad6f7345ff2d96fe0eb08c91
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Special colour for default active modeline border
    
    The intent is to make the border around the active modeline less
    intense, while retaining the element of distinction between the active
    and inactive states.
    
    This effects only concerns the standard 2D style (users have an option
    for a 3D aesthetic).
---
 modus-operandi-theme.el | 8 +++++++-
 modus-vivendi-theme.el  | 8 +++++++-
 2 files changed, 14 insertions(+), 2 deletions(-)

diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index 4d73777..eccfad2 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -705,6 +705,10 @@ AMOUNT is a customisation option."
       ;;
       ;; `fg-unfocused' must be combined with `fg-main'
       ;;
+      ;; `mode-line-default-border' is a special colour that is only
+      ;; intended for the active modeline when the user-facing option
+      ;; for `modus-operandi-theme-3d-modeline' is `nil' (default)
+      ;;
       ;; the window divider colours apply to faces with just an fg value
       ;;
       ;; all pairs are combinable with themselves
@@ -729,6 +733,8 @@ AMOUNT is a customisation option."
 
       ("fg-unfocused" . "#56576d")
 
+      ("mode-line-default-border" . "#767577")
+
       ("bg-header" . "#e5e5e5") ("fg-header" . "#2a2a2a")
 
       ("bg-whitespace" . "#fff8fc") ("fg-whitespace" . "#645060")
@@ -2484,7 +2490,7 @@ Also bind `class' to ((class color) (min-colors 89))."
    `(minimap-active-region-background ((,class :background ,bg-active)))
    `(minimap-current-line-face ((,class :background ,cyan-intense-bg 
:foreground ,fg-main)))
    ;;;; modeline
-   `(mode-line ((,class :box ,(modus-operandi-theme-modeline-box bg-inactive 
fg-inactive t)
+   `(mode-line ((,class :box ,(modus-operandi-theme-modeline-box bg-inactive 
mode-line-default-border t)
                         ,@(modus-operandi-theme-modeline-props
                            bg-active fg-dim
                            bg-active fg-active))))
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index a03185e..208b1bd 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -705,6 +705,10 @@ AMOUNT is a customisation option."
       ;;
       ;; `fg-unfocused' must be combined with `fg-main'
       ;;
+      ;; `mode-line-default-border' is a special colour that is only
+      ;; intended for the active modeline when the user-facing option
+      ;; for `modus-vivendi-theme-3d-modeline' is `nil' (default)
+      ;;
       ;; the window divider colours apply to faces with just an fg value
       ;;
       ;; all pairs are combinable with themselves
@@ -729,6 +733,8 @@ AMOUNT is a customisation option."
 
       ("fg-unfocused" . "#93959b")
 
+      ("mode-line-default-border" . "#767577")
+
       ("bg-header" . "#212121") ("fg-header" . "#dddddd")
 
       ("bg-whitespace" . "#170016") ("fg-whitespace" . "#a4959f")
@@ -2484,7 +2490,7 @@ Also bind `class' to ((class color) (min-colors 89))."
    `(minimap-active-region-background ((,class :background ,bg-active)))
    `(minimap-current-line-face ((,class :background ,cyan-intense-bg 
:foreground ,fg-main)))
    ;;;; modeline
-   `(mode-line ((,class :box ,(modus-vivendi-theme-modeline-box bg-inactive 
fg-inactive t)
+   `(mode-line ((,class :box ,(modus-vivendi-theme-modeline-box bg-inactive 
mode-line-default-border t)
                         ,@(modus-vivendi-theme-modeline-props
                            bg-active fg-dim
                            bg-active fg-active))))