branch: elpa/dracula-theme
commit e04388861873156685a3b214aa7f150987d12a27
Author: Tassilo Horn <[email protected]>
Commit: GitHub <[email protected]>

    Update and add more Gnus Summary faces
    
    The current Gnus summary face definitions where very hard to read,
    especially when using `hl-line-mode` which I guess is quite common.
    With that, read messages' foreground color equaled the hl-line-face's
    background color.
    
    I also defined the high- and low-score versions of the faces in a
    consistent way, and introduced some simple and consistent
    scheme:
    
    * Unread articles have bold weight
    * Read articles have normal weight
    * Ticked articles are underlined
    * Higher score means brighter than lower score
---
 dracula-theme.el | 16 ++++++++++++----
 1 file changed, 12 insertions(+), 4 deletions(-)

diff --git a/dracula-theme.el b/dracula-theme.el
index b580e8b..4824682 100644
--- a/dracula-theme.el
+++ b/dracula-theme.el
@@ -143,10 +143,18 @@
                (gnus-header-name :foreground ,type)
                (gnus-header-subject :foreground ,func :bold t)
                (gnus-summary-markup-face :foreground ,const)
-               (gnus-summary-normal-ancient :inherit gnus-summary-normal-read)
-               (gnus-summary-normal-read :foreground ,bg5 :weight normal)
-               (gnus-summary-normal-ticked :foreground ,keyword :weight light)
-               (gnus-summary-normal-unread :foreground ,comment :weight normal)
+              (gnus-summary-high-unread :foreground ,keyword :weight bold)
+               (gnus-summary-high-read :inherit gnus-summary-normal-unread 
:weight normal)
+              (gnus-summary-high-ancient :inherit gnus-summary-normal-read)
+               (gnus-summary-high-ticked :inherit gnus-summary-normal-read 
:underline t)
+              (gnus-summary-normal-unread :foreground ,key2 :weight bold)
+               (gnus-summary-normal-read :inherit gnus-summary-normal-unread 
:weight normal)
+              (gnus-summary-normal-ancient :inherit gnus-summary-normal-read)
+               (gnus-summary-normal-ticked :inherit gnus-summary-normal-read 
:underline t)
+              (gnus-summary-low-unread :foreground ,comment :weight bold)
+               (gnus-summary-low-read :inherit gnus-summary-normal-unread 
:weight normal)
+              (gnus-summary-low-ancient :inherit gnus-summary-normal-read)
+               (gnus-summary-low-ticked :inherit gnus-summary-normal-read 
:underline t)
                (gnus-summary-selected :inverse-video t)
                ;; helm
                (helm-bookmark-w3m :foreground ,type)

Reply via email to