branch: externals/ef-themes
commit 8164cccf5d8e5f87ab560adae1058928c337df42
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@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)))
