1097 lines
64 KiB
EmacsLisp
1097 lines
64 KiB
EmacsLisp
;;; base16-theme.el --- A set of base16 themes for your favorite editor
|
||
|
||
;; Author: Kaleb Elwert <belak@coded.io>
|
||
;; Neil Bhakta
|
||
;; Maintainer: Kaleb Elwert <belak@coded.io>
|
||
;; Package-Version: 3.2.0.20260816.50
|
||
;; Package-Revision: 17acf7f6efd7
|
||
;; Homepage: https://github.com/tinted-theming/base16-emacs
|
||
|
||
;;; Commentary:
|
||
;; base16-theme is a collection of themes built around the base16
|
||
;; concept (https://github.com/tinted-theming/base16). All themes are
|
||
;; generated from the official set of color schemes and the templates
|
||
;; which are included in this repo.
|
||
|
||
;;; Code:
|
||
|
||
(defcustom base16-theme-256-color-source 'terminal
|
||
"Where to get the colors in a 256-color terminal.
|
||
|
||
In a 256-color terminal, it's not clear where the colors should come from.
|
||
There are 3 possible values: terminal (which was taken from the xresources
|
||
theme), base16-shell (which was taken from a combination of base16-shell and
|
||
the xresources theme) and colors (which will be converted from the actual
|
||
html color codes to the closest color).
|
||
|
||
Note that this needs to be set before themes are loaded or it will not work."
|
||
:type '(radio (const :tag "Terminal" terminal)
|
||
(const :tag "Base16 shell" base16-shell)
|
||
(const :tag "Colors" colors))
|
||
:group 'base16)
|
||
|
||
(defcustom base16-theme-distinct-fringe-background t
|
||
"Make the fringe background different from the normal background color.
|
||
Also affects `linum-mode' background."
|
||
:type 'boolean
|
||
:group 'base16)
|
||
|
||
(defcustom base16-theme-highlight-mode-line nil
|
||
"Make the active mode line stand out more.
|
||
|
||
There are two choices for applying the emphasis:
|
||
box: Draws a thin border around the active
|
||
mode line.
|
||
contrast: Use the \"default\" face's foreground
|
||
which should result in more contrast."
|
||
:type '(radio (const :tag "Off" nil)
|
||
(const :tag "Draw box around" box)
|
||
(const :tag "Contrast" contrast))
|
||
:group 'base16)
|
||
|
||
(defvar base16-theme-shell-colors
|
||
'(:base00 "black"
|
||
:base01 "brightgreen"
|
||
:base02 "brightyellow"
|
||
:base03 "brightblack"
|
||
:base04 "brightblue"
|
||
:base05 "white"
|
||
:base06 "brightmagenta"
|
||
:base07 "brightwhite"
|
||
:base08 "red"
|
||
:base09 "brightred"
|
||
:base0A "yellow"
|
||
:base0B "green"
|
||
:base0C "cyan"
|
||
:base0D "blue"
|
||
:base0E "magenta"
|
||
:base0F "brightcyan")
|
||
"Base16 colors used when in a terminal and not using base16-shell.
|
||
|
||
These mappings are based on the xresources themes. If you're
|
||
using a different terminal color scheme, you may want to look for
|
||
an alternate theme for use in the terminal.")
|
||
|
||
(defvar base16-theme-shell-colors-256
|
||
'(:base00 "black"
|
||
:base01 "color-18"
|
||
:base02 "color-19"
|
||
:base03 "brightblack"
|
||
:base04 "color-20"
|
||
:base05 "white"
|
||
:base06 "color-21"
|
||
:base07 "brightwhite"
|
||
:base08 "red"
|
||
:base09 "color-16"
|
||
:base0A "yellow"
|
||
:base0B "green"
|
||
:base0C "cyan"
|
||
:base0D "blue"
|
||
:base0E "magenta"
|
||
:base0F "color-17")
|
||
"Base16 colors used when in a terminal and using base16-shell.
|
||
|
||
These mappings are based on the xresources themes combined with
|
||
the base16-shell code. If you're using a different terminal
|
||
color scheme, you may want to look for an alternate theme for use
|
||
in the terminal.")
|
||
|
||
(defun base16-theme-transform-color-key (key colors)
|
||
"Transform a given color `KEY' into a theme color using `COLORS'.
|
||
|
||
This function is meant for transforming symbols to valid colors.
|
||
If the value refers to a setting then return whatever is appropriate.
|
||
If not a setting but is found in the valid list of colors then
|
||
return the actual color value. Otherwise return the value unchanged."
|
||
(if (symbolp key)
|
||
(cond
|
||
|
||
((string= (symbol-name key) "base16-settings-fringe-bg")
|
||
(if base16-theme-distinct-fringe-background
|
||
(plist-get colors :base01)
|
||
(plist-get colors :base00)))
|
||
|
||
((string= (symbol-name key) "base16-settings-mode-line-box")
|
||
(if (eq base16-theme-highlight-mode-line 'box)
|
||
(list :line-width 1 :color (plist-get colors :base04))
|
||
nil))
|
||
|
||
((string= (symbol-name key) "base16-settings-mode-line-fg")
|
||
(if (eq base16-theme-highlight-mode-line 'contrast)
|
||
(plist-get colors :base05)
|
||
(plist-get colors :base04)))
|
||
|
||
(t
|
||
(let ((maybe-color (plist-get colors (intern (concat ":" (symbol-name key))))))
|
||
(if maybe-color
|
||
maybe-color
|
||
key))))
|
||
key))
|
||
|
||
|
||
(defun base16-theme-transform-spec (spec colors)
|
||
"Transform a theme `SPEC' into a face spec using `COLORS'."
|
||
(let ((output))
|
||
(while spec
|
||
(let* ((key (car spec))
|
||
(value (base16-theme-transform-color-key (cadr spec) colors)))
|
||
|
||
;; Append the transformed element
|
||
(cond
|
||
((and (memq key '(:box :underline)) (listp value))
|
||
(setq output (append output (list key (base16-theme-transform-spec value colors)))))
|
||
(t
|
||
(setq output (append output (list key value))))))
|
||
|
||
;; Go to the next element in the list
|
||
(setq spec (cddr spec)))
|
||
|
||
;; Return the transformed spec
|
||
output))
|
||
|
||
(defun base16-theme-transform-face (spec colors)
|
||
"Transform a face `SPEC' into an Emacs theme face definition using `COLORS'."
|
||
(let* ((face (car spec))
|
||
(definition (cdr spec))
|
||
(shell-colors-256 (pcase base16-theme-256-color-source
|
||
('terminal base16-theme-shell-colors)
|
||
("terminal" base16-theme-shell-colors)
|
||
('base16-shell base16-theme-shell-colors-256)
|
||
("base16-shell" base16-theme-shell-colors-256)
|
||
('colors colors)
|
||
("colors" colors)
|
||
(_ base16-theme-shell-colors))))
|
||
|
||
;; This is a list of fallbacks to make us select the sanest option possible.
|
||
;; If there's a graphical terminal, we use the actual colors. If it's not
|
||
;; graphical, the terminal supports 256 colors, and the user enables it, we
|
||
;; use the base16-shell colors. Otherwise, we fall back to the basic
|
||
;; xresources colors.
|
||
(list face `((((type graphic)) ,(base16-theme-transform-spec definition colors))
|
||
(((min-colors 256)) ,(base16-theme-transform-spec definition shell-colors-256))
|
||
(t ,(base16-theme-transform-spec definition base16-theme-shell-colors))))))
|
||
|
||
(defun base16-theme-set-faces (theme-name colors faces)
|
||
"Define `THEME-NAME' using `COLORS' to map the `FACES' to actual colors."
|
||
(apply 'custom-theme-set-faces theme-name
|
||
(mapcar #'(lambda (face)
|
||
(base16-theme-transform-face face colors))
|
||
faces)))
|
||
|
||
(defun base16-theme-define (theme-name theme-colors)
|
||
"Define colorscheme faces given a `THEME-NAME' and a plist of `THEME-COLORS'."
|
||
(base16-theme-set-faces
|
||
theme-name
|
||
theme-colors
|
||
|
||
'(
|
||
;;; Built-in
|
||
;;;; basic colors
|
||
(border :background base03)
|
||
(cursor :background base08)
|
||
(default :foreground base05 :background base00)
|
||
(fringe :background base16-settings-fringe-bg)
|
||
(gui-element :background base01)
|
||
(header-line :foreground base0E :background unspecified :inherit mode-line)
|
||
(highlight :background base01)
|
||
(link :foreground base0D :underline t)
|
||
(link-visited :foreground base0E :underline t)
|
||
(minibuffer-prompt :foreground base0D)
|
||
(region :background base02 :distant-foreground base05)
|
||
(secondary-selection :background base03 :distant-foreground base05)
|
||
(trailing-whitespace :foreground base0A :background base0C)
|
||
(vertical-border :foreground base02)
|
||
(widget-button :underline t)
|
||
(widget-field :background base03 :box (:line-width 1 :color base06))
|
||
(completions-common-part :foreground base0C)
|
||
|
||
(error :foreground base08 :weight bold)
|
||
(warning :foreground base09 :weight bold)
|
||
(success :foreground base0B :weight bold)
|
||
(shadow :foreground base03)
|
||
|
||
;;;; compilation
|
||
(compilation-column-number :foreground base0A)
|
||
(compilation-line-number :foreground base0A)
|
||
(compilation-message-face :foreground base0D)
|
||
(compilation-mode-line-exit :foreground base0B)
|
||
(compilation-mode-line-fail :foreground base08)
|
||
(compilation-mode-line-run :foreground base0D)
|
||
|
||
;;;; custom
|
||
(custom-variable-tag :foreground base0D)
|
||
(custom-group-tag :foreground base0D)
|
||
(custom-state :foreground base0B)
|
||
|
||
;;;; font-lock
|
||
(font-lock-builtin-face :foreground base0C)
|
||
(font-lock-comment-delimiter-face :foreground base03)
|
||
(font-lock-comment-face :foreground base03)
|
||
(font-lock-constant-face :foreground base09)
|
||
(font-lock-doc-face :foreground base04)
|
||
(font-lock-doc-string-face :foreground base03)
|
||
(font-lock-function-name-face :foreground base0D)
|
||
(font-lock-keyword-face :foreground base0E)
|
||
(font-lock-negation-char-face :foreground base0B)
|
||
(font-lock-preprocessor-face :foreground base0D)
|
||
(font-lock-regexp-grouping-backslash :foreground base0A)
|
||
(font-lock-regexp-grouping-construct :foreground base0E)
|
||
(font-lock-string-face :foreground base0B)
|
||
(font-lock-type-face :foreground base0A)
|
||
(font-lock-variable-name-face :foreground base08)
|
||
(font-lock-warning-face :foreground base08)
|
||
|
||
;;;; help buffers
|
||
(help-key-binding :foreground base05 :background base01 :box (:line-width 1 :color base05) :inherit fixed-pitch)
|
||
|
||
;;;; isearch
|
||
(match :foreground base0D :background base01 :inverse-video t)
|
||
(isearch :foreground base0A :background base01 :inverse-video t)
|
||
(lazy-highlight :foreground base0C :background base01 :inverse-video t)
|
||
(isearch-lazy-highlight-face :inherit lazy-highlight) ;; was replaced with 'lazy-highlight in emacs 22
|
||
(isearch-fail :background base01 :inverse-video t :inherit font-lock-warning-face)
|
||
|
||
;;;; line-numbers
|
||
(line-number :foreground base03 :background base16-settings-fringe-bg)
|
||
(line-number-current-line :inherit fringe)
|
||
|
||
;;;; mode-line
|
||
(mode-line :foreground base16-settings-mode-line-fg :background base02 :box base16-settings-mode-line-box)
|
||
(mode-line-buffer-id :foreground base0B :background unspecified)
|
||
(mode-line-emphasis :foreground base06 :slant italic)
|
||
(mode-line-highlight :foreground base0E :box nil :weight bold)
|
||
(mode-line-inactive :foreground base03 :background base01 :box nil)
|
||
|
||
;;;; tab-bar
|
||
(tab-bar :background base16-settings-fringe-bg)
|
||
(tab-bar-tab :foreground base09 :background base01)
|
||
(tab-bar-tab-inactive :foreground base06 :background base01)
|
||
(tab-bar-tab-group-current :foreground base05 :background base00)
|
||
(tab-bar-tab-group-inactive :background base16-settings-fringe-bg)
|
||
|
||
;;;; tab-line
|
||
(tab-line :background base16-settings-fringe-bg)
|
||
(tab-line-tab :background base16-settings-fringe-bg)
|
||
(tab-line-tab-inactive :background base16-settings-fringe-bg)
|
||
(tab-line-tab-current :foreground base05 :background base00)
|
||
(tab-line-highlight :distant-foreground base05 :background base02)
|
||
|
||
;;; Third-party
|
||
|
||
;;;; adoc-mode
|
||
(adoc-gen-face :foreground base0C)
|
||
(adoc-verbatim-face :foreground base0A)
|
||
(adoc-meta-face :foreground base03)
|
||
|
||
;;;; anzu-mode
|
||
(anzu-mode-line :foreground base0E)
|
||
|
||
;;;; auctex
|
||
(font-latex-bold-face :foreground base0B)
|
||
(font-latex-doctex-documentation-face :background base03)
|
||
(font-latex-italic-face :foreground base0B)
|
||
(font-latex-math-face :foreground base09)
|
||
(font-latex-sectioning-0-face :foreground base0A)
|
||
(font-latex-sectioning-1-face :foreground base0A)
|
||
(font-latex-sectioning-2-face :foreground base0A)
|
||
(font-latex-sectioning-3-face :foreground base0A)
|
||
(font-latex-sectioning-4-face :foreground base0A)
|
||
(font-latex-sectioning-5-face :foreground base0A)
|
||
(font-latex-sedate-face :foreground base0C)
|
||
(font-latex-string-face :foreground base0A)
|
||
(font-latex-verbatim-face :foreground base09)
|
||
(font-latex-warning-face :foreground base08)
|
||
|
||
(TeX-error-description-error :inherit error)
|
||
(TeX-error-description-tex-said :inherit font-lock-function-name-face)
|
||
(TeX-error-description-warning :inherit warning)
|
||
|
||
;;;; centaur-tabs
|
||
(centaur-tabs-default :background base01 :foreground base01)
|
||
(centaur-tabs-selected :background base00 :foreground base06)
|
||
(centaur-tabs-unselected :background base01 :foreground base05)
|
||
(centaur-tabs-selected-modified :background base00 :foreground base0D)
|
||
(centaur-tabs-unselected-modified :background base01 :foreground base0D)
|
||
(centaur-tabs-active-bar-face :background base0D)
|
||
(centaur-tabs-modified-marker-selected :inherit 'centaur-tabs-selected :foreground base0D)
|
||
(centaur-tabs-modified-marker-unselected :inherit 'centaur-tabs-unselected :foreground base0D)
|
||
|
||
;;;; circe-mode
|
||
(circe-fool-face :foreground base02)
|
||
(circe-my-message-face :foreground base0B)
|
||
(circe-highlight-nick-face :foreground base0A)
|
||
(circe-originator-face :foreground base0E)
|
||
(circe-prompt-face :foreground base0D)
|
||
(circe-server-face :foreground base03)
|
||
|
||
;;;; avy
|
||
(avy-lead-face-0 :foreground base00 :background base0C)
|
||
(avy-lead-face-1 :foreground base00 :background base05)
|
||
(avy-lead-face-2 :foreground base00 :background base0E)
|
||
(avy-lead-face :foreground base00 :background base09)
|
||
(avy-background-face :foreground base03)
|
||
(avy-goto-char-timer-face :inherit highlight)
|
||
|
||
;;;; clojure-mode
|
||
(clojure-keyword-face :foreground base0E)
|
||
|
||
;;;; company-mode
|
||
(company-tooltip :inherit tooltip)
|
||
(company-scrollbar-bg :background base07)
|
||
(company-scrollbar-fg :background base04)
|
||
(company-tooltip-annotation :foreground base08)
|
||
(company-tooltip-common :inherit font-lock-constant-face)
|
||
(company-tooltip-selection :background base02 :inherit font-lock-function-name-face)
|
||
(company-tooltip-search :inherit match)
|
||
(company-tooltip-search-selection :inherit match)
|
||
(company-preview-common :inherit secondary-selection)
|
||
(company-preview :foreground base04)
|
||
(company-preview-search :inherit match)
|
||
(company-echo-common :inherit secondary-selection)
|
||
|
||
;;;; corfu
|
||
(corfu-default :inherit tooltip)
|
||
(corfu-current :background base02 :inherit font-lock-function-name-face)
|
||
(corfu-bar :background base05)
|
||
(corfu-border :background base04)
|
||
|
||
;;;; cperl-mode
|
||
(cperl-array-face :weight bold :inherit font-lock-variable-name-face)
|
||
(cperl-hash-face :weight bold :slant italic :inherit font-lock-variable-name-face)
|
||
(cperl-nonoverridable-face :inherit font-lock-builtin-face)
|
||
|
||
;;;; cscope-minor-mode
|
||
(cscope-file-face :foreground base0B)
|
||
(cscope-function-face :foreground base0D)
|
||
(cscope-line-number-face :foreground base0A)
|
||
(cscope-mouse-face :foreground base04 :background base01)
|
||
(cscope-separator-face :foreground base08 :overline t :underline t :weight bold)
|
||
|
||
;;;; csv-mode
|
||
(csv-separator-face :foreground base09)
|
||
|
||
;;;; diff-hl-mode
|
||
(diff-hl-change :foreground base0E)
|
||
(diff-hl-delete :foreground base08)
|
||
(diff-hl-insert :foreground base0B)
|
||
|
||
;;;; diff-mode
|
||
(diff-added :foreground base0B)
|
||
(diff-changed :foreground base0E)
|
||
(diff-removed :foreground base08)
|
||
(diff-header :background base01)
|
||
(diff-file-header :background base02)
|
||
(diff-hunk-header :foreground base0E :background base01)
|
||
|
||
;;;; dired
|
||
(dired-filetype-plain :foreground base05 :background base00)
|
||
|
||
;;;; dired+
|
||
(diredp-compressed-file-suffix :foreground base0D)
|
||
(diredp-dir-heading :foreground unspecified :background unspecified :inherit heading)
|
||
(diredp-dir-priv :foreground base0C :background unspecified)
|
||
(diredp-exec-priv :foreground base0D :background unspecified)
|
||
(diredp-executable-tag :foreground base08 :background unspecified)
|
||
(diredp-file-name :foreground base0A)
|
||
(diredp-file-suffix :foreground base0B)
|
||
(diredp-flag-mark-line :background unspecified :inherit highlight)
|
||
(diredp-ignored-file-name :foreground base04)
|
||
(diredp-link-priv :foreground base0E :background unspecified)
|
||
(diredp-mode-line-flagged :foreground base08)
|
||
(diredp-mode-line-marked :foreground base0B)
|
||
(diredp-no-priv :background unspecified)
|
||
(diredp-number :foreground base0A)
|
||
(diredp-other-priv :foreground base0E :background unspecified)
|
||
(diredp-rare-priv :foreground base08 :background unspecified)
|
||
(diredp-read-priv :foreground base0B :background unspecified)
|
||
(diredp-symlink :foreground base0E)
|
||
(diredp-write-priv :foreground base0A :background unspecified)
|
||
|
||
;;;; diredfl
|
||
(diredfl-autofile-name :foreground base0E)
|
||
(diredfl-compressed-file-name :foreground base0A)
|
||
(diredfl-compressed-file-suffix :foreground base0D)
|
||
(diredfl-date-time :foreground base0C :weight light)
|
||
(diredfl-deletion :foreground unspecified :background base08)
|
||
(diredfl-deletion-file-name :foreground base00 :background base08 :weight bold)
|
||
(diredfl-dir-heading :foreground unspecified :background unspecified :inherit heading :weight bold)
|
||
(diredfl-dir-name :foreground base0D)
|
||
(diredfl-dir-priv :foreground base0D :background unspecified)
|
||
(diredfl-exec-priv :foreground base08 :background unspecified)
|
||
(diredfl-executable-tag :foreground base08 :background unspecified)
|
||
(diredfl-file-name :foreground base0A)
|
||
(diredfl-file-suffix :foreground base0B)
|
||
(diredfl-flag-mark :foreground base09 :weight bold)
|
||
(diredfl-flag-mark-line :background unspecified :inherit highlight)
|
||
(diredfl-ignored-file-name :foreground base04)
|
||
(diredfl-link-priv :foreground base0E :background unspecified)
|
||
(diredfl-no-priv :background unspecified)
|
||
(diredfl-number :foreground base0A)
|
||
(diredfl-other-priv :foreground base0E :background unspecified)
|
||
(diredfl-rare-priv :foreground base0F :background unspecified)
|
||
(diredfl-read-priv :foreground base0B :background unspecified)
|
||
(diredfl-symlink :foreground base0E)
|
||
(diredfl-tagged-autofile-name :foreground base05)
|
||
(diredfl-write-priv :foreground base0A :background unspecified)
|
||
|
||
;;;; doom-modeline
|
||
(doom-modeline-eldoc-bar :background base0B)
|
||
(doom-modeline-inactive-bar :background unspecified) ; transparent
|
||
(doom-modeline-bar :background base0D)
|
||
|
||
;;;; ediff-mode
|
||
(ediff-even-diff-A :inverse-video t)
|
||
(ediff-even-diff-B :inverse-video t)
|
||
(ediff-even-diff-C :inverse-video t)
|
||
(ediff-odd-diff-A :foreground base04 :inverse-video t)
|
||
(ediff-odd-diff-B :foreground base04 :inverse-video t)
|
||
(ediff-odd-diff-C :foreground base04 :inverse-video t)
|
||
|
||
;;;; eldoc-mode
|
||
(eldoc-highlight-function-argument :foreground base0B :weight bold)
|
||
|
||
;;;; erc
|
||
(erc-direct-msg-face :foreground base09)
|
||
(erc-error-face :foreground base08)
|
||
(erc-header-face :foreground base06 :background base04)
|
||
(erc-input-face :foreground base0B)
|
||
(erc-keyword-face :foreground base0A)
|
||
(erc-current-nick-face :foreground base0B)
|
||
(erc-my-nick-face :foreground base0B)
|
||
(erc-nick-default-face :foreground base0E :weight normal)
|
||
(erc-nick-msg-face :foreground base0A :weight normal)
|
||
(erc-notice-face :foreground base04)
|
||
(erc-pal-face :foreground base09)
|
||
(erc-prompt-face :foreground base0D)
|
||
(erc-timestamp-face :foreground base0C)
|
||
|
||
;;;; eshell
|
||
(eshell-ls-archive :foreground base08)
|
||
(eshell-ls-backup :foreground base0F)
|
||
(eshell-ls-clutter :foreground base09)
|
||
(eshell-ls-directory :foreground base0D)
|
||
(eshell-ls-executable :foreground base0B)
|
||
(eshell-ls-missing :foreground base08)
|
||
(eshell-ls-product :foreground base0F)
|
||
(eshell-ls-readonly :foreground base06)
|
||
(eshell-ls-special :foreground base0E)
|
||
(eshell-ls-symlink :foreground base0C)
|
||
(eshell-ls-unreadable :foreground base04)
|
||
(eshell-prompt :foreground base05)
|
||
|
||
;;;; evil-mode
|
||
(evil-search-highlight-persist-highlight-face :background base01 :inverse-video t :inherit font-lock-warning-face)
|
||
|
||
;;;; fic-mode
|
||
(fic-author-face :foreground base09 :underline t)
|
||
(fic-face :foreground base08 :weight bold)
|
||
|
||
;;;; flycheck-mode
|
||
(flycheck-error :underline (:style wave :color base08))
|
||
(flycheck-info :underline (:style wave :color base0B))
|
||
(flycheck-warning :underline (:style wave :color base09))
|
||
|
||
;;;; flymake-mode
|
||
(flymake-warnline :background base01 :underline base09)
|
||
(flymake-errline :background base01 :underline base08)
|
||
(flymake-warning :background base01 :underline base09)
|
||
(flymake-error :background base01 :underline base08)
|
||
|
||
;;;; flyspell-mode
|
||
(flyspell-duplicate :underline (:style wave :color base09))
|
||
(flyspell-incorrect :underline (:style wave :color base08))
|
||
|
||
;;;; git-gutter-mode
|
||
(git-gutter:added :foreground base0B)
|
||
(git-gutter:deleted :foreground base08)
|
||
(git-gutter:modified :foreground base0E)
|
||
(git-gutter:separator :foreground base0C)
|
||
(git-gutter:unchanged :foreground base0A :inverse-video t)
|
||
|
||
;;;; git-gutter+-mode
|
||
(git-gutter+-added :foreground base0B)
|
||
(git-gutter+-deleted :foreground base08)
|
||
(git-gutter+-modified :foreground base0E)
|
||
(git-gutter+-unchanged :foreground base0A :inverse-video t)
|
||
|
||
;;;; git-gutter-fringe
|
||
(git-gutter-fr:added :foreground base0B)
|
||
(git-gutter-fr:deleted :foreground base08)
|
||
(git-gutter-fr:modified :foreground base0E)
|
||
|
||
;;;; gnus
|
||
(gnus-cite-1 :foreground unspecified :inherit outline-1)
|
||
(gnus-cite-2 :foreground unspecified :inherit outline-2)
|
||
(gnus-cite-3 :foreground unspecified :inherit outline-3)
|
||
(gnus-cite-4 :foreground unspecified :inherit outline-4)
|
||
(gnus-cite-5 :foreground unspecified :inherit outline-5)
|
||
(gnus-cite-6 :foreground unspecified :inherit outline-6)
|
||
(gnus-cite-7 :foreground unspecified :inherit outline-7)
|
||
(gnus-cite-8 :foreground unspecified :inherit outline-8)
|
||
;; there are several more -cite- faces...
|
||
(gnus-header-content :inherit message-header-other)
|
||
(gnus-header-subject :inherit message-header-subject)
|
||
(gnus-header-from :foreground base09 :weight bold :inherit message-header-other-face)
|
||
(gnus-header-name :inherit message-header-name)
|
||
(gnus-button :foreground unspecified :inherit link)
|
||
(gnus-signature :inherit font-lock-comment-face)
|
||
|
||
(gnus-summary-normal-unread :foreground base0D :weight normal)
|
||
(gnus-summary-normal-read :foreground base06 :weight normal)
|
||
(gnus-summary-normal-ancient :foreground base0C :weight normal)
|
||
(gnus-summary-normal-ticked :foreground base09 :weight normal)
|
||
(gnus-summary-low-unread :foreground base04 :weight normal)
|
||
(gnus-summary-low-read :foreground base04 :weight normal)
|
||
(gnus-summary-low-ancient :foreground base04 :weight normal)
|
||
(gnus-summary-high-unread :foreground base0A :weight normal)
|
||
(gnus-summary-high-read :foreground base0B :weight normal)
|
||
(gnus-summary-high-ancient :foreground base0B :weight normal)
|
||
(gnus-summary-high-ticked :foreground base09 :weight normal)
|
||
(gnus-summary-cancelled :foreground base08 :background unspecified :weight normal)
|
||
|
||
(gnus-group-mail-low :foreground base04)
|
||
(gnus-group-mail-low-empty :foreground base04)
|
||
(gnus-group-mail-1 :foreground unspecified :weight normal :inherit outline-1)
|
||
(gnus-group-mail-2 :foreground unspecified :weight normal :inherit outline-2)
|
||
(gnus-group-mail-3 :foreground unspecified :weight normal :inherit outline-3)
|
||
(gnus-group-mail-4 :foreground unspecified :weight normal :inherit outline-4)
|
||
(gnus-group-mail-5 :foreground unspecified :weight normal :inherit outline-5)
|
||
(gnus-group-mail-6 :foreground unspecified :weight normal :inherit outline-6)
|
||
(gnus-group-mail-1-empty :foreground base04 :inherit gnus-group-mail-1)
|
||
(gnus-group-mail-2-empty :foreground base04 :inherit gnus-group-mail-2)
|
||
(gnus-group-mail-3-empty :foreground base04 :inherit gnus-group-mail-3)
|
||
(gnus-group-mail-4-empty :foreground base04 :inherit gnus-group-mail-4)
|
||
(gnus-group-mail-5-empty :foreground base04 :inherit gnus-group-mail-5)
|
||
(gnus-group-mail-6-empty :foreground base04 :inherit gnus-group-mail-6)
|
||
(gnus-group-news-1 :foreground unspecified :weight normal :inherit outline-5)
|
||
(gnus-group-news-2 :foreground unspecified :weight normal :inherit outline-6)
|
||
(gnus-group-news-3 :foreground unspecified :weight normal :inherit outline-7)
|
||
(gnus-group-news-4 :foreground unspecified :weight normal :inherit outline-8)
|
||
(gnus-group-news-5 :foreground unspecified :weight normal :inherit outline-1)
|
||
(gnus-group-news-6 :foreground unspecified :weight normal :inherit outline-2)
|
||
(gnus-group-news-1-empty :foreground base04 :inherit gnus-group-news-1)
|
||
(gnus-group-news-2-empty :foreground base04 :inherit gnus-group-news-2)
|
||
(gnus-group-news-3-empty :foreground base04 :inherit gnus-group-news-3)
|
||
(gnus-group-news-4-empty :foreground base04 :inherit gnus-group-news-4)
|
||
(gnus-group-news-5-empty :foreground base04 :inherit gnus-group-news-5)
|
||
(gnus-group-news-6-empty :foreground base04 :inherit gnus-group-news-6)
|
||
|
||
;;;; go-guru
|
||
(go-guru-hl-identifier-face :background base02)
|
||
|
||
;;;; grep
|
||
(grep-context-face :foreground base04)
|
||
(grep-error-face :foreground base08 :weight bold :underline t)
|
||
(grep-hit-face :foreground base0D)
|
||
(grep-match-face :foreground unspecified :background unspecified :inherit match)
|
||
|
||
;;;; helm
|
||
(helm-M-x-key :foreground base0C)
|
||
(helm-action :foreground base05)
|
||
(helm-buffer-directory :foreground base04 :background unspecified :weight bold)
|
||
(helm-buffer-file :foreground base0C)
|
||
(helm-buffer-not-saved :foreground base08)
|
||
(helm-buffer-process :foreground base03)
|
||
(helm-buffer-saved-out :foreground base0F)
|
||
(helm-buffer-size :foreground base09)
|
||
(helm-candidate-number :foreground base00 :background base09)
|
||
(helm-ff-directory :inherit dired-directory)
|
||
(helm-ff-dotted-directory :inherit dired-ignored)
|
||
(helm-ff-executable :foreground base0B)
|
||
(helm-ff-file :inherit default)
|
||
(helm-ff-invalid-symlink :inherit dired-warning)
|
||
(helm-ff-prefix :foreground unspecified :background unspecified)
|
||
(helm-ff-symlink :inherit dired-symlink)
|
||
(helm-ff-suid :foreground base08)
|
||
(helm-ff-dotted-symlink-directory :foreground base09 :background base03)
|
||
(helm-ff-denied :foreground base08 :background base03)
|
||
; (helm-ff-truename) ;; already inherited
|
||
; (helm-ff-dirs) ;; already inherited
|
||
(helm-ff-socket :foreground base0E)
|
||
(helm-ff-pipe :foreground base0A :background base03)
|
||
(helm-ff-file-extension :foreground base03)
|
||
(helm-ff-backup-file :inherit dired-ignored)
|
||
|
||
(helm-grep-cmd-line :foreground base0B)
|
||
(helm-grep-file :foreground base0C)
|
||
(helm-grep-finish :foreground base00 :background base09)
|
||
(helm-grep-lineno :foreground base03)
|
||
(helm-grep-match :foreground base0A)
|
||
(helm-grep-running :foreground base09)
|
||
(helm-header :foreground base0A :background base00 :underline nil)
|
||
(helm-match :foreground base0A)
|
||
(helm-moccur-buffer :foreground base0C)
|
||
(helm-selection :foreground unspecified :background base02 :underline nil)
|
||
(helm-selection-line :foreground unspecified :background base02)
|
||
(helm-separator :foreground base02)
|
||
(helm-source-header :foreground base05 :background base01 :weight bold)
|
||
(helm-visible-mark :foreground base00 :background base0B)
|
||
|
||
;;;; highlight-indentation minor mode
|
||
(highlight-indentation-face :background base01)
|
||
|
||
;;;; highlight-thing mode
|
||
(highlight-thing :inherit highlight)
|
||
|
||
;;;; hl-line-mode
|
||
(hl-line :background base01)
|
||
(col-highlight :background base01)
|
||
|
||
;;;; hl-sexp-mode
|
||
(hl-sexp-face :background base03)
|
||
|
||
;;;; hydra
|
||
(hydra-face-red :foreground base09)
|
||
(hydra-face-blue :foreground base0D)
|
||
|
||
;;;; ido-mode
|
||
(ido-subdir :foreground base04)
|
||
(ido-first-match :foreground base09 :weight bold)
|
||
(ido-only-match :foreground base08 :weight bold)
|
||
(ido-indicator :foreground base08 :background base01)
|
||
(ido-virtual :foreground base04)
|
||
|
||
;;;; idris-mode
|
||
(idris-semantic-bound-face :inherit font-lock-variable-name-face)
|
||
(idris-semantic-data-face :inherit font-lock-string-face)
|
||
(idris-semantic-function-face :inherit font-lock-function-name-face)
|
||
(idris-semantic-namespace-face nil)
|
||
(idris-semantic-postulate-face :inherit font-lock-builtin-face)
|
||
(idris-semantic-type-face :inherit font-lock-type-face)
|
||
(idris-active-term-face :inherit highlight)
|
||
(idris-colon-face :inherit font-lock-keyword-face)
|
||
(idris-equals-face :inherit font-lock-keyword-face)
|
||
(idris-operator-face :inherit font-lock-keyword-face)
|
||
|
||
;;;; imenu-list
|
||
(imenu-list-entry-face-0 :foreground base0A)
|
||
(imenu-list-entry-face-1 :foreground base0B)
|
||
(imenu-list-entry-face-2 :foreground base0D)
|
||
(imenu-list-entry-face-3 :foreground base0F)
|
||
|
||
;;;; ivy-mode
|
||
(ivy-current-match :foreground base09 :background base01)
|
||
(ivy-minibuffer-match-face-1 :foreground base0E)
|
||
(ivy-minibuffer-match-face-2 :foreground base0D)
|
||
(ivy-minibuffer-match-face-3 :foreground base0C)
|
||
(ivy-minibuffer-match-face-4 :foreground base0B)
|
||
(ivy-confirm-face :foreground base0B)
|
||
(ivy-match-required-face :foreground base08)
|
||
(ivy-virtual :foreground base04)
|
||
(ivy-action :foreground base0D)
|
||
|
||
;;;; jabber
|
||
(jabber-chat-prompt-local :foreground base0A)
|
||
(jabber-chat-prompt-foreign :foreground base09)
|
||
(jabber-chat-prompt-system :foreground base0A :weight bold)
|
||
(jabber-chat-text-local :foreground base0A)
|
||
(jabber-chat-text-foreign :foreground base09)
|
||
(jabber-chat-text-error :foreground base08)
|
||
|
||
(jabber-roster-user-online :foreground base0B)
|
||
(jabber-roster-user-xa :foreground base04)
|
||
(jabber-roster-user-dnd :foreground base0A)
|
||
(jabber-roster-user-away :foreground base09)
|
||
(jabber-roster-user-chatty :foreground base0E)
|
||
(jabber-roster-user-error :foreground base08)
|
||
(jabber-roster-user-offline :foreground base04)
|
||
|
||
(jabber-rare-time-face :foreground base04)
|
||
(jabber-activity-face :foreground base0E)
|
||
(jabber-activity-personal-face :foreground base0C)
|
||
|
||
;;;; js2-mode
|
||
(js2-warning-face :underline base09)
|
||
(js2-error-face :foreground unspecified :underline base08)
|
||
(js2-external-variable-face :foreground base0E)
|
||
(js2-function-param-face :foreground base0D)
|
||
(js2-instance-member-face :foreground base0D)
|
||
(js2-private-function-call-face :foreground base08)
|
||
|
||
;;;; js3-mode
|
||
(js3-warning-face :underline base09)
|
||
(js3-error-face :foreground unspecified :underline base08)
|
||
(js3-external-variable-face :foreground base0E)
|
||
(js3-function-param-face :foreground base0D)
|
||
(js3-jsdoc-tag-face :foreground base09)
|
||
(js3-jsdoc-type-face :foreground base0C)
|
||
(js3-jsdoc-value-face :foreground base0A)
|
||
(js3-jsdoc-html-tag-name-face :foreground base0D)
|
||
(js3-jsdoc-html-tag-delimiter-face :foreground base0B)
|
||
(js3-instance-member-face :foreground base0D)
|
||
(js3-private-function-call-face :foreground base08)
|
||
|
||
;;;; linum-mode
|
||
(linum :foreground base03 :background base16-settings-fringe-bg)
|
||
|
||
;;;; lsp-ui-doc
|
||
(lsp-ui-doc-header :inherit org-document-title)
|
||
(lsp-ui-doc-background :background base01)
|
||
|
||
;;;; lui-mode
|
||
(lui-button-face :foreground base0D)
|
||
(lui-highlight-face :background base01)
|
||
(lui-time-stamp-face :foreground base0C)
|
||
|
||
;;;; magit
|
||
(magit-blame-culprit :background base01)
|
||
(magit-blame-heading :background base01 :foreground base05)
|
||
(magit-branch :foreground base04 :weight bold)
|
||
(magit-branch-current :foreground base0C :weight bold :box t)
|
||
(magit-branch-local :foreground base0C :weight bold)
|
||
(magit-branch-remote :foreground base0B :weight bold)
|
||
(magit-cherry-equivalent :foreground base0E)
|
||
(magit-cherry-unmatched :foreground base0C)
|
||
(magit-diff-context-highlight :background base01 :foreground base05)
|
||
(magit-diff-file-header :background base01 :foreground base05)
|
||
(magit-hash :foreground base0D)
|
||
(magit-header-line :background base02 :foreground base05 :weight bold)
|
||
(magit-hunk-heading :background base03)
|
||
(magit-hunk-heading-highlight :background base03)
|
||
(magit-diff-hunk-heading :background base01)
|
||
(magit-diff-hunk-heading-highlight :background base02)
|
||
(magit-item-highlight :background base01)
|
||
(magit-log-author :foreground base0D)
|
||
(magit-process-ng :foreground base08 :inherit magit-section-heading)
|
||
(magit-process-ok :foreground base0B :inherit magit-section-heading)
|
||
(magit-reflog-amend :foreground base0E)
|
||
(magit-reflog-checkout :foreground base0D)
|
||
(magit-reflog-cherry-pick :foreground base0B)
|
||
(magit-reflog-commit :foreground base0B)
|
||
(magit-reflog-merge :foreground base0B)
|
||
(magit-reflog-other :foreground base0C)
|
||
(magit-reflog-rebase :foreground base0E)
|
||
(magit-reflog-remote :foreground base0C)
|
||
(magit-reflog-reset :foreground base08)
|
||
(magit-section-highlight :background base01)
|
||
(magit-signature-bad :foreground base08 :weight bold)
|
||
(magit-signature-error :foreground base08)
|
||
(magit-signature-expired :foreground base09)
|
||
(magit-signature-good :foreground base0B)
|
||
(magit-signature-revoked :foreground base0E)
|
||
(magit-signature-untrusted :foreground base0C)
|
||
(magit-tag :foreground base05)
|
||
;;;; mark-multiple
|
||
(mm/master-face :foreground unspecified :background unspecified :inherit region)
|
||
(mm/mirror-face :foreground unspecified :background unspecified :inherit region)
|
||
|
||
;;;; markdown-mode
|
||
(markdown-url-face :inherit link)
|
||
(markdown-link-face :foreground base0D :underline t)
|
||
|
||
;;;; message-mode
|
||
(message-header-other :foreground unspecified :background unspecified :weight normal)
|
||
(message-header-subject :foreground base0A :weight bold :inherit message-header-other)
|
||
(message-header-to :foreground base09 :weight bold :inherit message-header-other)
|
||
(message-header-cc :foreground unspecified :inherit message-header-to)
|
||
(message-header-name :foreground base0D :background unspecified)
|
||
(message-header-newsgroups :foreground base0C :background unspecified :slant normal)
|
||
(message-separator :foreground base0E)
|
||
|
||
;;;; mic-paren
|
||
(paren-face-match :foreground unspecified :background unspecified :inherit show-paren-match)
|
||
(paren-face-mismatch :foreground unspecified :background unspecified :inherit show-paren-mismatch)
|
||
(paren-face-no-match :foreground unspecified :background unspecified :inherit show-paren-mismatch)
|
||
|
||
;;;; mmm-mode
|
||
(mmm-code-submode-face :background base03)
|
||
(mmm-comment-submode-face :inherit font-lock-comment-face)
|
||
(mmm-output-submode-face :background base03)
|
||
|
||
;;;; notmuch
|
||
(notmuch-message-summary-face :foreground base04 :background unspecified)
|
||
(notmuch-search-count :foreground base04)
|
||
(notmuch-search-date :foreground base04)
|
||
(notmuch-search-flagged-face :foreground base08)
|
||
(notmuch-search-matching-authors :foreground base0D)
|
||
(notmuch-search-non-matching-authors :foreground base05)
|
||
(notmuch-search-subject :foreground base05)
|
||
(notmuch-search-unread-face :weight bold)
|
||
(notmuch-tag-added :foreground base0B :weight normal)
|
||
(notmuch-tag-deleted :foreground base08 :weight normal)
|
||
(notmuch-tag-face :foreground base0A :weight normal)
|
||
(notmuch-tag-flagged :foreground base0A :weight normal)
|
||
(notmuch-tag-unread :foreground base0A :weight normal)
|
||
(notmuch-tree-match-author-face :foreground base0D :weight bold)
|
||
(notmuch-tree-match-date-face :foreground base04 :weight bold)
|
||
(notmuch-tree-match-face :foreground base05)
|
||
(notmuch-tree-match-subject-face :foreground base05)
|
||
(notmuch-tree-match-tag-face :foreground base0A)
|
||
(notmuch-tree-match-tree-face :foreground base08)
|
||
(notmuch-tree-no-match-author-face :foreground base0D)
|
||
(notmuch-tree-no-match-date-face :foreground base04)
|
||
(notmuch-tree-no-match-face :foreground base04)
|
||
(notmuch-tree-no-match-subject-face :foreground base04)
|
||
(notmuch-tree-no-match-tag-face :foreground base0A)
|
||
(notmuch-tree-no-match-tree-face :foreground base0A)
|
||
(notmuch-wash-cited-text :foreground base04)
|
||
(notmuch-wash-toggle-button :foreground base04)
|
||
|
||
;;;; nxml-mode
|
||
(nxml-name-face :foreground unspecified :inherit font-lock-constant-face)
|
||
(nxml-attribute-local-name-face :foreground unspecified :inherit font-lock-variable-name-face)
|
||
(nxml-ref-face :foreground unspecified :inherit font-lock-preprocessor-face)
|
||
(nxml-delimiter-face :foreground unspecified :inherit font-lock-keyword-face)
|
||
(nxml-delimited-data-face :foreground unspecified :inherit font-lock-string-face)
|
||
(rng-error-face :underline base08)
|
||
|
||
;;;; orderless
|
||
(orderless-match-face-0 :foreground base0E :weight bold)
|
||
(orderless-match-face-1 :foreground base0A :weight bold)
|
||
(orderless-match-face-2 :foreground base0C :weight bold)
|
||
(orderless-match-face-3 :foreground base0D :weight bold)
|
||
|
||
;;;; org-mode
|
||
(org-agenda-structure :foreground base0E)
|
||
(org-agenda-date :foreground base0D :underline nil)
|
||
(org-agenda-done :foreground base0B)
|
||
(org-agenda-dimmed-todo-face :foreground base04)
|
||
(org-block :foreground base05 :background base01)
|
||
(org-block-begin-line :foreground base03 :background base01)
|
||
(org-code :foreground base0A)
|
||
(org-column :background base01)
|
||
(org-column-title :weight bold :underline t :inherit org-column)
|
||
(org-date :foreground base0E :underline t)
|
||
(org-document-info :foreground base0C)
|
||
(org-document-info-keyword :foreground base0B)
|
||
(org-document-title :foreground base09 :weight bold :height 1.44)
|
||
(org-done :foreground base0B :background base01)
|
||
(org-ellipsis :foreground base04)
|
||
(org-footnote :foreground base0C)
|
||
(org-formula :foreground base08)
|
||
(org-hide :foreground base03)
|
||
(org-link :foreground base0D)
|
||
(org-scheduled :foreground base0B)
|
||
(org-scheduled-previously :foreground base09)
|
||
(org-scheduled-today :foreground base0B)
|
||
(org-special-keyword :foreground base09)
|
||
(org-table :foreground base0E)
|
||
(org-todo :foreground base08 :background base01)
|
||
(org-upcoming-deadline :foreground base09)
|
||
(org-verbatim :foreground base0A)
|
||
(org-warning :foreground base08 :weight bold)
|
||
|
||
;;;; paren-face-mode
|
||
(paren-face :foreground base04 :background unspecified)
|
||
|
||
;;;; perspective-mode
|
||
(persp-selected-face :foreground base0C)
|
||
|
||
;;;; popup
|
||
(popup-face :foreground base05 :background base02)
|
||
(popup-isearch-match :foreground base00 :background base0B)
|
||
(popup-scroll-bar-background-face :background base03)
|
||
(popup-scroll-bar-foreground-face :background base05)
|
||
(popup-summary-face :foreground base04)
|
||
(popup-tip-face :foreground base00 :background base0A)
|
||
(popup-menu-mouse-face :foreground base00 :background base0D)
|
||
(popup-menu-selection-face :foreground base00 :background base0C)
|
||
|
||
;;;; powerline
|
||
(powerline-active1 :foreground base09 :background base00)
|
||
(powerline-active2 :foreground base08 :background base01)
|
||
(powerline-inactive1 :foreground base06 :background base01)
|
||
(powerline-inactive2 :foreground base07 :background base02)
|
||
|
||
;;;; python-mode
|
||
(py-builtins-face :foreground base09 :weight normal)
|
||
|
||
;;;; rainbow-delimiters
|
||
(rainbow-delimiters-depth-1-face :foreground base0E)
|
||
(rainbow-delimiters-depth-2-face :foreground base0D)
|
||
(rainbow-delimiters-depth-3-face :foreground base0C)
|
||
(rainbow-delimiters-depth-4-face :foreground base0B)
|
||
(rainbow-delimiters-depth-5-face :foreground base0A)
|
||
(rainbow-delimiters-depth-6-face :foreground base09)
|
||
(rainbow-delimiters-depth-7-face :foreground base08)
|
||
(rainbow-delimiters-depth-8-face :foreground base03)
|
||
(rainbow-delimiters-depth-9-face :foreground base05)
|
||
|
||
;;;; regex-tool
|
||
(regex-tool-matched-face :foreground unspecified :background unspecified :inherit match)
|
||
|
||
;;;; rhtml-mode
|
||
(erb-delim-face :background base03)
|
||
(erb-exec-face :background base03 :weight bold)
|
||
(erb-exec-delim-face :background base03)
|
||
(erb-out-face :background base03 :weight bold)
|
||
(erb-out-delim-face :background base03)
|
||
(erb-comment-face :background base03 :weight bold :slant italic)
|
||
(erb-comment-delim-face :background base03)
|
||
|
||
;;;; sh-mode
|
||
(sh-heredoc :foreground unspecified :weight normal :inherit font-lock-string-face)
|
||
(sh-quoted-exec :foreground unspecified :inherit font-lock-preprocessor-face)
|
||
|
||
;;;; show-paren-mode
|
||
(show-paren-match :foreground base01 :background base0D)
|
||
(show-paren-mismatch :foreground base01 :background base09)
|
||
|
||
;;;; slime-mode
|
||
(slime-highlight-edits-face :weight bold)
|
||
(slime-repl-input-face :weight normal :underline nil)
|
||
(slime-repl-prompt-face :foreground base0E :underline nil :weight bold)
|
||
(slime-repl-result-face :foreground base0B)
|
||
(slime-repl-output-face :foreground base0D :background base01)
|
||
|
||
;;;; smart-mode-line
|
||
(sml/charging :inherit sml/global :foreground base0B)
|
||
(sml/discharging :inherit sml/global :foreground base08)
|
||
(sml/filename :inherit sml/global :foreground base0A :weight bold)
|
||
(sml/global :foreground base16-settings-mode-line-fg)
|
||
(sml/modes :inherit sml/global :foreground base07)
|
||
(sml/modified :inherit sml/not-modified :foreground base08 :weight bold)
|
||
(sml/outside-modified :inherit sml/not-modified :background base08)
|
||
(sml/prefix :inherit sml/global :foreground base09)
|
||
(sml/read-only :inherit sml/not-modified :foreground base0C)
|
||
|
||
;;;; spaceline
|
||
(spaceline-evil-emacs :foreground base01 :background base0D)
|
||
(spaceline-evil-insert :foreground base01 :background base0D)
|
||
(spaceline-evil-motion :foreground base01 :background base0E)
|
||
(spaceline-evil-normal :foreground base01 :background base0B)
|
||
(spaceline-evil-replace :foreground base01 :background base08)
|
||
(spaceline-evil-visual :foreground base01 :background base09)
|
||
|
||
;;;; spacemacs
|
||
(spacemacs-emacs-face :foreground base01 :background base0D)
|
||
(spacemacs-hybrid-face :foreground base01 :background base0D)
|
||
(spacemacs-insert-face :foreground base01 :background base0C)
|
||
(spacemacs-motion-face :foreground base01 :background base0E)
|
||
(spacemacs-lisp-face :foreground base01 :background base0E)
|
||
(spacemacs-normal-face :foreground base01 :background base0B)
|
||
(spacemacs-replace-face :foreground base01 :background base08)
|
||
(spacemacs-visual-face :foreground base01 :background base09)
|
||
|
||
;;;; structured-haskell-mode
|
||
(shm-current-face :inherit region)
|
||
(shm-quarantine-face :underline (:style wave :color base08))
|
||
|
||
;; telephone-line
|
||
(telephone-line-accent-active :foreground base00 :background base05)
|
||
(telephone-line-accent-inactive :foreground base01 :background base03)
|
||
(telephone-line-evil-normal :foreground base01 :background base0B :weight bold)
|
||
(telephone-line-evil-insert :foreground base01 :background base0D :weight bold)
|
||
(telephone-line-evil-visual :foreground base06 :background base0E :weight bold)
|
||
(telephone-line-evil-replace :foreground base01 :background base08 :weight bold)
|
||
(telephone-line-evil-operator :foreground base0B :background base01 :weight bold)
|
||
(telephone-line-evil-motion :foreground base00 :background base0C :weight bold)
|
||
(telephone-line-evil-emacs :foreground base07 :background base0E :weight bold)
|
||
(telephone-line-warning :foreground base09 :weight bold)
|
||
(telephone-line-error :foreground base08 :weight bold)
|
||
|
||
;;;; term and ansi-term
|
||
(term :foreground base05 :background base00)
|
||
(term-color-black :foreground base02 :background base00)
|
||
(term-color-white :foreground base05 :background base07)
|
||
(term-color-red :foreground base08 :background base08)
|
||
(term-color-yellow :foreground base0A :background base0A)
|
||
(term-color-green :foreground base0B :background base0B)
|
||
(term-color-cyan :foreground base0C :background base0C)
|
||
(term-color-blue :foreground base0D :background base0D)
|
||
(term-color-magenta :foreground base0E :background base0E)
|
||
|
||
;;;; ansi-colors
|
||
(ansi-color-black :foreground base02 :background base00)
|
||
(ansi-color-white :foreground base05 :background base07)
|
||
(ansi-color-red :foreground base08 :background base08)
|
||
(ansi-color-yellow :foreground base0A :background base0A)
|
||
(ansi-color-green :foreground base0B :background base0B)
|
||
(ansi-color-cyan :foreground base0C :background base0C)
|
||
(ansi-color-blue :foreground base0D :background base0D)
|
||
(ansi-color-magenta :foreground base0E :background base0E)
|
||
|
||
;;;; tooltip
|
||
(tooltip :background base01 :inherit default)
|
||
|
||
;;;; tuareg-mode
|
||
(tuareg-font-lock-governing-face :weight bold :inherit font-lock-keyword-face)
|
||
|
||
;;;; undo-tree-mode
|
||
(undo-tree-visualizer-default-face :foreground base06)
|
||
(undo-tree-visualizer-current-face :foreground base0B :weight bold)
|
||
(undo-tree-visualizer-active-branch-face :foreground base08)
|
||
(undo-tree-visualizer-register-face :foreground base0A)
|
||
|
||
;;;; utop-mode
|
||
(utop-prompt :foreground base0E)
|
||
(utop-error :underline (:style wave :color base08) :inherit error)
|
||
|
||
;;;; w3m-mode
|
||
(w3m-anchor :underline nil :inherit link)
|
||
(w3m-anchor-visited :underline nil :inherit link-visited)
|
||
(w3m-form :foreground base09 :underline t)
|
||
(w3m-image :foreground base05 :background base03)
|
||
(w3m-image-anchor :foreground base05 :background base03 :underline t)
|
||
(w3m-header-line-location-content :foreground base0D :background base00)
|
||
(w3m-header-line-location-title :foreground base0D :background base00)
|
||
(w3m-tab-background :foreground base05 :background base01)
|
||
(w3m-tab-selected :foreground base05 :background base00)
|
||
(w3m-tab-selected-retrieving :foreground base05 :background base00)
|
||
(w3m-tab-unselected :foreground base03 :background base01)
|
||
(w3m-tab-unselected-unseen :foreground base03 :background base01)
|
||
(w3m-tab-unselected-retrieving :foreground base03 :background base01)
|
||
|
||
;;;; web-mode
|
||
(web-mode-doctype-face :inherit font-lock-doc-face)
|
||
(web-mode-html-attr-name-face :inherit font-lock-variable-name-face)
|
||
(web-mode-html-tag-bracket-face :inherit default)
|
||
(web-mode-html-tag-face :inherit font-lock-function-name-face)
|
||
|
||
;;;; which-func-mode
|
||
(which-func :foreground base0D :background unspecified :weight bold)
|
||
|
||
;;;; whitespace-mode
|
||
(whitespace-empty :foreground base08 :background base0A)
|
||
(whitespace-hspace :foreground base04 :background base04)
|
||
(whitespace-indentation :foreground base08 :background base0A)
|
||
(whitespace-line :foreground base0F :background base01)
|
||
(whitespace-newline :foreground base04)
|
||
(whitespace-space :foreground base03 :background base01)
|
||
(whitespace-space-after-tab :foreground base08 :background base0A)
|
||
(whitespace-space-before-tab :foreground base08 :background base09)
|
||
(whitespace-tab :foreground base03 :background base01)
|
||
(whitespace-trailing :foreground base0A :background base08)))
|
||
|
||
;; Anything leftover that doesn't fall neatly into a face goes here.
|
||
(let ((base00 (plist-get theme-colors :base00))
|
||
(base01 (plist-get theme-colors :base01))
|
||
(base02 (plist-get theme-colors :base02))
|
||
(base03 (plist-get theme-colors :base03))
|
||
(base04 (plist-get theme-colors :base04))
|
||
(base05 (plist-get theme-colors :base05))
|
||
(base06 (plist-get theme-colors :base06))
|
||
(base07 (plist-get theme-colors :base07))
|
||
(base08 (plist-get theme-colors :base08))
|
||
(base09 (plist-get theme-colors :base09))
|
||
(base0A (plist-get theme-colors :base0A))
|
||
(base0B (plist-get theme-colors :base0B))
|
||
(base0C (plist-get theme-colors :base0C))
|
||
(base0D (plist-get theme-colors :base0D))
|
||
(base0E (plist-get theme-colors :base0E))
|
||
(base0F (plist-get theme-colors :base0F)))
|
||
(custom-theme-set-variables
|
||
theme-name
|
||
`(ansi-color-names-vector
|
||
;; black, base08, base0B, base0A, base0D, magenta, cyan, white
|
||
[,base00 ,base08 ,base0B ,base0A ,base0D ,base0E ,base0D ,base05]))
|
||
|
||
;; Emacs 24.3 changed ’ansi-term-color-vector’ from a vector of colors
|
||
;; to a vector of faces.
|
||
(when (version< emacs-version "24.3")
|
||
(custom-theme-set-variables
|
||
theme-name
|
||
`(ansi-term-color-vector
|
||
;; black, base08, base0B, base0A, base0D, magenta, cyan, white
|
||
[unspecified ,base00 ,base08 ,base0B ,base0A ,base0D ,base0E ,base0D ,base05])))))
|
||
|
||
;;;###autoload
|
||
(and load-file-name
|
||
(boundp 'custom-theme-load-path)
|
||
(add-to-list 'custom-theme-load-path
|
||
(file-name-as-directory
|
||
(file-name-directory load-file-name))))
|
||
|
||
(provide 'base16-theme)
|
||
|
||
;;; base16-theme.el ends here
|