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

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

[elpa] externals/ef-themes 8164cccf5d 4/5: Complete support for all Gnus


From: ELPA Syncer
Subject: [elpa] externals/ef-themes 8164cccf5d 4/5: Complete support for all Gnus faces
Date: Sun, 4 Sep 2022 22:57:37 -0400 (EDT)

branch: externals/ef-themes
commit 8164cccf5d8e5f87ab560adae1058928c337df42
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Complete support for all Gnus faces
---
 README.org   |  2 +-
 ef-themes.el | 69 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--
 2 files changed, 68 insertions(+), 3 deletions(-)

diff --git a/README.org b/README.org
index e42d794ce2..f4af8847b5 100644
--- a/README.org
+++ b/README.org
@@ -831,7 +831,7 @@ everything most users need.
 - font-lock
 - git-commit
 - git-rebase
-- gnus (incomplete, though likely is okay)
+- gnus [ Added all faces as part of {{{development-version}}} ]
 - image-dired [ Part of {{{development-version}}} ]
 - info
 - isearch, occur, query-replace
diff --git a/ef-themes.el b/ef-themes.el
index db7be9cd59..07e77177c4 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -951,13 +951,78 @@ Helper function for `ef-themes-preview-colors'."
     `(git-rebase-comment-heading  ((,c :inherit (bold 
font-lock-comment-face))))
     `(git-rebase-description ((,c :foreground ,fg-main)))
     `(git-rebase-hash ((,c :foreground ,constant)))
-;;;; gnus WORK-IN-PROGRESS
-    `(gnus-emphasis-highlight-words ((,c :background ,bg-alt :foreground 
,warning)))
+;;;; gnus
+    `(gnus-button ((,c :inherit button)))
+    `(gnus-cite-1 ((,c :inherit message-cited-text-1)))
+    `(gnus-cite-2 ((,c :inherit message-cited-text-2)))
+    `(gnus-cite-3 ((,c :inherit message-cited-text-3)))
+    `(gnus-cite-4 ((,c :inherit message-cited-text-4)))
+    `(gnus-cite-5 ((,c :inherit message-cited-text-1)))
+    `(gnus-cite-6 ((,c :inherit message-cited-text-2)))
+    `(gnus-cite-7 ((,c :inherit message-cited-text-3)))
+    `(gnus-cite-8 ((,c :inherit message-cited-text-4)))
+    `(gnus-cite-9 ((,c :inherit message-cited-text-1)))
+    `(gnus-cite-10 ((,c :inherit message-cited-text-2)))
+    `(gnus-cite-11 ((,c :inherit message-cited-text-3)))
+    `(gnus-cite-attribution ((,c :inherit italic)))
+    `(gnus-emphasis-bold ((,c :inherit bold)))
+    `(gnus-emphasis-bold-italic ((,c :inherit bold-italic)))
+    `(gnus-emphasis-highlight-words ((,c :inherit warning)))
+    `(gnus-emphasis-italic ((,c :inherit italic)))
+    `(gnus-emphasis-underline-bold ((,c :inherit gnus-emphasis-bold :underline 
t)))
+    `(gnus-emphasis-underline-bold-italic ((,c :inherit 
gnus-emphasis-bold-italic :underline t)))
+    `(gnus-emphasis-underline-italic ((,c :inherit gnus-emphasis-italic 
:underline t)))
+    `(gnus-group-mail-1 ((,c :inherit bold :foreground ,rainbow-1)))
+    `(gnus-group-mail-1-empty ((,c :foreground ,rainbow-1)))
+    `(gnus-group-mail-2 ((,c :inherit bold :foreground ,rainbow-2)))
+    `(gnus-group-mail-2-empty ((,c :foreground ,rainbow-2)))
+    `(gnus-group-mail-3 ((,c :inherit bold :foreground ,rainbow-3)))
+    `(gnus-group-mail-3-empty ((,c :foreground ,rainbow-3)))
+    `(gnus-group-mail-low ((,c :inherit bold :foreground ,fg-alt)))
+    `(gnus-group-mail-low-empty ((,c :foreground ,fg-alt)))
+    `(gnus-group-news-1 ((,c :inherit bold :foreground ,rainbow-1)))
+    `(gnus-group-news-1-empty ((,c :foreground ,rainbow-1)))
+    `(gnus-group-news-2 ((,c :inherit bold :foreground ,rainbow-2)))
+    `(gnus-group-news-2-empty ((,c :foreground ,rainbow-2)))
+    `(gnus-group-news-3 ((,c :inherit bold :foreground ,rainbow-3)))
+    `(gnus-group-news-3-empty ((,c :foreground ,rainbow-3)))
+    `(gnus-group-news-4 ((,c :inherit bold :foreground ,rainbow-4)))
+    `(gnus-group-news-4-empty ((,c :foreground ,rainbow-4)))
+    `(gnus-group-news-5 ((,c :inherit bold :foreground ,rainbow-5)))
+    `(gnus-group-news-5-empty ((,c :foreground ,rainbow-5)))
+    `(gnus-group-news-6 ((,c :inherit bold :foreground ,rainbow-6)))
+    `(gnus-group-news-6-empty ((,c :foreground ,rainbow-6)))
+    `(gnus-group-news-low ((,c :inherit bold :foreground ,fg-alt)))
+    `(gnus-group-news-low-empty ((,c :foreground ,fg-alt)))
     `(gnus-header-content ((,c :inherit message-header-other)))
     `(gnus-header-from ((,c :inherit message-header-to :underline nil)))
     `(gnus-header-name ((,c :inherit message-header-name)))
     `(gnus-header-newsgroups ((,c :inherit message-header-newsgroups)))
     `(gnus-header-subject ((,c :inherit message-header-subject)))
