X-Git-Url: https://git.korewanetadesu.com/?p=BTCSB-theme.git;a=blobdiff_plain;f=BTCSB-theme.el;h=cdb75116a5597488cd96f8501b3faf9bd61ef8d0;hp=bcb34ea8bd089b3bac18c47eceed64d0958af3b6;hb=f9a7a0403c20c4463184927c2487fc7c737c74ca;hpb=56f22d771fb616dfed67b79a3bda52ac04df1846

diff --git a/BTCSB-theme.el b/BTCSB-theme.el
index bcb34ea..cdb7511 100644
--- a/BTCSB-theme.el
+++ b/BTCSB-theme.el
@@ -4,6 +4,7 @@
 ;; Package-Version: 20170806
 ;; Package-Requires: ((emacs "24"))
 ;; Keywords: faces
+;; URL: https://git.korewanetadesu.com/BTCSB-theme.git
 ;;
 ;; This is free and unencumbered software released into the public
 ;; domain. Anyone is free to copy, modify, publish, use, compile,
@@ -115,7 +116,7 @@ recommended pairings are Fantasque Sans or Monaco.")
    `(error ((t (:foreground ,clr27))))
    `(escape-glyph ((t (:foreground ,clr18))))
    `(fringe ((t (:background ,clr03))))
-   ;; `(header TODO: I don't use this....)
+   `(header-line ((t (:background ,clr02 :foreground ,clr08))))
    `(highlight ((t (:background ,clr16))))
    `(isearch ((t (:background ,clr15))))
    `(lazy-highlight ((t (:background ,clr09))))
@@ -209,12 +210,24 @@ recommended pairings are Fantasque Sans or Monaco.")
    `(web-mode-css-selector-face ((t (:foreground ,clr26))))
    `(web-mode-css-pseudo-class-face ((t (:foreground ,clr17))))
 
-   ;; Mail, elfeed, etc.
-   `(message-header-name ((t (:foreground ,clr14))))
-   `(message-header-subject ((t (:foreground ,clr09))))
-   `(message-header-to ((t (:foreground ,clr09))))
-   `(message-header-other ((t (:foreground ,clr08))))
+   ;; SHR, EWW, etc.
    `(shr-link ((t (:foreground ,clr24))))
+
+   ;; Mail, elfeed, etc.
+   `(message-header-name ((t (:foreground ,clr07))))
+   `(message-header-subject ((t (:foreground ,clr04))))
+   `(message-header-to ((t (:foreground ,clr04))))
+   `(message-header-other ((t (:foreground ,clr23))))
+
+   ;; Elfeed
+   `(elfeed-search-date-face ((t (:foreground ,clr07))))
+   `(elfeed-search-title-face ((t (:foreground ,clr04))))
+   `(elfeed-search-unread-title-face ((t (:foreground ,clr26))))
+   `(elfeed-search-feed-face ((t (:foreground ,clr23))))
+   `(elfeed-search-tag-face ((t (:foreground ,clr21))))
+   `(elfeed-search-last-update-face ((t (:foreground ,clr08))))
+   `(elfeed-search-unread-count-face ((t (:foreground ,clr18))))
+   `(elfeed-search-filter-face ((t (:foreground ,clr20))))
    ))
 
 ;;;###autoload