;;; dupre-faces.el --- Face definitions for dupre-theme -*- lexical-binding: t -*-

;; Author: Craig Jennings <c@cjennings.net>

;;; Commentary:

;; Face definitions for dupre-theme, following the 60-30-10 color rule:
;; - 60% Neutrals (bg, grays, fg) - the canvas
;; - 30% Signature blue (#67809c) - theme character
;; - 10% Accents (gold, green, terracotta) - semantic meaning only

;;; Code:

(require 'dupre-palette)

(defun dupre-theme-set-faces ()
  "Set all faces for dupre-theme."
  (dupre-with-colors
    (custom-theme-set-faces
     'dupre

;;;;; Base/abstract faces (for inheritance)
     `(dupre-accent ((t (:foreground ,yellow))))
     `(dupre-err ((t (:foreground ,intense-red))))
     `(dupre-warning ((t (:foreground ,yellow+1))))
     `(dupre-success ((t (:foreground ,green))))
     `(dupre-info ((t (:foreground ,blue))))
     ;; Headings: only level 1 gets gold, rest use blue or neutrals
     `(dupre-heading-1 ((t (:foreground ,yellow :weight bold :height 1.2))))
     `(dupre-heading-2 ((t (:foreground ,blue :weight bold :height 1.1))))
     `(dupre-heading-3 ((t (:foreground ,gray+2 :weight bold))))
     `(dupre-heading-4 ((t (:foreground ,gray+1 :weight bold))))

;;;;; Core Emacs faces
     `(default ((t (:foreground ,fg :background ,bg))))
     `(cursor ((t (:background ,fg))))
     `(hl-line ((t (:background ,bg+0))))
     `(region ((t (:background ,bg+2))))
     `(secondary-selection ((t (:background ,bg+1))))
     `(fringe ((t (:foreground ,gray-2 :background ,bg+1))))
     `(vertical-border ((t (:foreground ,bg+2))))
     `(window-divider ((t (:foreground ,bg+2))))
     `(window-divider-first-pixel ((t (:foreground ,bg+1))))
     `(window-divider-last-pixel ((t (:foreground ,bg+1))))
     `(minibuffer-prompt ((t (:foreground ,blue :weight bold))))
     `(highlight ((t (:background ,bg+2))))
     `(shadow ((t (:foreground ,gray))))
     `(success ((t (:foreground ,green :weight bold))))
     `(warning ((t (:foreground ,yellow+1 :weight bold))))
     `(error ((t (:foreground ,intense-red :weight bold))))
     `(link ((t (:foreground ,blue :underline t))))
     `(link-visited ((t (:foreground ,gray+1 :underline t))))
     `(button ((t (:foreground ,blue :underline t))))
     `(escape-glyph ((t (:foreground ,gray+1))))
     `(homoglyph ((t (:foreground ,gray+1))))
     `(nobreak-space ((t (:foreground ,gray+1 :underline t))))
     `(nobreak-hyphen ((t (:foreground ,gray+1))))
     `(trailing-whitespace ((t (:background ,red-2))))

;;;;; Mode line
     `(mode-line ((t (:foreground ,gray+2 :background ,bg+2
                                  :box (:line-width -1 :style released-button)))))
     `(mode-line-inactive ((t (:foreground ,gray :background ,bg+1
                                           :box (:line-width -1 :style released-button)))))
     `(mode-line-buffer-id ((t (:foreground ,blue :weight bold))))
     `(mode-line-emphasis ((t (:foreground ,fg :weight bold))))
     `(mode-line-highlight ((t (:box (:line-width 2 :color ,gray+1)))))

;;;;; Header line
     `(header-line ((t (:foreground ,fg :background ,bg+1
                                    :box (:line-width -1 :color ,bg+2)))))
     `(header-line-highlight ((t (:foreground ,blue))))

;;;;; Tab line (Emacs 27+)
     `(tab-line ((t (:inherit mode-line :background ,bg+1
                              :box (:line-width 4 :color ,bg+1)))))
     `(tab-line-tab ((t (:inherit tab-line))))
     `(tab-line-tab-inactive ((t (:inherit tab-line :foreground ,gray))))
     `(tab-line-tab-current ((t (:background ,bg+2 :foreground ,fg :weight bold))))
     `(tab-line-highlight ((t (:background ,bg+1 :foreground ,fg))))
     `(tab-line-close-highlight ((t (:foreground ,intense-red))))

;;;;; Tab bar (Emacs 27+)
     `(tab-bar ((t (:background ,bg+1 :foreground ,gray))))
     `(tab-bar-tab ((t (:background ,bg+2 :foreground ,fg :weight bold))))
     `(tab-bar-tab-inactive ((t (:background ,bg+1 :foreground ,gray))))

;;;;; Line numbers (Emacs 26+)
     `(line-number ((t (:foreground ,gray-1 :background ,bg+1))))
     `(line-number-current-line ((t (:foreground ,yellow :background ,bg+1 :weight bold))))
     `(line-number-major-tick ((t (:foreground ,gray+1 :background ,bg+1 :weight bold))))
     `(line-number-minor-tick ((t (:foreground ,gray :background ,bg+1))))

;;;;; Font-lock faces - CORE SYNTAX (30% blue for keywords, 10% accents for semantics)
     `(font-lock-builtin-face ((t (:foreground ,blue))))
     `(font-lock-comment-face ((t (:foreground ,gray :slant italic))))
     `(font-lock-comment-delimiter-face ((t (:foreground ,gray-1))))
     `(font-lock-doc-face ((t (:foreground ,gray))))
     `(font-lock-constant-face ((t (:foreground ,gray+2 :weight bold))))
     `(font-lock-function-name-face ((t (:foreground ,red-1))))  ; terracotta
     `(font-lock-keyword-face ((t (:foreground ,blue :weight bold))))
     `(font-lock-negation-char-face ((t (:foreground ,gray+1 :weight bold))))
     `(font-lock-preprocessor-face ((t (:foreground ,gray+1 :slant italic))))
     `(font-lock-regexp-grouping-construct ((t (:foreground ,gray+1 :weight bold))))
     `(font-lock-regexp-grouping-backslash ((t (:foreground ,gray+1 :weight bold))))
     `(font-lock-string-face ((t (:foreground ,green))))
     `(font-lock-type-face ((t (:foreground ,gray+2))))
     `(font-lock-variable-name-face ((t (:foreground ,fg))))
     `(font-lock-warning-face ((t (:foreground ,intense-red :weight bold))))
     ;; Emacs 29+ faces
     `(font-lock-bracket-face ((t (:foreground ,gray+1))))
     `(font-lock-delimiter-face ((t (:foreground ,gray+1))))
     `(font-lock-escape-face ((t (:foreground ,gray+1))))
     `(font-lock-misc-punctuation-face ((t (:foreground ,gray+1))))
     `(font-lock-number-face ((t (:foreground ,gray+2))))
     `(font-lock-operator-face ((t (:foreground ,gray+1))))
     `(font-lock-property-name-face ((t (:foreground ,fg))))
     `(font-lock-property-use-face ((t (:foreground ,fg))))
     `(font-lock-punctuation-face ((t (:foreground ,gray+1))))
     `(font-lock-variable-use-face ((t (:foreground ,fg))))

;;;;; Show-paren
     `(show-paren-match ((t (:foreground ,fg :background ,green-2 :weight bold))))
     `(show-paren-mismatch ((t (:foreground ,fg :background ,intense-red :weight bold))))
     `(show-paren-match-expression ((t (:background ,bg+1))))

;;;;; Search and replace
     `(isearch ((t (:foreground ,fg :background ,green-2 :weight bold))))
     `(isearch-fail ((t (:foreground ,fg :background ,red-2 :weight bold))))
     `(lazy-highlight ((t (:foreground ,bg :background ,yellow :weight bold))))
     `(isearch-group-1 ((t (:foreground ,fg :background ,blue))))
     `(isearch-group-2 ((t (:foreground ,fg :background ,green-1))))
     `(match ((t (:foreground ,fg :background ,green-2 :weight bold))))
     `(query-replace ((t (:inherit isearch))))

;;;;; Diff mode
     `(diff-added ((t (:foreground ,green :background ,green-2))))
     `(diff-removed ((t (:foreground ,red :background ,red-3))))
     `(diff-changed ((t (:foreground ,yellow :background ,yellow-2))))
     `(diff-refine-added ((t (:foreground ,fg :background ,green-1 :weight bold))))
     `(diff-refine-removed ((t (:foreground ,fg :background ,red-2 :weight bold))))
     `(diff-refine-changed ((t (:foreground ,fg :background ,yellow-1 :weight bold))))
     `(diff-header ((t (:foreground ,fg :background ,bg+2))))
     `(diff-file-header ((t (:foreground ,blue :background ,bg+2 :weight bold))))
     `(diff-hunk-header ((t (:foreground ,gray+1 :background ,bg+1))))
     `(diff-index ((t (:foreground ,gray))))
     `(diff-indicator-added ((t (:foreground ,green :weight bold))))
     `(diff-indicator-removed ((t (:foreground ,red :weight bold))))
     `(diff-indicator-changed ((t (:foreground ,yellow :weight bold))))
     `(diff-context ((t (:foreground ,gray))))
     `(diff-nonexistent ((t (:foreground ,gray-1 :slant italic))))

;;;;; Ediff
     `(ediff-current-diff-A ((t (:background ,red-3))))
     `(ediff-current-diff-B ((t (:background ,green-2))))
     `(ediff-current-diff-C ((t (:background ,yellow-2))))
     `(ediff-current-diff-Ancestor ((t (:background ,bg+2))))
     `(ediff-fine-diff-A ((t (:foreground ,fg :background ,red-2 :weight bold))))
     `(ediff-fine-diff-B ((t (:foreground ,fg :background ,green-1 :weight bold))))
     `(ediff-fine-diff-C ((t (:foreground ,fg :background ,yellow-1 :weight bold))))
     `(ediff-fine-diff-Ancestor ((t (:foreground ,fg :background ,bg+2 :weight bold))))
     `(ediff-even-diff-A ((t (:background ,bg+1))))
     `(ediff-even-diff-B ((t (:background ,bg+1))))
     `(ediff-even-diff-C ((t (:background ,bg+1))))
     `(ediff-even-diff-Ancestor ((t (:background ,bg+1))))
     `(ediff-odd-diff-A ((t (:background ,bg+1))))
     `(ediff-odd-diff-B ((t (:background ,bg+1))))
     `(ediff-odd-diff-C ((t (:background ,bg+1))))
     `(ediff-odd-diff-Ancestor ((t (:background ,bg+1))))

;;;;; Org-mode - Gold for level 1 only, blue for level 2, then neutrals
     `(org-level-1 ((t (:inherit dupre-heading-1))))
     `(org-level-2 ((t (:inherit dupre-heading-2))))
     `(org-level-3 ((t (:inherit dupre-heading-3))))
     `(org-level-4 ((t (:inherit dupre-heading-4))))
     `(org-level-5 ((t (:foreground ,gray+1))))
     `(org-level-6 ((t (:foreground ,gray+1))))
     `(org-level-7 ((t (:foreground ,gray))))
     `(org-level-8 ((t (:foreground ,gray))))
     `(org-todo ((t (:foreground ,intense-red :weight bold))))
     `(org-done ((t (:foreground ,green :weight bold))))
     `(org-headline-done ((t (:foreground ,gray))))
     `(org-headline-todo ((t (:foreground ,fg))))
     `(org-date ((t (:foreground ,gray :underline t))))
     `(org-link ((t (:foreground ,blue :underline t))))
     `(org-code ((t (:foreground ,green :background ,bg+1))))
     `(org-verbatim ((t (:foreground ,gray+1 :background ,bg+1))))
     `(org-block ((t (:background ,bg+0 :extend t))))
     `(org-block-begin-line ((t (:foreground ,gray :background ,bg+1 :extend t))))
     `(org-block-end-line ((t (:foreground ,gray :background ,bg+1 :extend t))))
     `(org-meta-line ((t (:foreground ,gray))))
     `(org-document-title ((t (:foreground ,yellow :weight bold :height 1.4))))
     `(org-document-info ((t (:foreground ,gray+1))))
     `(org-document-info-keyword ((t (:foreground ,gray))))
     `(org-tag ((t (:foreground ,gray))))
     `(org-checkbox ((t (:foreground ,blue :weight bold))))
     `(org-checkbox-statistics-todo ((t (:foreground ,gray+1))))
     `(org-checkbox-statistics-done ((t (:foreground ,green))))
     `(org-table ((t (:foreground ,gray+1))))
     `(org-formula ((t (:foreground ,gray+1))))
     `(org-special-keyword ((t (:foreground ,gray))))
     `(org-drawer ((t (:foreground ,gray))))
     `(org-property-value ((t (:foreground ,gray))))
     `(org-priority ((t (:foreground ,yellow :weight bold))))
     `(org-scheduled ((t (:foreground ,fg))))
     `(org-scheduled-today ((t (:foreground ,fg :weight bold))))
     `(org-scheduled-previously ((t (:foreground ,gray+1))))
     `(org-upcoming-deadline ((t (:foreground ,yellow+1))))
     `(org-warning ((t (:foreground ,intense-red :weight bold))))
     `(org-agenda-structure ((t (:foreground ,blue :weight bold))))
     `(org-agenda-date ((t (:foreground ,fg))))
     `(org-agenda-date-today ((t (:foreground ,yellow :weight bold))))
     `(org-agenda-date-weekend ((t (:foreground ,gray))))
     `(org-agenda-done ((t (:foreground ,green))))
     `(org-time-grid ((t (:foreground ,gray))))
     `(org-ellipsis ((t (:foreground ,gray :underline nil))))

;;;;; Magit
     `(magit-section-heading ((t (:foreground ,blue :weight bold))))
     `(magit-section-highlight ((t (:background ,bg+1))))
     `(magit-section-heading-selection ((t (:foreground ,yellow))))
     `(magit-branch-local ((t (:foreground ,blue))))
     `(magit-branch-remote ((t (:foreground ,green))))
     `(magit-branch-remote-head ((t (:foreground ,green :weight bold))))
     `(magit-branch-current ((t (:foreground ,blue :weight bold :box (:line-width -1 :color ,blue)))))
     `(magit-branch-upstream ((t (:foreground ,gray+1 :slant italic))))
     `(magit-tag ((t (:foreground ,gray+1))))
     `(magit-hash ((t (:foreground ,gray))))
     `(magit-head ((t (:foreground ,blue :weight bold))))
     `(magit-log-author ((t (:foreground ,gray+1))))
     `(magit-log-date ((t (:foreground ,gray))))
     `(magit-log-graph ((t (:foreground ,gray))))
     `(magit-diff-added ((t (:foreground ,green :background ,green-2))))
     `(magit-diff-added-highlight ((t (:foreground ,green+1 :background ,green-2))))
     `(magit-diff-removed ((t (:foreground ,red :background ,red-3))))
     `(magit-diff-removed-highlight ((t (:foreground ,red+1 :background ,red-3))))
     `(magit-diff-context ((t (:foreground ,gray))))
     `(magit-diff-context-highlight ((t (:foreground ,gray+1 :background ,bg+1))))
     `(magit-diff-hunk-heading ((t (:foreground ,gray+1 :background ,bg+2))))
     `(magit-diff-hunk-heading-highlight ((t (:foreground ,fg :background ,bg+2 :weight bold))))
     `(magit-diff-hunk-heading-selection ((t (:foreground ,yellow :background ,bg+2))))
     `(magit-diff-file-heading ((t (:foreground ,fg :weight bold))))
     `(magit-diff-file-heading-highlight ((t (:foreground ,fg :background ,bg+1 :weight bold))))
     `(magit-diff-file-heading-selection ((t (:foreground ,yellow))))
     `(magit-diff-lines-heading ((t (:foreground ,fg :background ,yellow-2))))
     `(magit-diffstat-added ((t (:foreground ,green))))
     `(magit-diffstat-removed ((t (:foreground ,red))))
     `(magit-dimmed ((t (:foreground ,gray))))
     `(magit-filename ((t (:foreground ,fg))))
     `(magit-header-line ((t (:foreground ,blue :weight bold))))
     `(magit-header-line-key ((t (:foreground ,blue))))
     `(magit-header-line-log-select ((t (:foreground ,fg :weight bold))))
     `(magit-keyword ((t (:foreground ,gray+1))))
     `(magit-keyword-squash ((t (:foreground ,yellow))))
     `(magit-process-ng ((t (:foreground ,intense-red :weight bold))))
     `(magit-process-ok ((t (:foreground ,green :weight bold))))
     `(magit-reflog-amend ((t (:foreground ,gray+1))))
     `(magit-reflog-checkout ((t (:foreground ,blue))))
     `(magit-reflog-cherry-pick ((t (:foreground ,green))))
     `(magit-reflog-commit ((t (:foreground ,green))))
     `(magit-reflog-merge ((t (:foreground ,green))))
     `(magit-reflog-other ((t (:foreground ,gray))))
     `(magit-reflog-rebase ((t (:foreground ,gray+1))))
     `(magit-reflog-remote ((t (:foreground ,gray))))
     `(magit-reflog-reset ((t (:foreground ,red))))
     `(magit-refname ((t (:foreground ,gray))))
     `(magit-sequence-done ((t (:foreground ,gray))))
     `(magit-sequence-drop ((t (:foreground ,red))))
     `(magit-sequence-head ((t (:foreground ,blue))))
     `(magit-sequence-onto ((t (:foreground ,gray))))
     `(magit-sequence-part ((t (:foreground ,gray+1))))
     `(magit-sequence-pick ((t (:foreground ,fg))))
     `(magit-sequence-stop ((t (:foreground ,green))))
     `(magit-signature-bad ((t (:foreground ,intense-red :weight bold))))
     `(magit-signature-error ((t (:foreground ,red))))
     `(magit-signature-expired ((t (:foreground ,gray+1))))
     `(magit-signature-good ((t (:foreground ,green))))
     `(magit-signature-revoked ((t (:foreground ,red))))
     `(magit-signature-untrusted ((t (:foreground ,gray+1))))

;;;;; Transient (used by Magit)
     `(transient-heading ((t (:foreground ,blue :weight bold))))
     `(transient-key ((t (:foreground ,blue))))
     `(transient-argument ((t (:foreground ,green))))
     `(transient-value ((t (:foreground ,gray+1))))
     `(transient-inactive-argument ((t (:foreground ,gray))))
     `(transient-inactive-value ((t (:foreground ,gray))))
     `(transient-unreachable ((t (:foreground ,gray-1))))
     `(transient-unreachable-key ((t (:foreground ,gray-1))))
     `(transient-enabled-suffix ((t (:foreground ,green :weight bold))))
     `(transient-disabled-suffix ((t (:foreground ,red :weight bold))))
     `(transient-separator ((t (:background ,bg+1 :extend t))))

;;;;; Vertico
     `(vertico-current ((t (:background ,bg+2))))
     `(vertico-group-title ((t (:foreground ,blue :weight bold))))
     `(vertico-group-separator ((t (:foreground ,bg+2 :strike-through t))))
     `(vertico-multiline ((t (:foreground ,gray))))

;;;;; Consult
     `(consult-preview-line ((t (:background ,bg+1))))
     `(consult-preview-match ((t (:inherit lazy-highlight))))
     `(consult-narrow-indicator ((t (:foreground ,yellow))))
     `(consult-async-running ((t (:foreground ,gray+1))))
     `(consult-async-finished ((t (:foreground ,green))))
     `(consult-async-failed ((t (:foreground ,intense-red))))
     `(consult-key ((t (:foreground ,blue))))
     `(consult-file ((t (:foreground ,fg))))
     `(consult-bookmark ((t (:foreground ,fg))))
     `(consult-buffer ((t (:foreground ,fg))))
     `(consult-line-number ((t (:foreground ,gray))))
     `(consult-line-number-prefix ((t (:foreground ,gray-1))))
     `(consult-grep-context ((t (:foreground ,gray))))
     `(consult-highlight-match ((t (:foreground ,yellow :weight bold))))

;;;;; Orderless
     `(orderless-match-face-0 ((t (:foreground ,yellow :weight bold))))
     `(orderless-match-face-1 ((t (:foreground ,blue :weight bold))))
     `(orderless-match-face-2 ((t (:foreground ,green :weight bold))))
     `(orderless-match-face-3 ((t (:foreground ,gray+2 :weight bold))))

;;;;; Marginalia
     `(marginalia-key ((t (:foreground ,blue))))
     `(marginalia-value ((t (:foreground ,gray))))
     `(marginalia-size ((t (:foreground ,gray))))
     `(marginalia-date ((t (:foreground ,gray))))
     `(marginalia-file-name ((t (:foreground ,fg))))
     `(marginalia-file-priv-dir ((t (:foreground ,blue))))
     `(marginalia-file-priv-exec ((t (:foreground ,green))))
     `(marginalia-file-priv-link ((t (:foreground ,gray+1))))
     `(marginalia-file-priv-no ((t (:foreground ,gray))))
     `(marginalia-file-priv-other ((t (:foreground ,gray+1))))
     `(marginalia-file-priv-rare ((t (:foreground ,gray+1))))
     `(marginalia-file-priv-read ((t (:foreground ,gray+1))))
     `(marginalia-file-priv-write ((t (:foreground ,gray+1))))
     `(marginalia-documentation ((t (:foreground ,gray :slant italic))))
     `(marginalia-function ((t (:foreground ,red-1))))
     `(marginalia-mode ((t (:foreground ,gray+1))))
     `(marginalia-modified ((t (:foreground ,yellow))))
     `(marginalia-null ((t (:foreground ,gray-1))))
     `(marginalia-number ((t (:foreground ,gray+1))))
     `(marginalia-symbol ((t (:foreground ,fg))))
     `(marginalia-type ((t (:foreground ,gray+1))))
     `(marginalia-version ((t (:foreground ,gray))))

;;;;; Company
     `(company-tooltip ((t (:background ,bg+1 :foreground ,fg))))
     `(company-tooltip-selection ((t (:background ,bg+2))))
     `(company-tooltip-common ((t (:foreground ,yellow :weight bold))))
     `(company-tooltip-common-selection ((t (:foreground ,yellow :weight bold))))
     `(company-tooltip-annotation ((t (:foreground ,gray))))
     `(company-tooltip-annotation-selection ((t (:foreground ,gray+1))))
     `(company-scrollbar-bg ((t (:background ,bg+1))))
     `(company-scrollbar-fg ((t (:background ,gray))))
     `(company-preview ((t (:foreground ,gray))))
     `(company-preview-common ((t (:foreground ,gray+1))))
     `(company-preview-search ((t (:foreground ,green))))
     `(company-echo ((t nil)))
     `(company-echo-common ((t (:foreground ,gray+1))))

;;;;; Corfu
     `(corfu-default ((t (:background ,bg+1 :foreground ,fg))))
     `(corfu-current ((t (:background ,bg+2))))
     `(corfu-border ((t (:background ,bg+2))))
     `(corfu-bar ((t (:background ,gray))))
     `(corfu-annotations ((t (:foreground ,gray))))
     `(corfu-deprecated ((t (:foreground ,gray :strike-through t))))
     `(corfu-echo ((t (:foreground ,gray))))

;;;;; Embark
     `(embark-keybinding ((t (:foreground ,blue :weight bold))))
     `(embark-target ((t (:foreground ,yellow :weight bold))))
     `(embark-collect-candidate ((t (:foreground ,fg))))
     `(embark-collect-group-title ((t (:foreground ,blue :weight bold))))
     `(embark-collect-group-separator ((t (:foreground ,bg+2 :strike-through t))))
     `(embark-collect-marked ((t (:foreground ,yellow :weight bold))))
     `(embark-verbose-indicator-title ((t (:foreground ,blue))))

;;;;; Dired
     `(dired-directory ((t (:foreground ,blue :weight bold))))
     `(dired-flagged ((t (:foreground ,intense-red))))
     `(dired-header ((t (:foreground ,blue :weight bold))))
     `(dired-ignored ((t (:foreground ,gray))))
     `(dired-mark ((t (:foreground ,yellow :weight bold))))
     `(dired-marked ((t (:foreground ,yellow :weight bold))))
     `(dired-perm-write ((t (:foreground ,gray+1))))
     `(dired-symlink ((t (:foreground ,gray+1))))
     `(dired-warning ((t (:foreground ,yellow+1))))
     `(dired-broken-symlink ((t (:foreground ,fg :background ,red-2))))

;;;;; Dirvish
     `(dirvish-hl-line ((t (:background ,bg+2))))
     `(dirvish-git-commit-message-face ((t (:foreground ,gray :slant italic))))
     `(dirvish-subtree-guide ((t (:foreground ,bg+2))))
     `(dirvish-subtree-state ((t (:foreground ,gray+1))))

;;;;; Flycheck
     `(flycheck-error ((t (:underline (:style wave :color ,intense-red)))))
     `(flycheck-warning ((t (:underline (:style wave :color ,yellow+1)))))
     `(flycheck-info ((t (:underline (:style wave :color ,blue)))))
     `(flycheck-fringe-error ((t (:foreground ,intense-red))))
     `(flycheck-fringe-warning ((t (:foreground ,yellow+1))))
     `(flycheck-fringe-info ((t (:foreground ,blue))))
     `(flycheck-error-list-error ((t (:foreground ,intense-red))))
     `(flycheck-error-list-warning ((t (:foreground ,yellow+1))))
     `(flycheck-error-list-info ((t (:foreground ,blue))))
     `(flycheck-error-list-filename ((t (:foreground ,fg))))
     `(flycheck-error-list-line-number ((t (:foreground ,gray))))
     `(flycheck-error-list-column-number ((t (:foreground ,gray))))
     `(flycheck-error-list-id ((t (:foreground ,gray))))
     `(flycheck-error-list-checker-name ((t (:foreground ,gray))))
     `(flycheck-error-list-highlight ((t (:background ,bg+2))))

;;;;; Flymake
     `(flymake-error ((t (:underline (:style wave :color ,intense-red)))))
     `(flymake-warning ((t (:underline (:style wave :color ,yellow+1)))))
     `(flymake-note ((t (:underline (:style wave :color ,blue)))))

;;;;; Mu4e
     `(mu4e-header-face ((t (:foreground ,fg))))
     `(mu4e-header-highlight-face ((t (:background ,bg+2))))
     `(mu4e-header-key-face ((t (:foreground ,blue :weight bold))))
     `(mu4e-header-marks-face ((t (:foreground ,yellow))))
     `(mu4e-header-title-face ((t (:foreground ,blue :weight bold))))
     `(mu4e-header-value-face ((t (:foreground ,gray+1))))
     `(mu4e-unread-face ((t (:foreground ,fg :weight bold))))
     `(mu4e-flagged-face ((t (:foreground ,yellow))))
     `(mu4e-replied-face ((t (:foreground ,gray+1))))
     `(mu4e-forwarded-face ((t (:foreground ,gray+1))))
     `(mu4e-draft-face ((t (:foreground ,gray :slant italic))))
     `(mu4e-trashed-face ((t (:foreground ,gray :strike-through t))))
     `(mu4e-attach-number-face ((t (:foreground ,blue :weight bold))))
     `(mu4e-cited-1-face ((t (:foreground ,gray+1))))
     `(mu4e-cited-2-face ((t (:foreground ,gray))))
     `(mu4e-cited-3-face ((t (:foreground ,gray))))
     `(mu4e-cited-4-face ((t (:foreground ,gray-1))))
     `(mu4e-cited-5-face ((t (:foreground ,gray-1))))
     `(mu4e-cited-6-face ((t (:foreground ,gray-1))))
     `(mu4e-cited-7-face ((t (:foreground ,gray-2))))
     `(mu4e-compose-header-face ((t (:foreground ,blue :weight bold))))
     `(mu4e-compose-separator-face ((t (:foreground ,gray))))
     `(mu4e-contact-face ((t (:foreground ,fg))))
     `(mu4e-context-face ((t (:foreground ,blue :weight bold))))
     `(mu4e-footer-face ((t (:foreground ,gray))))
     `(mu4e-highlight-face ((t (:foreground ,yellow :weight bold))))
     `(mu4e-link-face ((t (:foreground ,blue :underline t))))
     `(mu4e-modeline-face ((t (:foreground ,gray+1))))
     `(mu4e-moved-face ((t (:foreground ,gray :slant italic))))
     `(mu4e-ok-face ((t (:foreground ,green :weight bold))))
     `(mu4e-region-code ((t (:background ,bg+1))))
     `(mu4e-related-face ((t (:foreground ,gray :slant italic))))
     `(mu4e-special-header-value-face ((t (:foreground ,gray+1))))
     `(mu4e-system-face ((t (:foreground ,gray :slant italic))))
     `(mu4e-title-face ((t (:foreground ,blue :weight bold))))
     `(mu4e-url-number-face ((t (:foreground ,blue :weight bold))))
     `(mu4e-warning-face ((t (:foreground ,yellow+1 :weight bold))))

;;;;; Elfeed
     `(elfeed-search-date-face ((t (:foreground ,gray))))
     `(elfeed-search-title-face ((t (:foreground ,fg))))
     `(elfeed-search-unread-title-face ((t (:foreground ,fg :weight bold))))
     `(elfeed-search-feed-face ((t (:foreground ,blue))))
     `(elfeed-search-tag-face ((t (:foreground ,gray+1))))
     `(elfeed-search-unread-count-face ((t (:foreground ,gray+1))))
     `(elfeed-search-filter-face ((t (:foreground ,blue :weight bold))))
     `(elfeed-log-date-face ((t (:foreground ,gray))))
     `(elfeed-log-info-level-face ((t (:foreground ,blue))))
     `(elfeed-log-warn-level-face ((t (:foreground ,yellow+1))))
     `(elfeed-log-error-level-face ((t (:foreground ,intense-red))))
     `(elfeed-log-debug-level-face ((t (:foreground ,gray))))

;;;;; Rainbow-delimiters - signature blue first, then neutrals
     `(rainbow-delimiters-depth-1-face ((t (:foreground ,blue))))
     `(rainbow-delimiters-depth-2-face ((t (:foreground ,gray+2))))
     `(rainbow-delimiters-depth-3-face ((t (:foreground ,gray+1))))
     `(rainbow-delimiters-depth-4-face ((t (:foreground ,gray))))
     `(rainbow-delimiters-depth-5-face ((t (:foreground ,blue))))
     `(rainbow-delimiters-depth-6-face ((t (:foreground ,gray+2))))
     `(rainbow-delimiters-depth-7-face ((t (:foreground ,gray+1))))
     `(rainbow-delimiters-depth-8-face ((t (:foreground ,gray))))
     `(rainbow-delimiters-depth-9-face ((t (:foreground ,gray-1))))
     `(rainbow-delimiters-base-face ((t (:foreground ,fg))))
     `(rainbow-delimiters-base-error-face ((t (:foreground ,intense-red :weight bold))))
     `(rainbow-delimiters-unmatched-face ((t (:foreground ,intense-red :weight bold))))
     `(rainbow-delimiters-mismatched-face ((t (:foreground ,intense-red :weight bold))))

;;;;; Dashboard
     `(dashboard-banner-logo-title ((t (:foreground ,yellow :weight bold :height 1.2))))
     `(dashboard-heading ((t (:foreground ,blue :weight bold))))
     `(dashboard-items-face ((t (:foreground ,fg))))
     `(dashboard-no-items-face ((t (:foreground ,gray))))
     `(dashboard-navigator ((t (:foreground ,blue))))
     `(dashboard-footer ((t (:foreground ,gray :slant italic))))
     `(dashboard-footer-icon ((t (:foreground ,blue))))

;;;;; Which-key
     `(which-key-key-face ((t (:foreground ,blue :weight bold))))
     `(which-key-separator-face ((t (:foreground ,gray))))
     `(which-key-note-face ((t (:foreground ,gray))))
     `(which-key-command-description-face ((t (:foreground ,fg))))
     `(which-key-local-map-description-face ((t (:foreground ,fg))))
     `(which-key-group-description-face ((t (:foreground ,blue))))
     `(which-key-special-key-face ((t (:foreground ,yellow :weight bold))))
     `(which-key-highlighted-command-face ((t (:foreground ,yellow :weight bold))))
     `(which-key-docstring-face ((t (:foreground ,gray :slant italic))))

;;;;; Eshell
     `(eshell-prompt ((t (:foreground ,blue :weight bold))))
     `(eshell-ls-directory ((t (:foreground ,blue :weight bold))))
     `(eshell-ls-symlink ((t (:foreground ,gray+1))))
     `(eshell-ls-executable ((t (:foreground ,green))))
     `(eshell-ls-readonly ((t (:foreground ,gray))))
     `(eshell-ls-unreadable ((t (:foreground ,gray-1))))
     `(eshell-ls-special ((t (:foreground ,gray+1))))
     `(eshell-ls-missing ((t (:foreground ,intense-red))))
     `(eshell-ls-archive ((t (:foreground ,gray+1))))
     `(eshell-ls-backup ((t (:foreground ,gray))))
     `(eshell-ls-product ((t (:foreground ,gray))))
     `(eshell-ls-clutter ((t (:foreground ,gray-1))))

;;;;; Vterm
     `(vterm-color-default ((t (:foreground ,fg :background ,bg))))
     `(vterm-color-black ((t (:foreground ,bg+2 :background ,gray-2))))
     `(vterm-color-red ((t (:foreground ,red-1 :background ,red))))
     `(vterm-color-green ((t (:foreground ,green :background ,green+1))))
     `(vterm-color-yellow ((t (:foreground ,yellow :background ,yellow+1))))
     `(vterm-color-blue ((t (:foreground ,blue :background ,blue+1))))
     `(vterm-color-magenta ((t (:foreground ,red :background ,red+1))))
     `(vterm-color-cyan ((t (:foreground ,steel :background ,steel+1))))
     `(vterm-color-white ((t (:foreground ,gray+1 :background ,fg))))

;;;;; Compilation
     `(compilation-info ((t (:foreground ,green))))
     `(compilation-warning ((t (:foreground ,yellow+1))))
     `(compilation-error ((t (:foreground ,intense-red))))
     `(compilation-mode-line-exit ((t (:foreground ,green :weight bold))))
     `(compilation-mode-line-fail ((t (:foreground ,intense-red :weight bold))))
     `(compilation-mode-line-run ((t (:foreground ,gray+1))))
     `(compilation-line-number ((t (:foreground ,gray))))
     `(compilation-column-number ((t (:foreground ,gray))))

;;;;; Info
     `(info-title-1 ((t (:inherit dupre-heading-1))))
     `(info-title-2 ((t (:inherit dupre-heading-2))))
     `(info-title-3 ((t (:inherit dupre-heading-3))))
     `(info-title-4 ((t (:inherit dupre-heading-4))))
     `(info-menu-header ((t (:foreground ,blue :weight bold))))
     `(info-menu-star ((t (:foreground ,gray+1))))
     `(info-node ((t (:foreground ,blue :weight bold))))
     `(info-xref ((t (:foreground ,blue :underline t))))
     `(info-xref-visited ((t (:foreground ,gray+1 :underline t))))
     `(info-header-node ((t (:foreground ,fg :weight bold))))
     `(info-header-xref ((t (:foreground ,blue))))
     `(info-index-match ((t (:inherit lazy-highlight))))

;;;;; Help
     `(help-key-binding ((t (:foreground ,blue :background ,bg+1
                                         :box (:line-width -1 :color ,bg+2)))))
     `(help-for-help-header ((t (:foreground ,blue :weight bold :height 1.2))))
     `(help-argument-name ((t (:foreground ,gray+1 :slant italic))))

;;;;; Custom (customize interface)
     `(custom-variable-tag ((t (:foreground ,blue :weight bold))))
     `(custom-group-tag ((t (:foreground ,blue :weight bold :height 1.2))))
     `(custom-group-tag-1 ((t (:foreground ,blue :weight bold))))
     `(custom-state ((t (:foreground ,green))))
     `(custom-changed ((t (:foreground ,yellow))))
     `(custom-modified ((t (:foreground ,yellow))))
     `(custom-invalid ((t (:foreground ,intense-red))))
     `(custom-set ((t (:foreground ,green))))
     `(custom-themed ((t (:foreground ,blue))))
     `(custom-saved ((t (:foreground ,green :weight bold))))
     `(custom-button ((t (:foreground ,fg :background ,bg+1
                                      :box (:line-width -1 :style released-button)))))
     `(custom-button-mouse ((t (:foreground ,fg :background ,bg+2
                                            :box (:line-width -1 :style released-button)))))
     `(custom-button-pressed ((t (:foreground ,fg :background ,bg+1
                                              :box (:line-width -1 :style pressed-button)))))
     `(custom-comment ((t (:foreground ,gray))))
     `(custom-comment-tag ((t (:foreground ,gray))))
     `(custom-face-tag ((t (:foreground ,blue :weight bold))))
     `(custom-link ((t (:foreground ,blue :underline t))))
     `(custom-visibility ((t (:foreground ,blue :underline t))))

;;;;; Markdown
     `(markdown-header-face-1 ((t (:inherit dupre-heading-1))))
     `(markdown-header-face-2 ((t (:inherit dupre-heading-2))))
     `(markdown-header-face-3 ((t (:inherit dupre-heading-3))))
     `(markdown-header-face-4 ((t (:inherit dupre-heading-4))))
     `(markdown-header-face-5 ((t (:foreground ,gray+1))))
     `(markdown-header-face-6 ((t (:foreground ,gray))))
     `(markdown-bold-face ((t (:weight bold))))
     `(markdown-italic-face ((t (:slant italic))))
     `(markdown-strike-through-face ((t (:strike-through t))))
     `(markdown-code-face ((t (:foreground ,green :background ,bg+1))))
     `(markdown-inline-code-face ((t (:foreground ,green :background ,bg+1))))
     `(markdown-pre-face ((t (:foreground ,green :background ,bg+1))))
     `(markdown-blockquote-face ((t (:foreground ,gray :slant italic))))
     `(markdown-list-face ((t (:foreground ,gray+1))))
     `(markdown-link-face ((t (:foreground ,blue))))
     `(markdown-url-face ((t (:foreground ,gray :underline t))))
     `(markdown-link-title-face ((t (:foreground ,fg))))
     `(markdown-reference-face ((t (:foreground ,gray))))
     `(markdown-footnote-marker-face ((t (:foreground ,gray+1))))
     `(markdown-footnote-text-face ((t (:foreground ,gray))))
     `(markdown-table-face ((t (:foreground ,gray+1))))
     `(markdown-hr-face ((t (:foreground ,bg+2))))
     `(markdown-metadata-key-face ((t (:foreground ,gray))))
     `(markdown-metadata-value-face ((t (:foreground ,gray+1))))
     `(markdown-language-keyword-face ((t (:foreground ,gray+1))))
     `(markdown-language-info-face ((t (:foreground ,gray))))
     `(markdown-gfm-checkbox-face ((t (:foreground ,blue))))
     `(markdown-highlight-face ((t (:background ,yellow-2))))
     `(markdown-markup-face ((t (:foreground ,gray))))

;;;;; Eglot/LSP
     `(eglot-highlight-symbol-face ((t (:background ,bg+2))))
     `(eglot-diagnostic-tag-unnecessary-face ((t (:foreground ,gray :slant italic))))
     `(eglot-diagnostic-tag-deprecated-face ((t (:foreground ,gray :strike-through t))))

;;;;; Ace-window
     `(aw-leading-char-face ((t (:foreground ,yellow :weight bold :height 2.0))))
     `(aw-background-face ((t (:foreground ,gray))))
     `(aw-mode-line-face ((t (:foreground ,blue :weight bold))))
     `(aw-key-face ((t (:foreground ,blue :weight bold))))

;;;;; Avy
     `(avy-lead-face ((t (:foreground ,fg :background ,yellow-2 :weight bold))))
     `(avy-lead-face-0 ((t (:foreground ,fg :background ,blue :weight bold))))
     `(avy-lead-face-1 ((t (:foreground ,fg :background ,bg+2 :weight bold))))
     `(avy-lead-face-2 ((t (:foreground ,fg :background ,bg+2 :weight bold))))
     `(avy-background-face ((t (:foreground ,gray))))
     `(avy-goto-char-timer-face ((t (:foreground ,yellow :weight bold))))

;;;;; Whitespace
     `(whitespace-space ((t (:foreground ,bg+2))))
     `(whitespace-tab ((t (:foreground ,bg+2))))
     `(whitespace-newline ((t (:foreground ,bg+2))))
     `(whitespace-trailing ((t (:background ,red-2))))
     `(whitespace-line ((t (:background ,red-3))))
     `(whitespace-indentation ((t (:foreground ,bg+2 :background ,bg))))
     `(whitespace-empty ((t (:background ,yellow-2))))
     `(whitespace-space-after-tab ((t (:foreground ,bg+2 :background ,yellow-2))))
     `(whitespace-space-before-tab ((t (:foreground ,bg+2 :background ,yellow-2))))
     `(whitespace-hspace ((t (:foreground ,bg+2))))
     `(whitespace-big-indent ((t (:background ,red-3))))
     `(whitespace-missing-newline-at-eof ((t (:background ,yellow-2))))

;;;;; Anzu
     `(anzu-mode-line ((t (:foreground ,blue :weight bold))))
     `(anzu-mode-line-no-match ((t (:foreground ,intense-red :weight bold))))
     `(anzu-match-1 ((t (:foreground ,fg :background ,green-2))))
     `(anzu-match-2 ((t (:foreground ,fg :background ,blue))))
     `(anzu-match-3 ((t (:foreground ,fg :background ,bg+2))))
     `(anzu-replace-highlight ((t (:foreground ,fg :background ,red-2))))
     `(anzu-replace-to ((t (:foreground ,fg :background ,green-2))))

;;;;; Bookmark
     `(bookmark-face ((t (:foreground ,blue :background ,bg+1))))
     `(bookmark-menu-bookmark ((t (:foreground ,blue :weight bold))))
     `(bookmark-menu-heading ((t (:foreground ,blue :weight bold))))

;;;;; Speedbar
     `(speedbar-button-face ((t (:foreground ,gray+1))))
     `(speedbar-directory-face ((t (:foreground ,blue :weight bold))))
     `(speedbar-file-face ((t (:foreground ,fg))))
     `(speedbar-highlight-face ((t (:background ,bg+2))))
     `(speedbar-selected-face ((t (:foreground ,yellow :weight bold))))
     `(speedbar-separator-face ((t (:foreground ,bg+2 :overline t))))
     `(speedbar-tag-face ((t (:foreground ,gray+1))))

;;;;; Term
     `(term-color-black ((t (:foreground ,bg+2 :background ,gray-2))))
     `(term-color-red ((t (:foreground ,red-1 :background ,red))))
     `(term-color-green ((t (:foreground ,green :background ,green+1))))
     `(term-color-yellow ((t (:foreground ,yellow :background ,yellow+1))))
     `(term-color-blue ((t (:foreground ,blue :background ,blue+1))))
     `(term-color-magenta ((t (:foreground ,red :background ,red+1))))
     `(term-color-cyan ((t (:foreground ,steel :background ,steel+1))))
     `(term-color-white ((t (:foreground ,gray+1 :background ,fg))))
     `(term-default-fg-color ((t (:foreground ,fg))))
     `(term-default-bg-color ((t (:background ,bg))))

;;;;; Comint
     `(comint-highlight-prompt ((t (:foreground ,blue :weight bold))))
     `(comint-highlight-input ((t (:foreground ,fg :weight bold))))

;;;;; Woman
     `(woman-bold ((t (:foreground ,fg :weight bold))))
     `(woman-italic ((t (:foreground ,gray+1 :slant italic))))
     `(woman-unknown ((t (:foreground ,gray+1))))
     `(woman-addition ((t (:foreground ,gray+1))))

;;;;; Xref
     `(xref-file-header ((t (:foreground ,blue :weight bold))))
     `(xref-line-number ((t (:foreground ,gray))))
     `(xref-match ((t (:inherit lazy-highlight))))

;;;;; Calendar/Diary
     `(calendar-today ((t (:foreground ,yellow :weight bold))))
     `(calendar-weekday-header ((t (:foreground ,fg))))
     `(calendar-weekend-header ((t (:foreground ,gray))))
     `(calendar-month-header ((t (:foreground ,blue :weight bold))))
     `(diary ((t (:foreground ,fg))))
     `(diary-anniversary ((t (:foreground ,gray+1))))
     `(diary-time ((t (:foreground ,gray))))
     `(holiday ((t (:foreground ,green))))

;;;;; Message mode (for email)
     `(message-header-name ((t (:foreground ,blue :weight bold))))
     `(message-header-to ((t (:foreground ,fg))))
     `(message-header-cc ((t (:foreground ,gray+1))))
     `(message-header-subject ((t (:foreground ,fg :weight bold))))
     `(message-header-other ((t (:foreground ,gray))))
     `(message-header-newsgroups ((t (:foreground ,fg))))
     `(message-header-xheader ((t (:foreground ,gray))))
     `(message-separator ((t (:foreground ,gray))))
     `(message-cited-text ((t (:foreground ,gray :slant italic))))
     `(message-cited-text-1 ((t (:foreground ,gray+1))))
     `(message-cited-text-2 ((t (:foreground ,gray))))
     `(message-cited-text-3 ((t (:foreground ,gray))))
     `(message-cited-text-4 ((t (:foreground ,gray-1))))
     `(message-mml ((t (:foreground ,gray+1))))

;;;;; Gnus
     `(gnus-group-mail-1 ((t (:foreground ,fg :weight bold))))
     `(gnus-group-mail-2 ((t (:foreground ,fg))))
     `(gnus-group-mail-3 ((t (:foreground ,gray+1))))
     `(gnus-group-mail-1-empty ((t (:foreground ,gray))))
     `(gnus-group-mail-2-empty ((t (:foreground ,gray))))
     `(gnus-group-mail-3-empty ((t (:foreground ,gray))))
     `(gnus-group-news-1 ((t (:foreground ,fg :weight bold))))
     `(gnus-group-news-2 ((t (:foreground ,fg))))
     `(gnus-group-news-3 ((t (:foreground ,gray+1))))
     `(gnus-group-news-1-empty ((t (:foreground ,gray))))
     `(gnus-group-news-2-empty ((t (:foreground ,gray))))
     `(gnus-group-news-3-empty ((t (:foreground ,gray))))
     `(gnus-summary-normal-read ((t (:foreground ,gray))))
     `(gnus-summary-normal-unread ((t (:foreground ,fg :weight bold))))
     `(gnus-summary-normal-ancient ((t (:foreground ,gray-1))))
     `(gnus-summary-selected ((t (:foreground ,yellow :weight bold))))
     `(gnus-summary-cancelled ((t (:foreground ,intense-red :strike-through t))))
     `(gnus-header-name ((t (:foreground ,blue :weight bold))))
     `(gnus-header-from ((t (:foreground ,fg))))
     `(gnus-header-subject ((t (:foreground ,fg :weight bold))))
     `(gnus-header-content ((t (:foreground ,gray))))
     `(gnus-header-newsgroups ((t (:foreground ,fg))))
     `(gnus-cite-1 ((t (:foreground ,gray+1))))
     `(gnus-cite-2 ((t (:foreground ,gray))))
     `(gnus-cite-3 ((t (:foreground ,gray))))
     `(gnus-cite-4 ((t (:foreground ,gray-1))))
     `(gnus-cite-5 ((t (:foreground ,gray-1))))
     `(gnus-signature ((t (:foreground ,gray :slant italic))))

;;;;; Web-mode
     `(web-mode-html-tag-face ((t (:foreground ,blue))))
     `(web-mode-html-tag-bracket-face ((t (:foreground ,gray+1))))
     `(web-mode-html-attr-name-face ((t (:foreground ,gray+1))))
     `(web-mode-html-attr-value-face ((t (:foreground ,green))))
     `(web-mode-html-attr-equal-face ((t (:foreground ,gray+1))))
     `(web-mode-doctype-face ((t (:foreground ,gray :weight bold))))
     `(web-mode-comment-face ((t (:foreground ,gray :slant italic))))
     `(web-mode-css-selector-face ((t (:foreground ,blue))))
     `(web-mode-css-property-name-face ((t (:foreground ,gray+1))))
     `(web-mode-css-color-face ((t (:foreground ,gray+1))))
     `(web-mode-css-at-rule-face ((t (:foreground ,blue :weight bold))))
     `(web-mode-css-pseudo-class-face ((t (:foreground ,gray+1))))
     `(web-mode-css-function-face ((t (:foreground ,red-1))))
     `(web-mode-function-name-face ((t (:foreground ,red-1 :weight bold))))
     `(web-mode-function-call-face ((t (:foreground ,red-1))))
     `(web-mode-string-face ((t (:foreground ,green))))
     `(web-mode-keyword-face ((t (:foreground ,blue :weight bold))))
     `(web-mode-constant-face ((t (:foreground ,gray+2 :weight bold))))
     `(web-mode-type-face ((t (:foreground ,gray+2))))
     `(web-mode-variable-name-face ((t (:foreground ,fg))))
     `(web-mode-builtin-face ((t (:foreground ,blue))))
     `(web-mode-symbol-face ((t (:foreground ,gray))))
     `(web-mode-current-element-highlight-face ((t (:background ,bg+2))))
     `(web-mode-current-column-highlight-face ((t (:background ,bg+1))))
     `(web-mode-error-face ((t (:foreground ,intense-red :underline t))))
     `(web-mode-warning-face ((t (:foreground ,yellow+1 :underline t))))
     `(web-mode-folded-face ((t (:foreground ,gray :underline t))))
     `(web-mode-block-face ((t (:background ,bg+0))))

;;;;; Treemacs
     `(treemacs-directory-face ((t (:foreground ,blue))))
     `(treemacs-file-face ((t (:foreground ,fg))))
     `(treemacs-root-face ((t (:foreground ,blue :weight bold :height 1.2))))
     `(treemacs-git-modified-face ((t (:foreground ,yellow))))
     `(treemacs-git-added-face ((t (:foreground ,green))))
     `(treemacs-git-conflict-face ((t (:foreground ,intense-red :weight bold))))
     `(treemacs-git-ignored-face ((t (:foreground ,gray))))
     `(treemacs-git-renamed-face ((t (:foreground ,gray+1))))
     `(treemacs-git-untracked-face ((t (:foreground ,gray))))
     `(treemacs-tags-face ((t (:foreground ,gray+1))))
     `(treemacs-help-title-face ((t (:foreground ,blue :weight bold))))
     `(treemacs-help-column-face ((t (:foreground ,gray))))
     `(treemacs-fringe-indicator-face ((t (:foreground ,blue))))
     `(treemacs-on-failure-pulse-face ((t (:background ,red-2))))
     `(treemacs-on-success-pulse-face ((t (:background ,green-2))))

;;;;; Gptel (AI chat)
     `(gptel-context-highlight-face ((t (:background ,bg+1))))
     `(gptel-rewrite-highlight-face ((t (:background ,yellow-2))))

;;;;; Eww
     `(eww-form-text ((t (:foreground ,fg :background ,bg+1
                                      :box (:line-width -1 :color ,bg+2)))))
     `(eww-form-textarea ((t (:foreground ,fg :background ,bg+1
                                          :box (:line-width -1 :color ,bg+2)))))
     `(eww-form-submit ((t (:foreground ,fg :background ,bg+2
                                        :box (:line-width -1 :style released-button)))))
     `(eww-form-checkbox ((t (:foreground ,blue :background ,bg+1
                                          :box (:line-width -1 :color ,bg+2)))))
     `(eww-form-select ((t (:foreground ,fg :background ,bg+1
                                        :box (:line-width -1 :color ,bg+2)))))
     `(eww-form-file ((t (:foreground ,blue :background ,bg+1
                                      :box (:line-width -1 :color ,bg+2)))))
     `(eww-valid-certificate ((t (:foreground ,green :weight bold))))
     `(eww-invalid-certificate ((t (:foreground ,intense-red :weight bold))))

;;;;; Shr (simple html renderer)
     `(shr-link ((t (:foreground ,blue :underline t))))
     `(shr-selected-link ((t (:foreground ,yellow :underline t))))
     `(shr-strike-through ((t (:strike-through t))))
     `(shr-h1 ((t (:inherit dupre-heading-1))))
     `(shr-h2 ((t (:inherit dupre-heading-2))))
     `(shr-h3 ((t (:inherit dupre-heading-3))))
     `(shr-h4 ((t (:inherit dupre-heading-4))))
     `(shr-h5 ((t (:foreground ,gray+1))))
     `(shr-h6 ((t (:foreground ,gray))))
     `(shr-code ((t (:foreground ,green :background ,bg+1))))
     `(shr-mark ((t (:background ,yellow-2))))

     )))

(provide 'dupre-faces)
;;; dupre-faces.el ends here