+    `(gnus-server-agent ((,c :inherit bold)))
+    `(gnus-server-closed ((,c :inherit italic)))
+    `(gnus-server-cloud ((,c :inherit bold :foreground ,fg-alt)))
+    `(gnus-server-cloud-host ((,c :inherit bold :foreground ,fg-alt :underline 
t)))
+    `(gnus-server-denied ((,c :inherit error)))
+    `(gnus-server-offline ((,c :inherit shadow)))
+    `(gnus-server-opened ((,c :inherit success)))
+    `(gnus-summary-cancelled ((,c :background ,bg-warning :foreground ,warning 
:extend t)))
+    `(gnus-summary-high-ancient ((,c :inherit bold :foreground ,fg-alt)))
+    `(gnus-summary-high-read ((,c :inherit bold :foreground ,fg-dim)))
+    `(gnus-summary-high-ticked ((,c :inherit bold :foreground ,err)))
+    `(gnus-summary-high-undownloaded ((,c :inherit bold-italic :foreground 
,warning)))
+    `(gnus-summary-high-unread ((,c :inherit bold)))
+    `(gnus-summary-low-ancient ((,c :inherit italic)))
+    `(gnus-summary-low-read ((,c :inherit (shadow italic))))
+    `(gnus-summary-low-ticked ((,c :inherit italic :foreground ,err)))
+    `(gnus-summary-low-undownloaded ((,c :inherit italic :foreground 
,warning)))
+    `(gnus-summary-low-unread (( )))
+    `(gnus-summary-normal-ancient (( )))
+    `(gnus-summary-normal-read ((,c :inherit shadow)))
+    `(gnus-summary-normal-ticked ((,c :foreground ,err)))
+    `(gnus-summary-normal-undownloaded ((,c :foreground ,warning)))
+    `(gnus-summary-normal-unread (( )))
+    `(gnus-summary-selected ((,c :inherit highlight)))
 ;;;; image-dired
     `(image-dired-thumb-flagged ((,c :background ,err)))
     `(image-dired-thumb-mark ((,c :background ,info)))



reply via email to

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