[elpa] externals/doric-themes 0294e41ce4 153/156: Make the mode lines use an underline if the box is not available

[ELPA Syncer]

branch: externals/doric-themes
commit 0294e41ce43d7ec8d6e2a8548ad8aa5efae5d5e8
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@protesilaos.com>

    Make the mode lines use an underline if the box is not available
---
 doric-themes.el | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/doric-themes.el b/doric-themes.el
index ede79fe721..cd95489589 100644
--- a/doric-themes.el
+++ b/doric-themes.el
@@ -1420,15 +1420,17 @@ is either the `dark' or `light' symbol."
             '(markup-replacement-face ((t :inherit fixed-pitch)))
 
             `(mode-line
-              ((((supports :box t))
-                :box ,fg-shadow-subtle :background ,bg-shadow-intense 
:foreground ,fg-shadow-intense)
-               (t :background ,bg-shadow-intense :foreground 
,fg-shadow-intense)))
+              ((default :background ,bg-shadow-intense :foreground 
,fg-shadow-intense)
+               (((supports :box t))
+                :box ,fg-shadow-subtle)
+               (t :underline ,fg-shadow-subtle)))
 
             `(mode-line-active ((t :inherit mode-line)))
             `(mode-line-inactive
-              ((((supports :box t))
-                :box ,bg-shadow-intense :background ,bg-shadow-subtle 
:foreground ,fg-shadow-subtle)
-               (t :background ,bg-shadow-subtle :foreground 
,fg-shadow-subtle)))
+              ((default :background ,bg-shadow-subtle :foreground 
,fg-shadow-subtle)
+               (((supports :box t))
+                :box ,bg-shadow-intense)
+               (t :underline ,bg-shadow-intense)))
 
             `(notmuch-message-summary-face
               ((default :foreground ,fg-shadow-intense)