eighters-theme

Eighters gonna eight.
git clone https://git.kevinlegouguec.net/eighters-theme
Log | Files | Refs | README | LICENSE

eighters-theme.el (9434B)


      1 (deftheme eighters
      2   "Eighters gonna eight.")
      3 
      4 ;; TODO: unset "inverse" on mode-line face; it messes up with
      5 ;;       foreground/background colors on custom lighters
      6 
      7 ;; TODO: unify quotes (org, markdown, auctex, tex)
      8 ;; TODO: org-fontify-quote-and-verse-blocks: t
      9 
     10 ;; The default face's font and height are not defined, so that they
     11 ;; can be set individually for different computers in .Xresources; see
     12 ;; xrdb(1), Xsession(5) and (emacs) Fonts.
     13 
     14 (custom-theme-set-faces
     15  'eighters
     16  '(default ((t (:background "black" :foreground "gainsboro"))))
     17  '(cursor ((t (:background "gainsboro"))))
     18  '(fringe ((t (:foreground "gray50"))))
     19  '(shadow ((t (:foreground "gray50"))))
     20  '(vertical-border ((t (:foreground "gray50"))))
     21  '(escape-glyph ((t (:foreground "red2"))))
     22  '(minibuffer-prompt ((t (:foreground "steelblue1" :weight bold))))
     23  '(highlight ((t (:background "gray10"))))
     24  '(region ((t (:background "steel blue" :foreground "gainsboro"))))
     25  '(font-lock-builtin-face ((t (:foreground "steelblue1" :weight bold))))
     26  '(font-lock-comment-face ((t (:foreground "gray50" :slant italic))))
     27  '(font-lock-constant-face ((t (:foreground "maroon1"))))
     28  '(font-lock-doc-face ((t (:inherit (font-lock-string-face)))))
     29  '(font-lock-function-name-face ((t (:foreground "steelblue1" :weight bold))))
     30  '(font-lock-keyword-face ((t (:foreground "cyan" :weight bold))))
     31  '(font-lock-preprocessor-face ((t (:inherit (font-lock-builtin-face)))))
     32  '(font-lock-string-face ((t (:foreground "green3" :slant italic))))
     33  '(font-lock-regexp-grouping-backslash ((t (:foreground "olivedrab4"))))
     34  '(font-lock-regexp-grouping-construct ((t (:foreground "olivedrab2" :weight bold))))
     35  '(font-lock-type-face ((t (:foreground "green3"))))
     36  '(font-lock-variable-name-face ((t (:foreground "gold"))))
     37  '(help-key-binding ((t (:weight bold :box (:line-width 3 :style released-button) :inverse-video t))))
     38  '(completions-common-part ((t (:inherit (font-lock-comment-face)))))
     39  '(link ((t (:underline t :foreground "steelblue1"))))
     40  '(custom-group-tag ((t (:weight bold :foreground "steelblue1" :height 1.2 :inherit (variable-pitch)))))
     41  '(custom-variable-tag ((t (:weight bold :foreground "steelblue1"))))
     42  '(isearch-fail ((t (:background "red2"))))
     43  '(lazy-highlight ((t (:foreground "darkturquoise" :background "darkcyan"))))
     44  '(match ((t (:background "royalblue3"))))
     45  '(error ((t (:foreground "red2" :weight bold))))
     46  '(success ((t (:foreground "green3" :weight bold))))
     47  '(header-line ((t (:box (:line-width 3 :style released-button)))))
     48  '(mode-line ((t (:inverse-video t))))
     49  '(mode-line-inactive ((t (:foreground "gray70" :background "gray25" :inherit (mode-line)))))
     50  '(mode-line-buffer-id ((t (:weight bold))))
     51  '(compilation-mode-line-exit ((t (:inherit (compilation-info)))))
     52  '(compilation-mode-line-fail ((t (:inherit (compilation-error)))))
     53  '(calendar-today ((t (:inverse-video t))))
     54  '(whitespace-space ((t (:foreground "gray30"))))
     55  '(whitespace-newline ((t (:foreground "gray30"))))
     56  ;; Main diff faces, and heirs.
     57  '(diff-added ((t (:background "#091117"))))
     58  '(diff-removed ((t (:background "#170f00"))))
     59  '(diff-changed ((t (:background "#171400"))))
     60  '(diff-refine-added ((t (:background "#1b3347"))))
     61  '(diff-refine-removed ((t (:background "#472e00"))))
     62  '(diff-refine-changed ((t (:background "#473c00"))))
     63  '(diff-indicator-added ((t (:foreground "steelblue2"))))
     64  '(diff-indicator-removed ((t (:foreground "orange2"))))
     65  '(diff-indicator-changed ((t (:foreground "gold2"))))
     66  '(ediff-current-diff-A ((t (:inherit (diff-removed)))))
     67  '(ediff-current-diff-B ((t (:inherit (diff-added)))))
     68  '(ediff-current-diff-C ((t ((:inherit (diff-changed))))))
     69  '(ediff-fine-diff-A ((t (:inherit (diff-refine-removed)))))
     70  '(ediff-fine-diff-B ((t (:inherit (diff-refine-added)))))
     71  '(ediff-fine-diff-C ((t (:inherit (diff-refine-changed)))))
     72  '(smerge-base ((t (:inherit (diff-changed)))))
     73  '(smerge-upper ((t (:inherit (diff-removed)))))
     74  '(smerge-lower ((t (:inherit (diff-added)))))
     75  '(smerge-refined-removed ((t (:inherit (diff-refine-removed)))))
     76  '(smerge-refined-added ((t (:inherit (diff-refine-added)))))
     77  ;; Supplementary diff faces.
     78  '(diff-header ((t (:foreground "steelblue1" :weight bold))))
     79  '(diff-file-header ((t (:foreground "cyan" :weight bold))))
     80  '(ediff-current-diff-Ancestor ((t (:background "#170410"))))
     81  '(ediff-fine-diff-Ancestor ((t (:background "#470e32"))))
     82  '(ediff-even-diff-A ((t (:inherit (highlight)))))
     83  '(ediff-odd-diff-A ((t (:inherit (highlight)))))
     84  '(ediff-even-diff-B ((t (:inherit (highlight)))))
     85  '(ediff-odd-diff-B ((t (:inherit (highlight)))))
     86  '(ediff-even-diff-C ((t (:inherit (highlight)))))
     87  '(ediff-odd-diff-C ((t (:inherit (highlight)))))
     88  '(ediff-even-diff-Ancestor ((t (:inherit (highlight)))))
     89  '(ediff-odd-diff-Ancestor ((t (:inherit (highlight)))))
     90  '(term-color-black ((t (:foreground "black" :background "black"))))
     91  '(term-color-blue ((t (:foreground "steelblue1" :background "steelblue1"))))
     92  '(term-color-cyan ((t (:foreground "cyan" :background "cyan"))))
     93  '(term-color-green ((t (:foreground "green3" :background "green3"))))
     94  '(term-color-magenta ((t (:foreground "maroon1" :background "maroon1"))))
     95  '(term-color-red ((t (:foreground "red2" :background "red2"))))
     96  '(term-color-white ((t (:foreground "gainsboro" :background "gainsboro"))))
     97  '(term-color-yellow ((t (:foreground "gold" :background "gold"))))
     98  '(which-func ((t (:inherit (font-lock-function-name-face)))))
     99  '(sh-heredoc ((t (:foreground "gold"))))
    100  '(erc-input-face ((t (:foreground "brown1"))))
    101  '(erc-my-nick-face ((t (:foreground "brown1" :weight bold))))
    102  '(outline-1 ((t (:height 2.0 :inherit (variable-pitch font-lock-function-name-face)))))
    103  '(outline-2 ((t (:height 1.7 :inherit (variable-pitch font-lock-function-name-face)))))
    104  '(outline-3 ((t (:height 1.4 :inherit (variable-pitch font-lock-function-name-face)))))
    105  '(outline-4 ((t (:height 1.1 :inherit (variable-pitch font-lock-function-name-face)))))
    106  '(outline-5 ((t (:height 1.0 :inherit (variable-pitch font-lock-function-name-face)))))
    107  '(outline-6 ((t (:height 1.0 :inherit (variable-pitch font-lock-function-name-face)))))
    108  '(outline-7 ((t (:height 1.0 :inherit (variable-pitch font-lock-function-name-face)))))
    109  '(outline-8 ((t (:height 1.0 :inherit (variable-pitch font-lock-function-name-face)))))
    110  '(org-ellipsis ((t (:inherit (font-lock-comment-face)))))
    111  '(org-code ((t (:inherit (fixed-pitch-serif)))))
    112  '(org-verbatim ((t (:inherit (fixed-pitch-serif)))))
    113  '(org-block ((t (:extend t :inherit (highlight)))))
    114  '(org-quote ((t (:slant italic :inherit (org-block)))))
    115  '(org-date ((t (:inherit (font-lock-string-face)))))
    116  '(org-special-keyword ((t (:inherit (font-lock-comment-face)))))
    117  '(org-drawer ((t (:weight bold :inherit (font-lock-comment-face)))))
    118  '(org-tag ((t (:inherit (font-lock-constant-face button)))))
    119  '(org-todo ((t (:inherit (error)))))
    120  '(org-done ((t (:inherit (success)))))
    121  '(font-latex-bold-face ((t (:inherit (bold)))))
    122  '(font-latex-italic-face ((t (:inherit (italic)))))
    123  '(font-latex-math-face ((t (:inherit (tex-math)))))
    124  '(font-latex-script-char-face ((t (:inherit (shadow)))))
    125  '(font-latex-sectioning-5-face ((t (:inherit (variable-pitch font-lock-function-name-face)))))
    126  '(font-latex-verbatim-face ((t (:inherit (tex-verbatim)))))
    127  '(gnus-summary-cancelled ((t (:strike-through t :extend t :inherit (shadow)))))
    128  '(gnus-summary-normal-ancient ((t (:foreground "gray70"))))
    129  '(gnus-summary-normal-read ((t (:foreground "gray70" :inherit (italic)))))
    130  '(gnus-summary-normal-unread ((t (:inherit (bold)))))
    131  '(gnus-summary-selected ((t (:extend t :inherit (highlight)))))
    132  '(mm-uu-extract ((t (:inherit (highlight)))))
    133  '(diff-hl-insert ((t (:inherit (diff-indicator-added highlight)))))
    134  '(diff-hl-delete ((t (:inherit (diff-indicator-removed highlight)))))
    135  '(diff-hl-change ((t (:inherit (diff-indicator-changed highlight)))))
    136  '(magit-blame-heading ((t (:inherit (magit-blame-highlight)))))
    137  '(magit-blame-highlight ((t (:weight normal :slant normal :inherit (highlight shadow)))))
    138  '(magit-blame-margin ((t (:slant normal :box (:line-width 1 :style released-button) :inherit (font-lock-function-name-face)))))
    139  '(magit-diff-context ((t (:inherit (shadow)))))
    140  '(magit-diff-context-highlight ((t (:background "gray5" :inherit (shadow)))))
    141  '(magit-diff-added ((t (:inherit (diff-added)))))
    142  '(magit-diff-added-highlight ((t (:inherit (diff-added)))))
    143  '(magit-diff-removed ((t (:inherit (diff-removed)))))
    144  '(magit-diff-removed-highlight ((t (:inherit (diff-removed)))))
    145  '(magit-diff-revision-summary ((t (:inherit (magit-section-heading)))))
    146  '(magit-diff-revision-summary-highlight ((t (:inherit (magit-section-heading magit-section-highlight)))))
    147  '(magit-diffstat-added ((t (:inherit (diff-indicator-added)))))
    148  '(magit-diffstat-removed ((t (:inherit (diff-indicator-removed)))))
    149  '(magit-section-highlight ((t (:inherit (highlight)))))
    150  '(markdown-code-face ((t (:inherit (fixed-pitch-serif)))))
    151  '(markdown-inline-code-face ((t (:inherit (markdown-code-face)))))
    152  '(markdown-pre-face ((t (:extend t :inherit (markdown-code-face highlight)))))
    153  '(which-key-group-description-face ((t (:inherit (font-lock-type-face)))))
    154  '(which-key-key-face ((t (:weight bold :box (:line-width 3 :style released-button) :inverse-video t)))))
    155 
    156 (custom-theme-set-variables 'eighters
    157  '(ansi-color-names-vector
    158    ["black" "red2" "green3" "gold" "steelblue1" "maroon1" "cyan"
    159     "gainsboro"]))
    160 
    161 (provide-theme 'eighters)