emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/modus-vivendi-theme 272f7da 054/110: Style the `vertica


From: Stefan Monnier
Subject: [elpa] externals/modus-vivendi-theme 272f7da 054/110: Style the `vertical-border' explicitly
Date: Wed, 29 Apr 2020 21:40:06 -0400 (EDT)

branch: externals/modus-vivendi-theme
commit 272f7da8254411df9c272cf1e46b81ee76922985
Author: Protesilaos Stavrou <address@hidden>
Commit: Protesilaos Stavrou <address@hidden>

    Style the `vertical-border' explicitly
    
    This is meant to reduce the overall intensity of the window border.  It
    also aligns the default looks with their equivalents when
    `window-divider-mode' is enabled.
    
    Note that the docstring for `vertical-border' reads as follows:
    
        Face used for vertical window dividers on ttys.
    
    Trying it without the TTY restriction seems to work just fine.
---
 modus-operandi-theme.el | 1 +
 modus-vivendi-theme.el  | 1 +
 2 files changed, 2 insertions(+)

diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index 44547b5..d3ac94b 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -658,6 +658,7 @@ AMOUNT is a customisation option."
    `(fringe ((,class (:background
                       ,(if modus-operandi-theme-visible-fringes bg-inactive 
bg-main)
                       :foreground ,fg-main))))
+   `(vertical-border ((,class (:foreground ,fg-window-divider-inner))))
    ;;;; basic and/or ungrouped styles
    `(error ((,class (:foreground ,red :weight bold))))
    `(escape-glyph ((,class (:foreground ,fg-escape-char-construct))))
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index 947cc33..aa21b58 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -658,6 +658,7 @@ AMOUNT is a customisation option."
    `(fringe ((,class (:background
                       ,(if modus-vivendi-theme-visible-fringes bg-inactive 
bg-main)
                       :foreground ,fg-main))))
+   `(vertical-border ((,class (:foreground ,fg-window-divider-inner))))
    ;;;; basic and/or ungrouped styles
    `(error ((,class (:foreground ,red :weight bold))))
    `(escape-glyph ((,class (:foreground ,fg-escape-char-construct))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]