Introduce "metadata" common face

For stuff that's interesting, but not the main event.

1 files changed, 8 insertions, 4 deletions

diff --git a/.emacs.d/eighters-theme.el b/.emacs.d/eighters-theme.el
index f9781ec..7ec5166 100644
--- a/.emacs.d/eighters-theme.el
+++ b/.emacs.d/eighters-theme.el
@@ -142,6 +142,8 @@
   "Face for names of persons.")
 (defface eighters-markup nil
   "Face for text that describes \"structure\" rather than content.")
+(defface eighters-metadata nil
+  "Face for extra context surrounding something of interest.")
 (defface eighters-title-1 nil
   "Face for level 1 headings.")
 (defface eighters-title-2 nil
@@ -178,6 +180,7 @@
   `(eighters-date ((t (:foreground ,fg-magenta))))
   `(eighters-identity ((t (:foreground ,fg-red))))
   `(eighters-markup ((t (:foreground ,fg-dim))))
+  `(eighters-metadata ((t (:foreground ,fg-magenta-dim))))
   `(eighters-title-1 ((t (:foreground ,fg-cyan-subtle :weight bold :height 1.28 :inherit variable-pitch))))
   `(eighters-title-2 ((t (:foreground ,fg-green-subtle :weight bold :height 1.20 :inherit variable-pitch))))
   `(eighters-title-3 ((t (:foreground ,fg-yellow-subtle :weight bold :height 1.12 :inherit variable-pitch))))
@@ -209,8 +212,8 @@
   `(change-log-date ((t (:inherit eighters-date))))
   `(change-log-email ((t (:inherit (eighters-identity fixed-pitch-serif)))))
   `(change-log-name ((t (:inherit eighters-identity))))
-  `(compilation-column-number ((t (:inherit font-lock-constant-face))))
-  `(compilation-line-number ((t (:inherit font-lock-constant-face))))
+  `(compilation-column-number ((t (:inherit eighters-metadata))))
+  `(compilation-line-number ((t (:inherit eighters-metadata))))
   `(compilation-mode-line-exit ((t (:inherit compilation-info))))
   `(compilation-mode-line-fail ((t (:inherit compilation-error))))
   `(compilation-mode-line-run ((t (:inherit compilation-warning))))
@@ -361,7 +364,7 @@
   `(org-mode-line-clock ((t (:inherit font-lock-constant-face))))
   `(org-special-keyword ((t (:inherit shadow))))
   `(org-table ((t (:foreground ,fg-dim :inherit fixed-pitch-serif))))
-  `(org-tag ((t (:inherit font-lock-constant-face))))
+  `(org-tag ((t (:inherit eighters-metadata))))
   `(org-todo ((t (:inherit error))))
   `(org-verbatim ((t (:background ,bg-hl-dim :foreground ,fg-magenta :inherit fixed-pitch-serif))))
   `(region ((t (:background ,bg-cyan))))
@@ -471,6 +474,7 @@
   `(magit-branch-local ((t (:foreground ,fg-blue))))
   `(magit-branch-remote ((t (:foreground ,fg-green-dim))))
   `(magit-branch-remote-head ((t (:inverse-video t :inherit magit-branch-remote))))
+  `(magit-keyword ((t (:inherit eighters-metadata))))
   `(magit-process-ng ((t (:inherit error))))
   `(magit-process-ok ((t (:inherit success))))
   `(magit-log-date ((t (:inherit eighters-date))))
@@ -508,7 +512,7 @@
   `(git-commit-comment-branch-remote ((t (:inherit magit-branch-remote))))
   `(git-commit-comment-file ((t (:foreground ,fg-dim))))
   `(git-commit-comment-heading ((t (:inherit eighters-title-2))))
-  `(git-commit-keyword ((t (:inherit font-lock-constant-face))))
+  `(git-commit-keyword ((t (:inherit eighters-metadata))))
   `(git-commit-known-pseudo-header ((t (:inherit message-header-name))))
   `(git-commit-pseudo-header ((t (:inherit eighters-identity))))
   `(git-commit-summary ((t (:inherit eighters-title-1)))))