;;; modus-operandi-theme.el --- Accessible light theme (WCAG AAA) -*- lexical-binding:t -*-

;; Copyright (C) 2019-2020 Free Software Foundation, Inc.

;; Author: Protesilaos Stavrou <info@protesilaos.com>
;; URL: https://gitlab.com/protesilaos/modus-themes
;; Version: 0.13.0
;; Package-Requires: ((emacs "26.1"))
;; Keywords: faces, theme, accessibility

;; This file is part of GNU Emacs.

;; This program is free software; you can redistribute it and/or
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
;;
;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;; GNU General Public License for more details.
;;
;; You should have received a copy of the GNU General Public License
;; along with this program.  If not, see <https://www.gnu.org/licenses/>.

;;; Commentary:
;;
;; This theme is designed for color-contrast accessibility.
;;
;; 1. Provide a consistent minimum contrast ratio between background and
;; foreground values of 7:1 or higher.  This meets the highest such
;; accessibility criterion per the guidelines of the Worldwide Web
;; Consortium's Working Group on Accessibility (WCAG AAA standard).
;;
;; 2. Offer as close to full face coverage as possible.  The list is
;; already quite long (see further below), with more additions to follow
;; as part of the ongoing development process.
;;
;; The theme provides the following customization options, all of which
;; are disabled by default:
;;
;;     modus-operandi-theme-slanted-constructs             (boolean)
;;     modus-operandi-theme-bold-constructs                (boolean)
;;     modus-operandi-theme-variable-pitch-headings        (boolean)
;;     modus-operandi-theme-no-mixed-fonts                 (boolean)
;;     modus-operandi-theme-headings                       (alist)
;;     modus-operandi-theme-scale-headings                 (boolean)
;;     modus-operandi-theme-fringes                        (choice)
;;     modus-operandi-theme-org-blocks                     (choice)
;;     modus-operandi-theme-prompts                        (choice)
;;     modus-operandi-theme-mode-line                      (choice)
;;     modus-operandi-theme-diffs                          (choice)
;;     modus-operandi-theme-faint-syntax                   (boolean)
;;     modus-operandi-theme-intense-hl-line                (boolean)
;;     modus-operandi-theme-intense-paren-match            (boolean)
;;     modus-operandi-theme-links                          (choice)
;;     modus-operandi-theme-comments                       (choice)
;;     modus-operandi-theme-completions                    (choice)
;;     modus-operandi-theme-override-colors-alist          (alist)
;;
;; The default scale is as follows (it can be customized as well):
;;
;;     modus-operandi-theme-scale-1 1.05
;;     modus-operandi-theme-scale-2 1.1
;;     modus-operandi-theme-scale-3 1.15
;;     modus-operandi-theme-scale-4 1.2
;;     modus-operandi-theme-scale-5 1.3
;;
;; What follows is the list of explicitly supported packages or face
;; groups (there are implicitly supported packages as well, which
;; inherit from font-lock or some basic group).  You are encouraged to
;; notify me of any missing package or change you would like to see.
;;
;;     ace-window
;;     ag
;;     alert
;;     all-the-icons
;;     annotate
;;     anzu
;;     apropos
;;     apt-sources-list
;;     artbollocks-mode
;;     auctex and TeX
;;     auto-dim-other-buffers
;;     avy
;;     awesome-tray
;;     binder
;;     bm
;;     bongo
;;     boon
;;     breakpoint (provided by built-in gdb-mi.el)
;;     buffer-expose
;;     calendar and diary
;;     calfw
;;     centaur-tabs
;;     change-log and log-view (`vc-print-log' and `vc-print-root-log')
;;     cider
;;     circe
;;     color-rg
;;     column-enforce-mode
;;     company-mode
;;     company-posframe
;;     compilation-mode
;;     completions
;;     counsel
;;     counsel-css
;;     counsel-notmuch
;;     counsel-org-capture-string
;;     cov
;;     cperl-mode
;;     csv-mode
;;     ctrlf
;;     custom (M-x customize)
;;     dap-mode
;;     dashboard (emacs-dashboard)
;;     deadgrep
;;     debbugs
;;     define-word
;;     deft
;;     dictionary
;;     diff-hl
;;     diff-mode
;;     dim-autoload
;;     dir-treeview
;;     dired
;;     dired-async
;;     dired-git
;;     dired-git-info
;;     dired-narrow
;;     dired-subtree
;;     diredfl
;;     disk-usage
;;     doom-modeline
;;     dynamic-ruler
;;     easy-jekyll
;;     easy-kill
;;     ebdb
;;     ediff
;;     eglot
;;     el-search
;;     eldoc
;;     eldoc-box
;;     elfeed
;;     elfeed-score
;;     emms
;;     enhanced-ruby-mode
;;     epa
;;     equake
;;     erc
;;     eros
;;     ert
;;     eshell
;;     eshell-fringe-status
;;     eshell-git-prompt
;;     eshell-prompt-extras (epe)
;;     eshell-syntax-highlighting
;;     evil (evil-mode)
;;     evil-goggles
;;     evil-visual-mark-mode
;;     eww
;;     eyebrowse
;;     fancy-dabbrev
;;     flycheck
;;     flycheck-color-mode-line
;;     flycheck-indicator
;;     flycheck-posframe
;;     flymake
;;     flyspell
;;     flyspell-correct
;;     flx
;;     freeze-it
;;     frog-menu
;;     focus
;;     fold-this
;;     font-lock (generic syntax highlighting)
;;     forge
;;     fountain (fountain-mode)
;;     geiser
;;     git-commit
;;     git-gutter (and variants)
;;     git-lens
;;     git-rebase
;;     git-timemachine
;;     git-walktree
;;     gnus
;;     golden-ratio-scroll-screen
;;     helm
;;     helm-ls-git
;;     helm-switch-shell
;;     helm-xref
;;     helpful
;;     highlight-blocks
;;     highlight-defined
;;     highlight-escape-sequences (`hes-mode')
;;     highlight-indentation
;;     highlight-numbers
;;     highlight-symbol
;;     highlight-tail
;;     highlight-thing
;;     hl-defined
;;     hl-fill-column
;;     hl-line-mode
;;     hl-todo
;;     hydra
;;     hyperlist
;;     ibuffer
;;     icomplete
;;     ido-mode
;;     iedit
;;     iflipb
;;     imenu-list
;;     indium
;;     info
;;     info-colors
;;     interaction-log
;;     ioccur
;;     isearch, occur, etc.
;;     ivy
;;     ivy-posframe
;;     jira (org-jira)
;;     journalctl-mode
;;     js2-mode
;;     julia
;;     jupyter
;;     kaocha-runner
;;     keycast
;;     line numbers (`display-line-numbers-mode' and global variant)
;;     lsp-mode
;;     lsp-ui
;;     magit
;;     magit-imerge
;;     man
;;     markdown-mode
;;     markup-faces (`adoc-mode')
;;     mentor
;;     messages
;;     minibuffer-line
;;     minimap
;;     modeline
;;     mood-line
;;     mpdel
;;     mu4e
;;     mu4e-conversation
;;     multiple-cursors
;;     neotree
;;     no-emoji
;;     notmuch
;;     num3-mode
;;     nxml-mode
;;     objed
;;     orderless
;;     org
;;     org-journal
;;     org-noter
;;     org-pomodoro
;;     org-recur
;;     org-roam
;;     org-superstar
;;     org-table-sticky-header
;;     org-treescope
;;     origami
;;     outline-mode
;;     outline-minor-faces
;;     package (M-x list-packages)
;;     page-break-lines
;;     paradox
;;     paren-face
;;     parrot
;;     pass
;;     persp-mode
;;     perspective
;;     phi-grep
;;     phi-search
;;     pkgbuild-mode
;;     pomidor
;;     popup
;;     powerline
;;     powerline-evil
;;     proced
;;     prodigy
;;     racket-mode
;;     rainbow-blocks
;;     rainbow-identifiers
;;     rainbow-delimiters
;;     rcirc
;;     regexp-builder (also known as `re-builder')
;;     rg
;;     ripgrep
;;     rmail
;;     ruler-mode
;;     sallet
;;     selectrum
;;     semantic
;;     sesman
;;     shell-script-mode
;;     show-paren-mode
;;     side-notes
;;     skewer-mode
;;     smart-mode-line
;;     smartparens
;;     smerge
;;     spaceline
;;     speedbar
;;     spell-fu
;;     stripes
;;     suggest
;;     switch-window
;;     swiper
;;     swoop
;;     sx
;;     symbol-overlay
;;     tab-bar-mode
;;     tab-line-mode
;;     syslog-mode
;;     table (built-in table.el)
;;     telephone-line
;;     term
;;     tomatinho
;;     transient (pop-up windows like Magit's)
;;     trashed
;;     treemacs
;;     tty-menu
;;     tuareg
;;     typescript
;;     undo-tree
;;     vc (built-in mode line status for version control)
;;     vc-annotate (C-x v g)
;;     vdiff
;;     vimish-fold
;;     visible-mark
;;     visual-regexp
;;     volatile-highlights
;;     vterm
;;     wcheck-mode
;;     web-mode
;;     wgrep
;;     which-function-mode
;;     which-key
;;     whitespace-mode
;;     window-divider-mode
;;     winum
;;     writegood-mode
;;     woman
;;     xah-elisp-mode
;;     xref
;;     xterm-color (and ansi-colors)
;;     yaml-mode
;;     yasnippet
;;     ztree

;;; Code:



(deftheme modus-operandi
  "Light theme that conforms with the highest accessibility
  standard for color contrast between background and foreground
  elements (WCAG AAA).")

;;; Custom faces

;; These faces will be inherited by actual constructs.  They are meant
;; for those cases where a face needs to distinguish its output from
;; the rest of the text, such as `isearch' and `occur'…  We define
;; these separately in order to combine each color with its
;; appropriate foreground value.  This is to ensure a consistent
;; contrast ratio of >= 7:1.
(defgroup modus-theme ()
  "Theme that ensures WCAG AAA accessibility (contrast ratio
between foreground and background is >= 7:1)."
  :group 'faces
  :prefix "modus-theme-"
  :link '(url-link :tag "GitLab" "https://gitlab.com/protesilaos/modus-themes")
  :tag "Modus Operandi")

(defface modus-theme-subtle-red nil nil)
(defface modus-theme-subtle-green nil nil)
(defface modus-theme-subtle-yellow nil nil)
(defface modus-theme-subtle-blue nil nil)
(defface modus-theme-subtle-magenta nil nil)
(defface modus-theme-subtle-cyan nil nil)
(defface modus-theme-subtle-neutral nil nil)
(defface modus-theme-intense-red nil nil)
(defface modus-theme-intense-green nil nil)
(defface modus-theme-intense-yellow nil nil)
(defface modus-theme-intense-blue nil nil)
(defface modus-theme-intense-magenta nil nil)
(defface modus-theme-intense-cyan nil nil)
(defface modus-theme-intense-neutral nil nil)
(defface modus-theme-refine-red nil nil)
(defface modus-theme-refine-green nil nil)
(defface modus-theme-refine-yellow nil nil)
(defface modus-theme-refine-blue nil nil)
(defface modus-theme-refine-magenta nil nil)
(defface modus-theme-refine-cyan nil nil)
(defface modus-theme-active-red nil nil)
(defface modus-theme-active-green nil nil)
(defface modus-theme-active-yellow nil nil)
(defface modus-theme-active-blue nil nil)
(defface modus-theme-active-magenta nil nil)
(defface modus-theme-active-cyan nil nil)
(defface modus-theme-fringe-red nil nil)
(defface modus-theme-fringe-green nil nil)
(defface modus-theme-fringe-yellow nil nil)
(defface modus-theme-fringe-blue nil nil)
(defface modus-theme-fringe-magenta nil nil)
(defface modus-theme-fringe-cyan nil nil)
(defface modus-theme-nuanced-red nil nil)
(defface modus-theme-nuanced-green nil nil)
(defface modus-theme-nuanced-yellow nil nil)
(defface modus-theme-nuanced-blue nil nil)
(defface modus-theme-nuanced-magenta nil nil)
(defface modus-theme-nuanced-cyan nil nil)
(defface modus-theme-special-cold nil nil)
(defface modus-theme-special-mild nil nil)
(defface modus-theme-special-warm nil nil)
(defface modus-theme-special-calm nil nil)
(defface modus-theme-diff-added nil nil)
(defface modus-theme-diff-changed nil nil)
(defface modus-theme-diff-removed nil nil)
(defface modus-theme-diff-refine-added nil nil)
(defface modus-theme-diff-refine-changed nil nil)
(defface modus-theme-diff-refine-removed nil nil)
(defface modus-theme-diff-focus-added nil nil)
(defface modus-theme-diff-focus-changed nil nil)
(defface modus-theme-diff-focus-removed nil nil)
(defface modus-theme-diff-heading nil nil)
(defface modus-theme-pseudo-header nil nil)
(defface modus-theme-mark-alt nil nil)
(defface modus-theme-mark-del nil nil)
(defface modus-theme-mark-sel nil nil)
(defface modus-theme-mark-symbol nil nil)
(defface modus-theme-heading-1 nil nil)
(defface modus-theme-heading-2 nil nil)
(defface modus-theme-heading-3 nil nil)
(defface modus-theme-heading-4 nil nil)
(defface modus-theme-heading-5 nil nil)
(defface modus-theme-heading-6 nil nil)
(defface modus-theme-heading-7 nil nil)
(defface modus-theme-heading-8 nil nil)
(defface modus-theme-hl-line nil nil)
(defface modus-theme-bold nil nil)
(defface modus-theme-slant nil nil)
(defface modus-theme-variable-pitch nil nil)

;;; Customization options

;; User-facing customization options.  They are all deactivated by
;; default (users must opt in).
(defcustom modus-operandi-theme-slanted-constructs nil
  "Use slanted text in more code constructs (italics or oblique)."
  :type 'boolean)

(defcustom modus-operandi-theme-bold-constructs nil
  "Use bold text in more code constructs."
  :type 'boolean)

(define-obsolete-variable-alias 'modus-operandi-theme-proportional-fonts
  'modus-operandi-theme-variable-pitch-headings "`modus-operandi-theme' 0.11.0")

(defcustom modus-operandi-theme-proportional-fonts nil
  "Use proportional fonts (variable-pitch) in headings."
  :type 'boolean)

(defcustom modus-operandi-theme-variable-pitch-headings nil
  "Use proportional fonts (variable-pitch) in headings."
  :type 'boolean)

(defcustom modus-operandi-theme-no-mixed-fonts nil
  "Disable inheritance from `fixed-pitch' in some faces.

This is done by default to allow spacing-sensitive constructs,
such as Org tables and code blocks, to remain monospaced when
users opt for something like the command `variable-pitch-mode'.
The downside with the default is that users need to explicitly
configure the font family of `fixed-pitch' in order to get a
consistent experience.  That may be something they do not want to
do.  Hence this option to disable any kind of technique for
mixing fonts."
  :type 'boolean)

(make-obsolete 'modus-operandi-theme-rainbow-headings
               'modus-operandi-theme-headings
               "`modus-operandi-theme' 0.13.0")

(defcustom modus-operandi-theme-rainbow-headings nil
  "Use more saturated colors for headings."
  :type 'boolean)

(make-obsolete 'modus-operandi-theme-section-headings
               'modus-operandi-theme-headings
               "`modus-operandi-theme' 0.13.0")

(defcustom modus-operandi-theme-section-headings nil
  "Use a background and an overline in headings."
  :type 'boolean)

(defcustom modus-operandi-theme-headings
  '((t . nil))
  "Alist of styles for headings, with optional value per level.

To control faces per level from 1-8, use something like this:

  (setq modus-operandi-theme-headings
        '((1 . highlight)
          (2 . line)
          (t . rainbow-line-no-bold)))

To set a uniform value for all heading levels, use this pattern:

  (setq modus-operandi-theme-headings
        '((t . rainbow-line-no-bold)))

The default uses a fairly desaturated foreground value in
combination with a bold typographic weight.  To specify this
style for a given level N (assuming you wish to have another
fallback option), just specify the value t like this:

  (setq modus-operandi-theme-headings
        '((1 . t)
          (2 . line)
          (t . rainbow-line-no-bold)))

A description of all possible values:

+ `no-bold' retains the default text color while removing the
  typographic weight.

+ `line' is the same as the default plus an overline over the
  heading.

+ `line-no-bold' is the same as `line' without bold weight.

+ `rainbow' uses a more colorful foreground in combination with
  bold weight.

+ `rainbow-line' is the same as `rainbow' plus an overline.

+ `rainbow-line-no-bold' is the same as `rainbow-line' without
  the bold weight.

+ `highlight' retains the default style of a fairly desaturated
  foreground combined with a bold weight and add to it a subtle
  accented background.

+ `highlight-no-bold' is the same as `highlight' without a bold
  weight.

+ `rainbow-highlight' is the same as `highlight' but with a more
  colorful foreground.

+ `rainbow-highlight-no-bold' is the same as `rainbow-highlight'
  without a bold weight.

+ `section' retains the default looks and adds to them both an
  overline and a slightly accented background.  It is, in effect,
  a combination of the `line' and `highlight' values.

+ `section-no-bold' is the same as `section' without a bold
  weight.

+ `rainbow-section' is the same as `section' but with a more
  colorful foreground.

+ `rainbow-section-no-bold' is the same as `rainbow-section'
  without a bold weight."
  :type
  '(alist
    :key-type symbol
    :value-type
    (choice (const :tag "Fairly desaturated foreground with bold weight (default)" t)
            (const :tag "Like the default without bold weight" no-bold)
            (const :tag "Like the default plus overline" line)
            (const :tag "Like `line' without bold weight" line-no-bold)
            (const :tag "Like the default but with more colorful foreground" rainbow)
            (const :tag "Like `rainbow' plus overline" rainbow-line)
            (const :tag "Like `rainbow' without bold weight" rainbow-no-bold)
            (const :tag "Like `rainbow-line' without bold weight" rainbow-line-no-bold)
            (const :tag "Like the default plus subtle background" highlight)
            (const :tag "Like `highlight' without bold weight" highlight-no-bold)
            (const :tag "Like `highlight' with more colorful foreground" rainbow-highlight)
            (const :tag "Like `rainbow-highlight' without bold weight" rainbow-highlight-no-bold)
            (const :tag "Like `highlight' plus overline" section)
            (const :tag "Like `section' without bold weight" section-no-bold)
            (const :tag "Like `section' with more colorful foreground" rainbow-section)
            (const :tag "Like `rainbow-section' without bold weight" rainbow-section-no-bold))))

(defcustom modus-operandi-theme-scale-headings nil
  "Use font scaling for headings."
  :type 'boolean)

(defcustom modus-operandi-theme-scale-1 1.05
  "Font size that is slightly larger than the base value.
The default is a floating point that is interpreted as a multiple
of the base font size.  However, the variable also accepts an
integer, understood as an absolute height (e.g. a value of 140 is
the same as setting the font at 14 point size).

For more on the matter, read the documentation of
`set-face-attribute', specifically the ':height' section."
  :type 'number)

(defcustom modus-operandi-theme-scale-2 1.1
  "Font size slightly larger than `modus-operandi-theme-scale-1'.
The default is a floating point that is interpreted as a multiple
of the base font size.  However, the variable also accepts an
integer, understood as an absolute height (e.g. a value of 140 is
the same as setting the font at 14 point size).

For more on the matter, read the documentation of
`set-face-attribute', specifically the ':height' section."
  :type 'number)

(defcustom modus-operandi-theme-scale-3 1.15
  "Font size slightly larger than `modus-operandi-theme-scale-2'.
The default is a floating point that is interpreted as a multiple
of the base font size.  However, the variable also accepts an
integer, understood as an absolute height (e.g. a value of 140 is
the same as setting the font at 14 point size).

For more on the matter, read the documentation of
`set-face-attribute', specifically the ':height' section."
  :type 'number)

(defcustom modus-operandi-theme-scale-4 1.2
  "Font size slightly larger than `modus-operandi-theme-scale-3'.
The default is a floating point that is interpreted as a multiple
of the base font size.  However, the variable also accepts an
integer, understood as an absolute height (e.g. a value of 140 is
the same as setting the font at 14 point size).

For more on the matter, read the documentation of
`set-face-attribute', specifically the ':height' section."
  :type 'number)

(defcustom modus-operandi-theme-scale-5 1.3
  "Font size slightly larger than `modus-operandi-theme-scale-4'.
The default is a floating point that is interpreted as a multiple
of the base font size.  However, the variable also accepts an
integer, understood as an absolute height (e.g. a value of 140 is
the same as setting the font at 14 point size).

For more on the matter, read the documentation of
`set-face-attribute', specifically the ':height' section."
  :type 'number)

(make-obsolete 'modus-operandi-theme-visible-fringes
               'modus-operandi-theme-fringes
               "`modus-operandi-theme' 0.12.0")

(defcustom modus-operandi-theme-visible-fringes nil
  "Use a visible style for fringes."
  :type 'boolean)

(defcustom modus-operandi-theme-fringes nil
  "Define the visibility of fringes.

Nil means the fringes have no background color.  Option `subtle'
will apply a greyscale value that is visible yet close to the
main buffer background color.  Option `intense' will use a more
pronounced greyscale value."
  :type '(choice
          (const :tag "No visible fringes (default)" nil)
          (const :tag "Subtle greyscale background" subtle)
          (const :tag "Intense greyscale background" intense)))

(make-obsolete 'modus-operandi-theme-distinct-org-blocks
               'modus-operandi-theme-org-blocks
               "`modus-operandi-theme' 0.11.0")

(defcustom modus-operandi-theme-distinct-org-blocks nil
  "Use a distinct neutral background for `org-mode' blocks."
  :type 'boolean)

(make-obsolete 'modus-operandi-theme-rainbow-org-src-blocks
               'modus-operandi-theme-org-blocks
               "`modus-operandi-theme' 0.11.0")

(defcustom modus-operandi-theme-rainbow-org-src-blocks nil
  "Use color-coded backgrounds for `org-mode' source blocks.
The color in use depends on the language (send feedback to
include more languages)."
  :type 'boolean)

(defcustom modus-operandi-theme-org-blocks nil
  "Use a subtle gray or color-coded background for Org blocks.

Nil means that the block will have no background of its own and
will use the default that applies to the rest of the buffer.

Option `grayscale' (or `greyscale') will apply a subtle neutral
gray background to the block's contents.  It also affects the
begin and end lines of the block: their background will be
extended to the edge of the window for Emacs version >= 27 where
the ':extend' keyword is recognized by `set-face-attribute'.

Option `rainbow' will use an accented background for the contents
of the block.  The exact color will depend on the programming
language and is controlled by the `org-src-block-faces'
variable (refer to the theme's source code for the current
association list)."
  :type '(choice
          (const :tag "No Org block background (default)" nil)
          (const :tag "Subtle gray block background" grayscale)
          (const :tag "Subtle gray block background (alt spelling)" greyscale)
          (const :tag "Color-coded background per programming language" rainbow)))

(make-obsolete 'modus-operandi-theme-3d-modeline
               'modus-operandi-theme-mode-line
               "`modus-operandi-theme' 0.13.0")

(defcustom modus-operandi-theme-3d-modeline nil
  "Use a three-dimensional style for the active mode line."
  :type 'boolean)

(defcustom modus-operandi-theme-mode-line nil
  "Adjust the overall style of the mode line.

Nil is a two-dimensional rectangle with a border around it.  The
active and the inactive modelines use different shades of
greyscale values for the background and foreground.

A `3d' value will apply a three-dimensional effect to the active
modeline.  The inactive modelines remain two-dimensional and are
toned down a bit, relative to the nil value.

The `moody' option is meant to optimize the modeline for use with
the library of the same name.  This practically means to remove
the box effect and rely on underline and overline properties
instead.  It also tones down the inactive modelines.  Despite its
intended purpose, this option can also be used without the
`moody' library."
  :type '(choice
          (const :tag "Two-dimensional box (default)" nil)
          (const :tag "Three-dimensional style for the active mode line" 3d)
          (const :tag "No box effects, which are optimal for use with the `moody' library" moody)))

(make-obsolete 'modus-operandi-theme-subtle-diffs
               'modus-operandi-theme-diffs
               "`modus-operandi-theme' 0.13.0")

(defcustom modus-operandi-theme-subtle-diffs nil
  "Use fewer/dim backgrounds in `diff-mode', `ediff',`magit'."
  :type 'boolean)

(defcustom modus-operandi-theme-diffs nil
  "Adjust the overall styles of diffs.

Nil means to use fairly intense color combinations for diffs.
For example, you get a rich green background with a green
foreground for added lines.  Word-wise or 'refined' diffs follow
the same pattern but use different shades of those colors to
remain distinct.

A `desaturated' value follows the same principles as with the nil
option, while it tones down all relevant colors.

Option `fg-only' will remove all accented backgrounds, except
from word-wise changes.  It instead uses color-coded foreground
values to differentiate between added/removed/changed lines.  If
a background is necessary, such as with `ediff', then a subtle
greyscale value is used."
  :type '(choice
          (const :tag "Intensely colored backgrounds (default)" nil)
          (const :tag "Slightly accented backgrounds with tinted text" desaturated)
          (const :tag "No backgrounds, except for refined diffs" fg-only)))

(make-obsolete 'modus-operandi-theme-intense-standard-completions
               'modus-operandi-theme-completions
               "`modus-operandi-theme' 0.12.0")

(defcustom modus-operandi-theme-intense-standard-completions nil
  "Use prominent backgrounds for Icomplete, Ido, or similar."
  :type 'boolean)

(defcustom modus-operandi-theme-completions nil
  "Apply special styles to the UI of completion frameworks.

This concerns Icomplete, Ivy, Helm, Selectrum, Ido, as well as
any other tool meant to enhance their experience.  The effect
will vary depending on the completion framework.

Nil means to remain faithful to the metaphors that each UI
establishes.  For example, Icomplete and Ido only use foreground
colors to style their matches, whereas Ivy or Helm rely on an
aesthetic that combines colored backgrounds with appropriate text
color.

Option `moderate' will apply a combination of background and
foreground that is fairly subtle.  For Icomplete and the like,
this constitutes a departure from their standard style.  While
Ivy, Helm, and the others, will use less pronounced colors for
applicable contexts.

Option `opinionated' will apply color combinations that refashion
the completion UI.  So Icomplete et al will now use styles that
resemble the defaults of Ivy and co., while the latter group will
revert to an even more nuanced aesthetic."
  :type '(choice
          (const :tag "Respect the framework's established aesthetic (default)" nil)
          (const :tag "Subtle backgrounds for various elements" moderate)
          (const :tag "Radical alternative to the framework's looks" opinionated)))

(defcustom modus-operandi-theme-prompts nil
  "Use subtle or intense styles for minibuffer and REPL prompts.

Nil means to only use an accented foreground color.

Options `subtle' and `intense' will change both the background
and the foreground values.  The latter has a more pronounced
effect than the former."
  :type '(choice
          (const :tag "No prompt background (default)" nil)
          (const :tag "Subtle accented background for the prompt" subtle)
          (const :tag "Intense background and foreground for the prompt" intense)))

(defcustom modus-operandi-theme-intense-hl-line nil
  "Use a more prominent background for command `hl-line-mode'."
  :type 'boolean)

(defcustom modus-operandi-theme-intense-paren-match nil
  "Use a more prominent color for parenthesis matching."
  :type 'boolean)

(defcustom modus-operandi-theme-faint-syntax nil
  "Use less saturated colors for code syntax highlighting."
  :type 'boolean)

(make-obsolete 'modus-operandi-theme-no-link-underline
               'modus-operandi-theme-links
               "`modus-operandi-theme' 0.14.0")

(defcustom modus-operandi-theme-no-link-underline nil
  "Do not underline links."
  :type 'boolean)

(defcustom modus-operandi-theme-links nil
  "Set the style of links.

Nil means to use an underline that is the same color as the
foreground.

Option `faint' applies desaturated colors to the link's text and
underline.

Option `neutral-underline' applies a subtle grey underline, while
retaining the link's foreground.

Option `faint-neutral-underline' combines a desaturated text
color with a subtle grey underline.

Option `no-underline' removes link underlines altogether."
  :type '(choice
          (const :tag "Undeline link using the same color as the text (default)" nil)
          (const :tag "Like the default, but apply less intense colors to links" faint)
          (const :tag "Change the color of link underlines to a neutral grey" neutral-underline)
          (const :tag "Desaturated foreground with neutral grey underline" faint-neutral-underline)
          (const :tag "Remove underline property from links, keeping their foreground as-is" no-underline)))

(defcustom modus-operandi-theme-comments nil
  "Set the style of comments.

Nil means to use a neutral grey color.  Options `green' and
`yellow' apply a variant of the color they name."
  :type '(choice
          (const :tag "Use a subtle grey foreground for comments (default)" nil)
          (const :tag "Use a green foreground for comments" green)
          (const :tag "Use a yellow foreground for comments" yellow)))



;;; Internal functions

;; Helper functions that are meant to ease the implementation of the
;; above customization options.
(defun modus-operandi-theme-bold-weight ()
  "Conditional use of a heavier text weight."
  (when modus-operandi-theme-bold-constructs
    (list :inherit 'bold)))

(defun modus-operandi-theme-mixed-fonts ()
  "Conditional application of `fixed-pitch' inheritance."
  (unless modus-operandi-theme-no-mixed-fonts
    (list :inherit 'fixed-pitch)))

(defun modus-operandi-theme-slant ()
  "Conditional use of italics for slant attribute."
  (if modus-operandi-theme-slanted-constructs
      (list 'italic)
    (list 'normal)))

(defun modus-operandi-theme-variable-pitch ()
  "Conditional use of `variable-pitch' in headings."
  (when modus-operandi-theme-variable-pitch-headings
    (list :inherit 'variable-pitch)))

(defun modus-operandi-theme-fringe (mainbg subtlebg intensebg)
  "Conditional use of background colors for fringes.
MAINBG is the default.  SUBTLEBG should be a subtle greyscale
value.  INTENSEBG must be a more pronounced greyscale color."
  (pcase modus-operandi-theme-fringes
    ('intense (list :background intensebg))
    ('subtle (list :background subtlebg))
    (_ (list :background mainbg))))

(defun modus-operandi-theme-prompt (mainfg subtlebg subtlefg intensebg intensefg)
  "Conditional use of background colors for prompts.
MAINFG is the prompt's standard foreground.  SUBTLEBG should be a
subtle accented background that works with SUBTLEFG.  INTENSEBG
must be a more pronounced accented color that should be
combinable with INTENSEFG."
  (pcase modus-operandi-theme-prompts
    ('intense (list :background intensebg :foreground intensefg))
    ('subtle (list :background subtlebg :foreground subtlefg))
    (_ (list :background nil :foreground mainfg))))

(defun modus-operandi-theme-paren (normalbg intensebg)
  "Conditional use of intense colors for matching parentheses.
NORMALBG should the special palette color 'bg-paren-match' or
something similar.  INTENSEBG must be easier to discern next to
other backgrounds, such as the special palette color
'bg-paren-match-intense'."
  (if modus-operandi-theme-intense-paren-match
      (list :background intensebg)
    (list :background normalbg)))

(defun modus-operandi-theme-syntax-foreground (normal faint)
  "Apply foreground value to code syntax.
NORMAL is the more saturated color, which should be the default.
FAINT is the less saturated color."
  (if modus-operandi-theme-faint-syntax
      (list :foreground faint)
    (list :foreground normal)))

(defun modus-operandi-theme-heading-p (key)
  "Query style of KEY in `modus-operandi-theme-headings'."
  (cdr (assoc key modus-operandi-theme-headings)))

(defun modus-operandi-theme-heading (level fg fg-alt bg border)
  "Conditional styles for `modus-operandi-theme-headings'.

LEVEL is the heading's position in their order.  FG is the
default text color.  FG-ALT is an accented, more saturated value
than the default.  BG is a nuanced, typically accented,
background that can work well with either of the foreground
values.  BORDER is a color value that combines well with the
background and alternative foreground."
  (let* ((key (modus-operandi-theme-heading-p `,level))
         (style (or key (modus-operandi-theme-heading-p t)))
         (var (if modus-operandi-theme-variable-pitch-headings
                  'variable-pitch
                'default)))
    (pcase style
      ('no-bold
       (list :inherit `,var :foreground fg))
      ('line
       (list :inherit `(bold ,var) :foreground fg :overline border))
      ('line-no-bold
       (list :inherit `,var :foreground fg :overline border))
      ('rainbow
       (list :inherit `(bold ,var) :foreground fg-alt))
      ('rainbow-no-bold
       (list :inherit `,var :foreground fg-alt))
      ('rainbow-line
       (list :inherit `(bold ,var) :foreground fg-alt :overline border))
      ('rainbow-line-no-bold
       (list :inherit `,var :foreground fg-alt :overline border))
      ('highlight
       (list :inherit `(bold ,var) :background bg :foreground fg))
      ('highlight-no-bold
       (list :inherit `,var :background bg :foreground fg))
      ('rainbow-highlight
       (list :inherit `(bold ,var) :background bg :foreground fg-alt))
      ('rainbow-highlight-no-bold
       (list :inherit `,var :background bg :foreground fg-alt))
      ('section
       (append
        (and (>= emacs-major-version 27) '(:extend t))
        (list :inherit `(bold ,var) :background bg :foreground fg :overline border)))
      ('section-no-bold
       (append
        (and (>= emacs-major-version 27) '(:extend t))
        (list :inherit `,var :background bg :foreground fg :overline border)))
      ('rainbow-section
       (append
        (and (>= emacs-major-version 27) '(:extend t))
        (list :inherit `(bold ,var) :background bg :foreground fg-alt :overline border)))
      ('rainbow-section-no-bold
       (append
        (and (>= emacs-major-version 27) '(:extend t))
        (list :inherit `,var :background bg :foreground fg-alt :overline border)))
      (_
       (list :inherit `(bold ,var) :foreground fg)))))

(defun modus-operandi-theme-org-block (bgblk)
  "Conditionally set the background of Org blocks.
BGBLK applies to a distinct neutral background.  Else blocks have
no background of their own (the default), so they look the same
as the rest of the buffer.

`modus-operandi-theme-org-blocks' also accepts a `rainbow' option
which is applied conditionally to `org-src-block-faces' (see the
theme's source code)."
  (if (or (eq modus-operandi-theme-org-blocks 'grayscale)
          (eq modus-operandi-theme-org-blocks 'greyscale))
      (append
       (and (>= emacs-major-version 27) '(:extend t))
       (list :background bgblk))
    (list :background nil)))

(defun modus-operandi-theme-org-block-delim (bgaccent fgaccent bg fg)
  "Conditionally set the styles of Org block delimiters.
BG, FG, BGACCENT, FGACCENT apply a background and foreground
color respectively.

The former pair is a greyscale combination that should be more
distinct than the background of the block.  It is applied to the
default styles or when `modus-operandi-theme-org-blocks' is set
to `greyscale'.

The latter pair should be more subtle than the background of the
block, as it is used when `modus-operandi-theme-org-blocks' is
set to `rainbow'."
  (pcase modus-operandi-theme-org-blocks
    ('grayscale (append (and (>= emacs-major-version 27) '(:extend t))
                        (list :background bg :foreground fg)))
    ('greyscale (append (and (>= emacs-major-version 27) '(:extend t))
                        (list :background bg :foreground fg)))
    ('rainbow (list :background bgaccent :foreground fgaccent))
    (_ (list :background bg :foreground fg))))

(defun modus-operandi-theme-mode-line-attrs
    (fg bg fg-alt bg-alt border border-3d &optional alt-style border-width fg-distant)
  "Color combinations for `modus-operandi-theme-mode-line'.

FG and BG are the default colors.  FG-ALT and BG-ALT are meant to
accommodate the options for a 3D modeline or a `moody' compliant
one.  BORDER applies to all permutations of the modeline, except
the three-dimensional effect, where BORDER-3D is used instead.

Optional ALT-STYLE applies an appropriate style to the mode
line's box property.

Optional BORDER-WIDTH specifies an integer for the width of the
rectangle that produces the box effect.

Optional FG-DISTANT should be close to the main background
values.  It is intended to be used as a distant-foreground
property."
  (pcase modus-operandi-theme-mode-line
    ('3d
     `(:background ,bg-alt :foreground ,fg-alt
                   :box (:line-width ,(or border-width 1)
                                     :color ,border-3d
                                     :style ,(and alt-style 'released-button))))
    ('moody
     `(:background ,bg-alt :foreground ,fg-alt :underline ,border :overline ,border
                   :distant-foreground ,fg-distant))
    (_
     `(:foreground ,fg :background ,bg :box ,border))))

(defun modus-operandi-theme-diff (fg-only-bg fg-only-fg mainbg mainfg altbg altfg)
  "Color combinations for `modus-operandi-theme-diffs'.

FG-ONLY-BG should be similar or the same as the main background.
FG-ONLY-FG should be a saturated accent value that can be
combined with the former.

MAINBG must be one of the dedicated backgrounds for diffs while
MAINFG must be the same for the foreground.

ALTBG needs to be a slightly accented background that is meant to
be combined with ALTFG.  Both must be less intense than MAINBG
and MAINFG respectively."
  (pcase modus-operandi-theme-diffs
    ('fg-only (list :background fg-only-bg :foreground fg-only-fg))
    ('desaturated (list :background altbg :foreground altfg))
    (_ (list :background mainbg :foreground mainfg))))

(defun modus-operandi-theme-standard-completions (mainfg subtlebg intensebg intensefg)
  "Combinations for `modus-operandi-theme-completions'.

MAINFG is an accented foreground value.  SUBTLEBG is an accented
background value that can be combined with MAINFG.  INTENSEBG and
INTENSEFG are accented colors that are designed to be used in
tandem.

These are intended for Icomplete, Ido, and related."
  (pcase modus-operandi-theme-completions
    ('opinionated (list :background intensebg :foreground intensefg))
    ('moderate (list :background subtlebg :foreground mainfg))
    (_ (list :foreground mainfg))))

(defun modus-operandi-theme-extra-completions (subtleface intenseface altface &optional altfg bold)
  "Combinations for `modus-operandi-theme-completions'.

SUBTLEFACE and INTENSEFACE are custom theme faces that combine a
background and foreground value.  The difference between the two
is a matter of degree.

ALTFACE is a combination of colors that represents a departure
from the UI's default aesthetics.  Optional ALTFG is meant to be
used in tandem with it.

Optional BOLD will apply a heavier weight to the text.

These are intended for Helm, Ivy, etc."
  (pcase modus-operandi-theme-completions
    ('opinionated (list :inherit (list altface bold)
                        :foreground (or altfg 'unspecified)))
    ('moderate (list :inherit (list subtleface bold)))
    (_ (list :inherit (list intenseface bold)))))

(defun modus-operandi-theme-link (fg fgfaint underline)
  "Conditional application of link styles.
FG is the link's default color for its text and underline
property.  FGFAINT is a desaturated color for the text and
underline.  UNDERLINE is a grey color only for the undeline."
  (pcase modus-operandi-theme-links
    ('faint (list :foreground fgfaint :underline t))
    ('neutral-underline (list :foreground fg :underline underline))
    ('faint-neutral-underline (list :foreground fgfaint :underline underline))
    ('no-underline (list :foreground fg :underline nil))
    (_ (list :foreground fg :underline t))))

(defun modus-operandi-theme-link-color (fg fgfaint)
  "Extends `modus-operandi-theme-link'.
FG is the main foreground.  FGFAINT is the desaturated one."
  (pcase modus-operandi-theme-links
    ('faint (list :foreground fgfaint))
    ('faint-neutral-underline (list :foreground fgfaint))
    (_ (list :foreground fg))))

(defun modus-operandi-theme-comment (green yellow neutral)
  "Apply `modus-operandi-theme-comments'.
GREEN, YELLOW are accented values that correspond to the named
color.  NEUTRAL is the default text color for comments and should
be a shade of grey."
  (pcase modus-operandi-theme-comments
    ('green (list :foreground green))
    ('yellow (list :foreground yellow))
    (_ (list :foreground neutral))))

(defun modus-operandi-theme-scale (amount)
  "Scale heading by AMOUNT.
AMOUNT is a customization option."
  (when modus-operandi-theme-scale-headings
    (list :height amount)))



;;; Color palette

;; Define color palette.  Each color must have a >= 7:1 contrast ratio
;; relative to the foreground/background color it is rendered against.
;;
;; The design of the color palette as a macro that maps it to faces is
;; adapted from zenbern-theme.el, last seen at commit 7dd7968:
;; https://github.com/bbatsov/zenburn-emacs
(eval-and-compile
  (defconst modus-operandi-theme-default-colors-alist
    '(;; base values
      ("bg-main" . "#ffffff") ("fg-main" . "#000000")
      ("bg-alt" . "#f0f0f0") ("fg-alt" . "#505050")
      ("bg-dim" . "#f8f8f8") ("fg-dim" . "#282828")
      ;; specifically for on/off states (e.g. `mode-line')
      ;;
      ;; must be combined with themselves
      ("bg-active" . "#d7d7d7") ("fg-active" . "#0a0a0a")
      ("bg-inactive" . "#efefef") ("fg-inactive" . "#404148")
      ;; special base values, used only for cases where the above
      ;; fg-* or bg-* cannot or should not be used (to avoid confusion)
      ;; must be combined with: {fg,bg}-{main,alt,dim}
      ("bg-special-cold" . "#dde3f4") ("fg-special-cold" . "#093060")
      ("bg-special-mild" . "#c4ede0") ("fg-special-mild" . "#184034")
      ("bg-special-warm" . "#f0e0d4") ("fg-special-warm" . "#5d3026")
      ("bg-special-calm" . "#f8ddea") ("fg-special-calm" . "#61284f")
      ;; styles for the main constructs
      ;;
      ;; must be combined with: `bg-main', `bg-alt', `bg-dim'
      ("red" . "#a60000") ("green" . "#005e00")
      ("yellow" . "#813e00") ("blue" . "#0031a9")
      ("magenta" . "#721045") ("cyan" . "#00538b")
      ;; styles for common, but still specialized constructs
      ;;
      ;; must be combined with: `bg-main', `bg-alt', `bg-dim'
      ("red-alt" . "#972500") ("green-alt" . "#315b00")
      ("yellow-alt" . "#70480f") ("blue-alt" . "#2544bb")
      ("magenta-alt" . "#8f0075") ("cyan-alt" . "#30517f")
      ;; same purpose as above, just slight differences
      ;;
      ;; must be combined with: `bg-main', `bg-alt', `bg-dim'
      ("red-alt-other" . "#a0132f") ("green-alt-other" . "#145c33")
      ("yellow-alt-other" . "#863927") ("blue-alt-other" . "#0000c0")
      ("magenta-alt-other" . "#5317ac") ("cyan-alt-other" . "#005a5f")
      ;; styles for desaturated foreground text, intended for use with
      ;; the `modus-operandi-theme-faint-syntax' option
      ;;
      ;; must be combined with: `bg-main', `bg-alt', `bg-dim'
      ("red-faint" . "#7f1010") ("green-faint" . "#104410")
      ("yellow-faint" . "#5f4400") ("blue-faint" . "#002f88")
      ("magenta-faint" . "#752f50") ("cyan-faint" . "#12506f")

      ("red-alt-faint" . "#702f00") ("green-alt-faint" . "#30440f")
      ("yellow-alt-faint" . "#5d5000") ("blue-alt-faint" . "#003f78")
      ("magenta-alt-faint" . "#702565") ("cyan-alt-faint" . "#354f6f")

      ("red-alt-other-faint" . "#7f002f") ("green-alt-other-faint" . "#0f443f")
      ("yellow-alt-other-faint" . "#5e3a20") ("blue-alt-other-faint" . "#1f0f6f")
      ("magenta-alt-other-faint" . "#5f3f7f") ("cyan-alt-other-faint" . "#2e584f")
      ;; styles for elements that should be very subtle, yet accented
      ;;
      ;; must be combined with: `bg-main', `bg-alt', `bg-dim' or any of
      ;; the "nuanced" backgrounds
      ("red-nuanced" . "#5f0000") ("green-nuanced" . "#004000")
      ("yellow-nuanced" . "#3f3000") ("blue-nuanced" . "#201f55")
      ("magenta-nuanced" . "#541f4f") ("cyan-nuanced" . "#0f3360")
      ;; styles for slightly accented background
      ;;
      ;; must be combined with any of the above foreground values
      ("red-nuanced-bg" . "#fff1f0") ("green-nuanced-bg" . "#ecf7ed")
      ("yellow-nuanced-bg" . "#fff3da") ("blue-nuanced-bg" . "#f3f3ff")
      ("magenta-nuanced-bg" . "#fdf0ff") ("cyan-nuanced-bg" . "#ebf6fa")
      ;; styles for elements that should draw attention to themselves
      ;;
      ;; must be combined with: `bg-main'
      ("red-intense" . "#b60000") ("green-intense" . "#006800")
      ("yellow-intense" . "#904200") ("blue-intense" . "#1111ee")
      ("magenta-intense" . "#7000e0") ("cyan-intense" . "#205b93")
      ;; styles for background elements that should be visible yet
      ;; subtle
      ;;
      ;; must be combined with: `fg-dim'
      ("red-subtle-bg" . "#f2b0a2") ("green-subtle-bg" . "#aecf90")
      ("yellow-subtle-bg" . "#e4c340") ("blue-subtle-bg" . "#b5d0ff")
      ("magenta-subtle-bg" . "#f0d3ff") ("cyan-subtle-bg" . "#c0efff")
      ;; styles for background elements that should be visible and
      ;; distinguishable
      ;;
      ;; must be combined with: `fg-main'
      ("red-intense-bg" . "#ff8892") ("green-intense-bg" . "#5ada88")
      ("yellow-intense-bg" . "#f5df23") ("blue-intense-bg" . "#6aaeff")
      ("magenta-intense-bg" . "#d5baff") ("cyan-intense-bg" . "#42cbd4")
      ;; styles for refined contexts where both the foreground and the
      ;; background need to have the same/similar hue
      ;;
      ;; must be combined with themselves OR the foregrounds can be
      ;; combined with any of the base backgrounds
      ("red-refine-bg" . "#ffcccc") ("red-refine-fg" . "#780000")
      ("green-refine-bg" . "#aceaac") ("green-refine-fg" . "#004c00")
      ("yellow-refine-bg" . "#fff29a") ("yellow-refine-fg" . "#604000")
      ("blue-refine-bg" . "#8ac7ff") ("blue-refine-fg" . "#002288")
      ("magenta-refine-bg" . "#ffccff") ("magenta-refine-fg" . "#770077")
      ("cyan-refine-bg" . "#8eecf4") ("cyan-refine-fg" . "#004850")
      ;; styles that are meant exclusively for the mode line
      ;;
      ;; must be combined with: `bg-active', `bg-inactive'
      ("red-active" . "#8a0000") ("green-active" . "#004c2e")
      ("yellow-active" . "#702d1f") ("blue-active" . "#0030b4")
      ("magenta-active" . "#5c2092") ("cyan-active" . "#003f8a")
      ;; styles that are meant exclusively for the fringes
      ;;
      ;; must be combined with `fg-main'
      ("red-fringe-bg" . "#f08290") ("green-fringe-bg" . "#62c86a")
      ("yellow-fringe-bg" . "#dbba3f") ("blue-fringe-bg" . "#82afff")
      ("magenta-fringe-bg" . "#e0a3ff") ("cyan-fringe-bg" . "#2fcddf")
      ;; styles reserved for specific faces
      ;;
      ;; `bg-hl-line' is between `bg-dim' and `bg-alt', so it should
      ;; work with all accents that cover those two, plus `bg-main'
      ;;
      ;; `bg-hl-alt' and `bg-hl-alt-intense' should only be used when no
      ;; other greyscale or fairly neutral background is available to
      ;; properly draw attention to a given construct
      ;;
      ;; `bg-header' is between `bg-active' and `bg-inactive', so it
      ;; can be combined with any of the "active" values, plus the
      ;; "special" and base foreground colors
      ;;
      ;; `bg-paren-match', `bg-paren-match-intense', `bg-region' and
      ;; `bg-tab-active' must be combined with `fg-main', while
      ;; `bg-tab-inactive' should be combined with `fg-dim'
      ;;
      ;; `bg-tab-bar' is only intended for the bar that holds the tabs and
      ;; can only be combined with `fg-main'
      ;;
      ;; `fg-tab-active' is meant to be combined with `bg-tab-active',
      ;; though only for styling special elements, such as underlining
      ;; the current tab
      ;;
      ;; `fg-escape-char-construct' and `fg-escape-char-backslash' can
      ;; be combined `bg-main', `bg-dim', `bg-alt'
      ;;
      ;; `fg-lang-error', `fg-lang-warning', `fg-lang-note' can be
      ;; combined with `bg-main', `bg-dim', `bg-alt'
      ;;
      ;; `fg-mark-sel', `fg-mark-del', `fg-mark-alt' can be combined
      ;; with `bg-main', `bg-dim', `bg-alt', `bg-hl-line'
      ;;
      ;; `fg-unfocused' must be combined with `fg-main'
      ;;
      ;; `fg-comment-green' and `fg-comment-yellow' can be combined with
      ;; `bg-main', `bg-dim', `bg-alt'
      ;;
      ;; the window divider colors apply to faces with just an fg value
      ;;
      ;; all pairs are combinable with themselves
      ("bg-hl-line" . "#f2eff3")
      ("bg-hl-line-intense" . "#e0e0e0")
      ("bg-hl-alt" . "#fbeee0")
      ("bg-hl-alt-intense" . "#e8dfd1")
      ("bg-paren-match" . "#e0af82")
      ("bg-paren-match-intense" . "#c488ff")
      ("bg-region" . "#bcbcbc")

      ("bg-tab-bar" . "#d5d5d5")
      ("bg-tab-active" . "#f6f6f6")
      ("bg-tab-inactive" . "#bdbdbd")
      ("fg-tab-active" . "#30169e")

      ("fg-escape-char-construct" . "#8b1030")
      ("fg-escape-char-backslash" . "#654d0f")

      ("fg-lang-error" . "#9f004f")
      ("fg-lang-warning" . "#604f0f")
      ("fg-lang-note" . "#4040ae")

      ("fg-window-divider-inner" . "#888888")
      ("fg-window-divider-outer" . "#585858")

      ("fg-unfocused" . "#56576d")

      ("fg-comment-green" . "#00581a")
      ("fg-comment-yellow" . "#5f4400")

      ("bg-header" . "#e5e5e5") ("fg-header" . "#2a2a2a")

      ("bg-whitespace" . "#fff8fc") ("fg-whitespace" . "#645060")

      ("bg-diff-heading" . "#b7c2dd") ("fg-diff-heading" . "#043355")
      ("bg-diff-added" . "#d4fad4") ("fg-diff-added" . "#004500")
      ("bg-diff-changed" . "#fcefcf") ("fg-diff-changed" . "#524200")
      ("bg-diff-removed" . "#ffe8ef") ("fg-diff-removed" . "#691616")

      ("bg-diff-refine-added" . "#94cf94") ("fg-diff-refine-added" . "#002a00")
      ("bg-diff-refine-changed" . "#cccf8f") ("fg-diff-refine-changed" . "#302010")
      ("bg-diff-refine-removed" . "#daa2b0") ("fg-diff-refine-removed" . "#400000")

      ("bg-diff-focus-added" . "#bbeabb") ("fg-diff-focus-added" . "#002c00")
      ("bg-diff-focus-changed" . "#ecdfbf") ("fg-diff-focus-changed" . "#392900")
      ("bg-diff-focus-removed" . "#efcbcf") ("fg-diff-focus-removed" . "#4a0000")

      ("bg-diff-neutral-0" . "#979797") ("fg-diff-neutral-0" . "#040404")
      ("bg-diff-neutral-1" . "#b0b0b0") ("fg-diff-neutral-1" . "#252525")
      ("bg-diff-neutral-2" . "#cccccc") ("fg-diff-neutral-2" . "#3a3a3a")

      ("bg-mark-sel" . "#a0f0cf") ("fg-mark-sel" . "#005040")
      ("bg-mark-del" . "#ffccbb") ("fg-mark-del" . "#840040")
      ("bg-mark-alt" . "#f5d88f") ("fg-mark-alt" . "#782900"))
    "The entire palette of `modus-operandi-theme'.
Each element has the form (NAME . HEX).")

  (defcustom modus-operandi-theme-override-colors-alist '()
    "Association list of palette color overrides.
Values can be mapped to variables, using the same syntax as the
one present in `modus-operandi-theme-default-colors-alist'.

This is only meant for do-it-yourself usage, with the
understanding that the user is responsible for the resulting
contrast ratio between new and existing colors."
    :type '(alist
            :key-type (string :tag "Name")
            :value-type (string :tag " Hex")))

  (defmacro modus-operandi-theme-with-color-variables (&rest body)
    "`let' bind all colors around BODY.
Also bind `class' to ((class color) (min-colors 89))."
    (declare (indent 0))
    `(let ((class '((class color) (min-colors 89)))
           ,@(mapcar (lambda (cons)
                       (list (intern (car cons)) (cdr cons)))
                     (append modus-operandi-theme-default-colors-alist
                             modus-operandi-theme-override-colors-alist)))
       ,@body)))



;;; Faces

(modus-operandi-theme-with-color-variables
  (custom-theme-set-faces
   'modus-operandi
;;;; custom faces
   ;; these bespoke faces are inherited by other constructs below
;;;;; subtle colored backgrounds
   `(modus-theme-subtle-red ((,class :background ,red-subtle-bg :foreground ,fg-dim)))
   `(modus-theme-subtle-green ((,class :background ,green-subtle-bg :foreground ,fg-dim)))
   `(modus-theme-subtle-yellow ((,class :background ,yellow-subtle-bg :foreground ,fg-dim)))
   `(modus-theme-subtle-blue ((,class :background ,blue-subtle-bg :foreground ,fg-dim)))
   `(modus-theme-subtle-magenta ((,class :background ,magenta-subtle-bg :foreground ,fg-dim)))
   `(modus-theme-subtle-cyan ((,class :background ,cyan-subtle-bg :foreground ,fg-dim)))
   `(modus-theme-subtle-neutral ((,class :background ,bg-inactive :foreground ,fg-inactive)))
;;;;; intense colored backgrounds
   `(modus-theme-intense-red ((,class :background ,red-intense-bg :foreground ,fg-main)))
   `(modus-theme-intense-green ((,class :background ,green-intense-bg :foreground ,fg-main)))
   `(modus-theme-intense-yellow ((,class :background ,yellow-intense-bg :foreground ,fg-main)))
   `(modus-theme-intense-blue ((,class :background ,blue-intense-bg :foreground ,fg-main)))
   `(modus-theme-intense-magenta ((,class :background ,magenta-intense-bg :foreground ,fg-main)))
   `(modus-theme-intense-cyan ((,class :background ,cyan-intense-bg :foreground ,fg-main)))
   `(modus-theme-intense-neutral ((,class :background ,bg-active :foreground ,fg-main)))
;;;;; refined background and foreground combinations
   ;; general purpose styles that use an accented foreground against an
   ;; accented background
   `(modus-theme-refine-red ((,class :background ,red-refine-bg :foreground ,red-refine-fg)))
   `(modus-theme-refine-green ((,class :background ,green-refine-bg :foreground ,green-refine-fg)))
   `(modus-theme-refine-yellow ((,class :background ,yellow-refine-bg :foreground ,yellow-refine-fg)))
   `(modus-theme-refine-blue ((,class :background ,blue-refine-bg :foreground ,blue-refine-fg)))
   `(modus-theme-refine-magenta ((,class :background ,magenta-refine-bg :foreground ,magenta-refine-fg)))
   `(modus-theme-refine-cyan ((,class :background ,cyan-refine-bg :foreground ,cyan-refine-fg)))
;;;;; "active" combinations, mostly for use on the mode line
   `(modus-theme-active-red ((,class :background ,red-active :foreground ,bg-active)))
   `(modus-theme-active-green ((,class :background ,green-active :foreground ,bg-active)))
   `(modus-theme-active-yellow ((,class :background ,yellow-active :foreground ,bg-active)))
   `(modus-theme-active-blue ((,class :background ,blue-active :foreground ,bg-active)))
   `(modus-theme-active-magenta ((,class :background ,magenta-active :foreground ,bg-active)))
   `(modus-theme-active-cyan ((,class :background ,cyan-active :foreground ,bg-active)))
;;;;; nuanced backgrounds
   ;; useful for adding an accented background that is suitable for all
   ;; main foreground colors (intended for use in Org source blocks)
   `(modus-theme-nuanced-red ((,class :background ,red-nuanced-bg
                                      ,@(and (>= emacs-major-version 27) '(:extend t)))))
   `(modus-theme-nuanced-green ((,class :background ,green-nuanced-bg
                                        ,@(and (>= emacs-major-version 27) '(:extend t)))))
   `(modus-theme-nuanced-yellow ((,class :background ,yellow-nuanced-bg
                                         ,@(and (>= emacs-major-version 27) '(:extend t)))))
   `(modus-theme-nuanced-blue ((,class :background ,blue-nuanced-bg
                                       ,@(and (>= emacs-major-version 27) '(:extend t)))))
   `(modus-theme-nuanced-magenta ((,class :background ,magenta-nuanced-bg
                                          ,@(and (>= emacs-major-version 27) '(:extend t)))))
   `(modus-theme-nuanced-cyan ((,class :background ,cyan-nuanced-bg
                                       ,@(and (>= emacs-major-version 27) '(:extend t)))))
;;;;; fringe-specific combinations
   `(modus-theme-fringe-red ((,class :background ,red-fringe-bg :foreground ,fg-main)))
   `(modus-theme-fringe-green ((,class :background ,green-fringe-bg :foreground ,fg-main)))
   `(modus-theme-fringe-yellow ((,class :background ,yellow-fringe-bg :foreground ,fg-main)))
   `(modus-theme-fringe-blue ((,class :background ,blue-fringe-bg :foreground ,fg-main)))
   `(modus-theme-fringe-magenta ((,class :background ,magenta-fringe-bg :foreground ,fg-main)))
   `(modus-theme-fringe-cyan ((,class :background ,cyan-fringe-bg :foreground ,fg-main)))
;;;;; special base values
   ;; these are closer to the grayscale than the accents defined above
   ;; and should only be used when the next closest alternative would be
   ;; a greyscale value than an accented one
   `(modus-theme-special-cold ((,class :background ,bg-special-cold :foreground ,fg-special-cold)))
   `(modus-theme-special-mild ((,class :background ,bg-special-mild :foreground ,fg-special-mild)))
   `(modus-theme-special-warm ((,class :background ,bg-special-warm :foreground ,fg-special-warm)))
   `(modus-theme-special-calm ((,class :background ,bg-special-calm :foreground ,fg-special-calm)))
;;;;; diff-specific combinations
   ;; intended for `diff-mode' or equivalent
   `(modus-theme-diff-added
     ((,class ,@(modus-operandi-theme-diff
                 bg-main green
                 bg-diff-focus-added fg-diff-focus-added
                 green-nuanced-bg fg-diff-added))))
   `(modus-theme-diff-changed
     ((,class ,@(modus-operandi-theme-diff
                 bg-main yellow
                 bg-diff-focus-changed fg-diff-focus-changed
                 yellow-nuanced-bg fg-diff-changed))))
   `(modus-theme-diff-removed
     ((,class ,@(modus-operandi-theme-diff
                 bg-main red
                 bg-diff-focus-removed fg-diff-focus-removed
                 red-nuanced-bg fg-diff-removed))))
   `(modus-theme-diff-refine-added
     ((,class ,@(modus-operandi-theme-diff
                 bg-diff-added fg-diff-added
                 bg-diff-refine-added fg-diff-refine-added
                 bg-diff-focus-added fg-diff-focus-added))))
   `(modus-theme-diff-refine-changed
     ((,class ,@(modus-operandi-theme-diff
                 bg-diff-changed fg-diff-changed
                 bg-diff-refine-changed fg-diff-refine-changed
                 bg-diff-focus-changed fg-diff-focus-changed))))
   `(modus-theme-diff-refine-removed
     ((,class ,@(modus-operandi-theme-diff
                 bg-diff-removed fg-diff-removed
                 bg-diff-refine-removed fg-diff-refine-removed
                 bg-diff-focus-removed fg-diff-focus-removed))))
   `(modus-theme-diff-focus-added
     ((,class ,@(modus-operandi-theme-diff
                 bg-dim green
                 bg-diff-focus-added fg-diff-focus-added
                 bg-diff-added fg-diff-added))))
   `(modus-theme-diff-focus-changed
     ((,class ,@(modus-operandi-theme-diff
                 bg-dim yellow
                 bg-diff-focus-changed fg-diff-focus-changed
                 bg-diff-changed fg-diff-changed))))
   `(modus-theme-diff-focus-removed
     ((,class ,@(modus-operandi-theme-diff
                 bg-dim red
                 bg-diff-focus-removed fg-diff-focus-removed
                 bg-diff-removed fg-diff-removed))))
   `(modus-theme-diff-heading
     ((,class ,@(modus-operandi-theme-diff
                 bg-alt blue-alt
                 bg-diff-heading fg-diff-heading
                 blue-nuanced-bg blue))))
;;;;; mark indicators
   ;; color combinations intended for Dired, Ibuffer, or equivalent
   `(modus-theme-pseudo-header ((,class :inherit bold :foreground ,fg-main)))
   `(modus-theme-mark-alt ((,class :inherit bold :background ,bg-mark-alt :foreground ,fg-mark-alt)))
   `(modus-theme-mark-del ((,class :inherit bold :background ,bg-mark-del :foreground ,fg-mark-del)))
   `(modus-theme-mark-sel ((,class :inherit bold :background ,bg-mark-sel :foreground ,fg-mark-sel)))
   `(modus-theme-mark-symbol ((,class :inherit bold :foreground ,blue-alt)))
;;;;; heading levels
   ;; styles for regular headings used in Org, Markdown, Info, etc.
   `(modus-theme-heading-1
     ((,class ,@(modus-operandi-theme-heading
                 1 fg-main magenta-alt-other magenta-nuanced-bg bg-region)
              ,@(modus-operandi-theme-scale modus-operandi-theme-scale-4))))
   `(modus-theme-heading-2
     ((,class ,@(modus-operandi-theme-heading
                 2 fg-special-warm magenta-alt red-nuanced-bg bg-region)
              ,@(modus-operandi-theme-scale modus-operandi-theme-scale-3))))
   `(modus-theme-heading-3
     ((,class ,@(modus-operandi-theme-heading
                 3 fg-special-cold blue blue-nuanced-bg bg-region)
              ,@(modus-operandi-theme-scale modus-operandi-theme-scale-2))))
   `(modus-theme-heading-4
     ((,class ,@(modus-operandi-theme-heading
                 4 fg-special-mild cyan cyan-nuanced-bg bg-region)
              ,@(modus-operandi-theme-scale modus-operandi-theme-scale-1))))
   `(modus-theme-heading-5
     ((,class ,@(modus-operandi-theme-heading
                 5 fg-special-calm green-alt-other green-nuanced-bg bg-region))))
   `(modus-theme-heading-6
     ((,class ,@(modus-operandi-theme-heading
                 6 yellow-nuanced yellow-alt-other yellow-nuanced-bg bg-region))))
   `(modus-theme-heading-7
     ((,class ,@(modus-operandi-theme-heading
                 7 red-nuanced red-alt red-nuanced-bg bg-region))))
   `(modus-theme-heading-8
     ((,class ,@(modus-operandi-theme-heading
                 8 fg-dim magenta bg-alt bg-region))))
;;;;; other custom faces
   `(modus-theme-bold ((,class ,@(modus-operandi-theme-bold-weight))))
   `(modus-theme-hl-line ((,class :background ,(if modus-operandi-theme-intense-hl-line
                                                   bg-hl-line-intense bg-hl-line)
                                  (and (>= emacs-major-version 27) '(:extend t)))))
   `(modus-theme-slant ((,class :inherit italic :slant ,@(modus-operandi-theme-slant))))
   `(modus-theme-variable-pitch ((,class ,@(modus-operandi-theme-variable-pitch))))
;;;; standard faces
;;;;; absolute essentials
   `(default ((,class :background ,bg-main :foreground ,fg-main)))
   `(cursor ((,class :background ,fg-main)))
   `(fringe ((,class ,@(modus-operandi-theme-fringe bg-main bg-inactive bg-active)
                     :foreground ,fg-main)))
   `(vertical-border ((,class :foreground ,fg-window-divider-inner)))
;;;;; basic and/or ungrouped styles
   ;; Modify the `bold' face to change the weight of all "bold" elements
   ;; defined by the theme.  You need a typeface that supports a
   ;; multitude of heavier weights than the regular one and then you
   ;; must specify the exact name of the one you wish to apply.  Example
   ;; for your init.el after loading the theme:
   ;;
   ;; (set-face-attribute 'bold nil :weight 'semibold)
   `(bold ((,class :weight bold)))
   `(bold-italic ((,class :inherit (bold italic))))
   `(buffer-menu-buffer ((,class :inherit bold)))
   `(comint-highlight-input ((,class :inherit bold)))
   `(comint-highlight-prompt ((,class :inherit modus-theme-bold
                                      ,@(modus-operandi-theme-prompt
                                         cyan
                                         blue-nuanced-bg blue-alt
                                         blue-refine-bg fg-main))))
   `(error ((,class :inherit bold :foreground ,red)))
   `(escape-glyph ((,class :foreground ,fg-escape-char-construct)))
   `(file-name-shadow ((,class :foreground ,fg-unfocused)))
   `(header-line ((,class :background ,bg-header :foreground ,fg-header)))
   `(header-line-highlight ((,class :inherit modus-theme-active-blue)))
   `(help-argument-name ((,class :inherit modus-theme-slant :foreground ,cyan)))
   `(homoglyph ((,class :foreground ,fg-escape-char-construct)))
   `(ibuffer-locked-buffer ((,class :foreground ,yellow-alt-other)))
   `(italic ((,class :slant italic)))
   `(nobreak-hyphen ((,class :foreground ,fg-escape-char-construct)))
   `(nobreak-space ((,class :foreground ,fg-escape-char-construct :underline t)))
   `(minibuffer-prompt ((,class ,@(modus-operandi-theme-prompt
                                   cyan-alt-other
                                   cyan-nuanced-bg cyan
                                   cyan-refine-bg fg-main))))
   `(mm-command-output ((,class :foreground ,red-alt-other)))
   `(mm-uu-extract ((,class :background ,bg-dim :foreground ,fg-special-mild)))
   `(next-error ((,class :inherit modus-theme-subtle-red)))
   `(rectangle-preview ((,class :inherit modus-theme-special-mild)))
   `(region ((,class :background ,bg-region :foreground ,fg-main)))
   `(secondary-selection ((,class :inherit modus-theme-special-cold)))
   `(shadow ((,class :foreground ,fg-alt)))
   `(success ((,class :inherit bold :foreground ,green)))
   `(trailing-whitespace ((,class :background ,red-intense-bg)))
   `(warning ((,class :inherit bold :foreground ,yellow)))
;;;;; buttons, links, widgets
   `(button ((,class ,@(modus-operandi-theme-link
                        blue-alt-other blue-alt-other-faint bg-region))))
   `(link ((,class :inherit button)))
   `(link-visited ((,class :inherit button
                           ,@(modus-operandi-theme-link-color
                              magenta-alt-other magenta-alt-other-faint))))
   `(tooltip ((,class :background ,bg-special-cold :foreground ,fg-main)))
   `(widget-button ((,class :inherit button)))
   `(widget-button-pressed ((,class :inherit button
                                    ,@(modus-operandi-theme-link-color
                                       magenta magenta-faint))))
   `(widget-documentation ((,class :foreground ,green)))
   `(widget-field ((,class :background ,bg-alt :foreground ,fg-dim)))
   `(widget-inactive ((,class :background ,bg-inactive :foreground ,fg-inactive)))
   `(widget-single-line-field ((,class :inherit widget-field)))
;;;;; ag
   `(ag-hit-face ((,class :foreground ,fg-special-cold)))
   `(ag-match-face ((,class :inherit modus-theme-special-calm)))
;;;;; alert
   `(alert-high-face ((,class :inherit bold :foreground ,red-alt)))
   `(alert-low-face ((,class :foreground ,fg-special-mild)))
   `(alert-moderate-face ((,class :inherit bold :foreground ,yellow)))
   `(alert-trivial-face ((,class :foreground ,fg-special-calm)))
   `(alert-urgent-face ((,class :inherit bold :foreground ,red-intense)))
;;;;; all-the-icons
   `(all-the-icons-blue ((,class :foreground ,blue)))
   `(all-the-icons-blue-alt ((,class :foreground ,blue-alt)))
   `(all-the-icons-cyan ((,class :foreground ,cyan)))
   `(all-the-icons-cyan-alt ((,class :foreground ,cyan-alt)))
   `(all-the-icons-dblue ((,class :foreground ,blue-alt-other)))
   `(all-the-icons-dcyan ((,class :foreground ,cyan-alt-other)))
   `(all-the-icons-dgreen ((,class :foreground ,green-alt-other)))
   `(all-the-icons-dired-dir-face ((,class :foreground ,blue)))
   `(all-the-icons-dmaroon ((,class :foreground ,magenta-alt-other)))
   `(all-the-icons-dorange ((,class :foreground ,red-alt-other)))
   `(all-the-icons-dpink ((,class :foreground ,magenta)))
   `(all-the-icons-dpurple ((,class :foreground ,magenta-alt)))
   `(all-the-icons-dred ((,class :foreground ,red)))
   `(all-the-icons-dsilver ((,class :foreground ,fg-special-cold)))
   `(all-the-icons-dyellow ((,class :foreground ,yellow)))
   `(all-the-icons-green ((,class :foreground ,green)))
   `(all-the-icons-lblue ((,class :foreground ,blue-refine-fg)))
   `(all-the-icons-lcyan ((,class :foreground ,cyan-refine-fg)))
   `(all-the-icons-lgreen ((,class :foreground ,green-refine-fg)))
   `(all-the-icons-lmaroon ((,class :foreground ,magenta-refine-fg)))
   `(all-the-icons-lorange ((,class :foreground ,red-refine-fg)))
   `(all-the-icons-lpink ((,class :foreground ,magenta-refine-fg)))
   `(all-the-icons-lpurple ((,class :foreground ,magenta-refine-fg)))
   `(all-the-icons-lred ((,class :foreground ,red-refine-fg)))
   `(all-the-icons-lsilver ((,class :foreground ,fg-special-cold)))
   `(all-the-icons-lyellow ((,class :foreground ,yellow-refine-fg)))
   `(all-the-icons-maroon ((,class :foreground ,magenta)))
   `(all-the-icons-orange ((,class :foreground ,red-alt)))
   `(all-the-icons-pink ((,class :foreground ,magenta)))
   `(all-the-icons-purple ((,class :foreground ,magenta-alt)))
   `(all-the-icons-purple-alt ((,class :foreground ,magenta-alt-other)))
   `(all-the-icons-red ((,class :foreground ,red)))
   `(all-the-icons-red-alt ((,class :foreground ,red-alt)))
   `(all-the-icons-silver ((,class :foreground ,fg-special-cold)))
   `(all-the-icons-yellow ((,class :foreground ,yellow)))
;;;;; annotate
   `(annotate-annotation ((,class :inherit modus-theme-subtle-blue)))
   `(annotate-annotation-secondary ((,class :inherit modus-theme-subtle-green)))
   `(annotate-highlight ((,class :background ,blue-nuanced-bg :underline ,blue-intense)))
   `(annotate-highlight-secondary ((,class :background ,green-nuanced-bg :underline ,green-intense)))
;;;;; anzu
   `(anzu-match-1 ((,class :inherit modus-theme-subtle-cyan)))
   `(anzu-match-2 ((,class :inherit modus-theme-subtle-green)))
   `(anzu-match-3 ((,class :inherit modus-theme-subtle-yellow)))
   `(anzu-mode-line ((,class :inherit bold :foreground ,green-active)))
   `(anzu-mode-line-no-match ((,class :inherit bold :foreground ,red-active)))
   `(anzu-replace-highlight ((,class :inherit modus-theme-refine-yellow :underline t)))
   `(anzu-replace-to ((,class :inherit (modus-theme-intense-green bold))))
;;;;; apropos
   `(apropos-function-button ((,class :inherit button
                                      ,@(modus-operandi-theme-link-color
                                         magenta-alt-other magenta-alt-other-faint))))
   `(apropos-keybinding ((,class :inherit bold :foreground ,cyan)))
   `(apropos-misc-button ((,class :inherit button
                                  ,@(modus-operandi-theme-link-color
                                     cyan-alt-other cyan-alt-other-faint))))
   `(apropos-property ((,class :inherit modus-theme-bold :foreground ,magenta-alt)))
   `(apropos-symbol ((,class :inherit modus-theme-bold :foreground ,blue-alt-other)))
   `(apropos-user-option-button ((,class :inherit button
                                         ,@(modus-operandi-theme-link-color
                                            green-alt-other green-alt-other-faint))))
   `(apropos-variable-button ((,class :inherit button
                                      ,@(modus-operandi-theme-link-color
                                         blue blue-faint))))
;;;;; apt-sources-list
   `(apt-sources-list-components ((,class :foreground ,cyan)))
   `(apt-sources-list-options ((,class :foreground ,yellow)))
   `(apt-sources-list-suite ((,class :foreground ,green)))
   `(apt-sources-list-type ((,class :foreground ,magenta)))
   `(apt-sources-list-uri ((,class :foreground ,blue)))
;;;;; artbollocks-mode
   `(artbollocks-face ((,class :foreground ,cyan-nuanced :underline ,fg-lang-note)))
   `(artbollocks-lexical-illusions-face ((,class :background ,bg-alt :foreground ,red-alt :underline t)))
   `(artbollocks-passive-voice-face ((,class :foreground ,yellow-nuanced :underline ,fg-lang-warning)))
   `(artbollocks-weasel-words-face ((,class :foreground ,red-nuanced :underline ,fg-lang-error)))
;;;;; auctex and Tex
   `(font-latex-bold-face ((,class :inherit bold :foreground ,fg-special-calm)))
   `(font-latex-doctex-documentation-face ((,class :inherit modus-theme-slant :foreground ,fg-special-cold)))
   `(font-latex-doctex-preprocessor-face ((,class :inherit modus-theme-bold :foreground ,red-alt-other)))
   `(font-latex-italic-face ((,class :inherit italic :foreground ,fg-special-calm)))
   `(font-latex-math-face ((,class :foreground ,cyan-alt-other)))
   `(font-latex-script-char-face ((,class :foreground ,cyan-alt-other)))
   `(font-latex-sectioning-0-face ((,class :inherit modus-theme-variable-pitch :foreground ,blue-nuanced)))
   `(font-latex-sectioning-1-face ((,class :inherit (bold modus-theme-variable-pitch) :foreground ,blue-nuanced)))
   `(font-latex-sectioning-2-face ((,class :inherit (bold modus-theme-variable-pitch) :foreground ,blue-nuanced)))
   `(font-latex-sectioning-3-face ((,class :inherit (bold modus-theme-variable-pitch) :foreground ,blue-nuanced)))
   `(font-latex-sectioning-4-face ((,class :inherit (bold modus-theme-variable-pitch) :foreground ,blue-nuanced)))
   `(font-latex-sectioning-5-face ((,class :inherit modus-theme-variable-pitch :foreground ,blue-nuanced)))
   `(font-latex-sedate-face ((,class :inherit modus-theme-bold :foreground ,magenta-alt-other)))
   `(font-latex-slide-title-face ((,class :inherit (bold modus-theme-variable-pitch) :foreground ,cyan-nuanced
                                          ,@(modus-operandi-theme-scale modus-operandi-theme-scale-4))))
   `(font-latex-string-face ((,class :foreground ,blue-alt)))
   `(font-latex-subscript-face ((,class :height 0.95)))
   `(font-latex-superscript-face ((,class :height 0.95)))
   `(font-latex-verbatim-face ((,class :background ,bg-dim :foreground ,fg-special-mild)))
   `(font-latex-warning-face ((,class :foreground ,yellow-alt-other)))
   `(tex-match ((,class :foreground ,blue-alt-other)))
   `(tex-verbatim ((,class :background ,bg-dim :foreground ,fg-special-mild)))
   `(texinfo-heading ((,class :foreground ,magenta)))
   `(TeX-error-description-error ((,class :inherit bold :foreground ,red)))
   `(TeX-error-description-help ((,class :foreground ,blue)))
   `(TeX-error-description-tex-said ((,class :foreground ,blue)))
   `(TeX-error-description-warning ((,class :inherit bold :foreground ,yellow)))
;;;;; auto-dim-other-buffers
   `(auto-dim-other-buffers-face ((,class :background ,bg-alt)))
;;;;; avy
   `(avy-background-face ((,class :background ,bg-dim :foreground ,fg-dim)))
   `(avy-goto-char-timer-face ((,class :inherit (modus-theme-intense-yellow bold))))
   `(avy-lead-face ((,class :inherit (modus-theme-intense-magenta bold))))
   `(avy-lead-face-0 ((,class :inherit (modus-theme-intense-blue bold))))
   `(avy-lead-face-1 ((,class :inherit (modus-theme-intense-red bold))))
   `(avy-lead-face-2 ((,class :inherit (modus-theme-intense-green bold))))
;;;;; aw (ace-window)
   `(aw-background-face ((,class :background ,bg-dim :foreground ,fg-dim)))
   `(aw-key-face ((,class :inherit bold :foreground ,blue-intense)))
   `(aw-leading-char-face ((,class :inherit bold :height 1.5 :background ,bg-main :foreground ,red-intense)))
   `(aw-minibuffer-leading-char-face ((,class :foreground ,magenta-active)))
   `(aw-mode-line-face ((,class :inherit bold)))
;;;;; awesome-tray
   `(awesome-tray-module-awesome-tab-face ((,class :inherit bold :foreground ,red-alt-other)))
   `(awesome-tray-module-battery-face ((,class :inherit bold :foreground ,cyan-alt-other)))
   `(awesome-tray-module-buffer-name-face ((,class :inherit bold :foreground ,yellow-alt-other)))
   `(awesome-tray-module-circe-face ((,class :inherit bold :foreground ,blue-alt)))
   `(awesome-tray-module-date-face ((,class :inherit bold :foreground ,fg-dim)))
   `(awesome-tray-module-evil-face ((,class :inherit bold :foreground ,green-alt)))
   `(awesome-tray-module-git-face ((,class :inherit bold :foreground ,magenta)))
   `(awesome-tray-module-last-command-face ((,class :inherit bold :foreground ,blue-alt-other)))
   `(awesome-tray-module-location-face ((,class :inherit bold :foreground ,yellow)))
   `(awesome-tray-module-mode-name-face ((,class :inherit bold :foreground ,green)))
   `(awesome-tray-module-parent-dir-face ((,class :inherit bold :foreground ,cyan)))
   `(awesome-tray-module-rvm-face ((,class :inherit bold :foreground ,magenta-alt-other)))
;;;;; binder
   `(binder-sidebar-highlight ((,class :inherit modus-theme-subtle-cyan)))
   `(binder-sidebar-marked ((,class :inherit modus-theme-mark-sel)))
   `(binder-sidebar-missing ((,class :inherit modus-theme-subtle-red)))
   `(binder-sidebar-tags ((,class :foreground ,cyan)))
;;;;; bm
   `(bm-face ((,class :inherit modus-theme-subtle-yellow
                      ,@(and (>= emacs-major-version 27) '(:extend t)))))
   `(bm-fringe-face ((,class :inherit modus-theme-fringe-yellow)))
   `(bm-fringe-persistent-face ((,class :inherit modus-theme-fringe-blue)))
   `(bm-persistent-face ((,class :inherit modus-theme-intense-blue
                                 ,@(and (>= emacs-major-version 27) '(:extend t)))))
;;;;; bongo
   `(bongo-album-title ((,class :foreground ,cyan-active)))
   `(bongo-artist ((,class :foreground ,magenta-active)))
   `(bongo-currently-playing-track ((,class :inherit bold)))
   `(bongo-elapsed-track-part ((,class :inherit modus-theme-subtle-magenta :underline t)))
   `(bongo-filled-seek-bar ((,class :background ,blue-subtle-bg :foreground ,fg-main)))
   `(bongo-marked-track ((,class :foreground ,fg-mark-alt)))
   `(bongo-marked-track-line ((,class :background ,bg-mark-alt)))
   `(bongo-played-track ((,class :foreground ,fg-unfocused :strike-through t)))
   `(bongo-track-length ((,class :foreground ,blue-alt-other)))
   `(bongo-track-title ((,class :foreground ,blue-active)))
   `(bongo-unfilled-seek-bar ((,class :background ,blue-nuanced-bg :foreground ,fg-main)))
;;;;; boon
   `(boon-modeline-cmd ((,class :inherit modus-theme-active-blue)))
   `(boon-modeline-ins ((,class :inherit modus-theme-active-red)))
   `(boon-modeline-off ((,class :inherit modus-theme-active-yellow)))
   `(boon-modeline-spc ((,class :inherit modus-theme-active-green)))
;;;;; breakpoint (built-in gdb-mi.el)
   `(breakpoint-disabled ((,class :foreground ,fg-alt)))
   `(breakpoint-enabled ((,class :inherit bold :foreground ,red)))
;;;;; buffer-expose
   `(buffer-expose-ace-char-face ((,class :inherit bold :foreground ,red-active)))
   `(buffer-expose-mode-line-face ((,class :foreground ,cyan-active)))
   `(buffer-expose-selected-face ((,class :inherit modus-theme-special-mild)))
;;;;; calendar and diary
   `(calendar-month-header ((,class :inherit bold :foreground ,fg-main)))
   `(calendar-today ((,class :underline t)))
   `(calendar-weekday-header ((,class :foreground ,fg-dim)))
   `(calendar-weekend-header ((,class :foreground ,fg-alt)))
   `(diary ((,class :foreground ,cyan-alt-other)))
   `(diary-anniversary ((,class :foreground ,red-alt-other)))
   `(diary-time ((,class :foreground ,blue-alt)))
   `(holiday ((,class :foreground ,magenta-alt)))
;;;;; calfw
   `(cfw:face-annotation ((,class :foreground ,fg-special-warm)))
   `(cfw:face-day-title ((,class :foreground ,fg-main)))
   `(cfw:face-default-content ((,class :foreground ,green-alt)))
   `(cfw:face-default-day ((,class :inherit (cfw:face-day-title bold))))
   `(cfw:face-disable ((,class :foreground ,fg-unfocused)))
   `(cfw:face-grid ((,class :foreground ,fg-window-divider-outer)))
   `(cfw:face-header ((,class :inherit bold :foreground ,fg-main)))
   `(cfw:face-holiday ((,class :foreground ,magenta-alt-other)))
   `(cfw:face-periods ((,class :foreground ,cyan-alt-other)))
   `(cfw:face-saturday ((,class :inherit bold :foreground ,cyan-alt-other)))
   `(cfw:face-select ((,class :inherit modus-theme-intense-blue)))
   `(cfw:face-sunday ((,class :inherit bold :foreground ,cyan-alt-other)))
   `(cfw:face-title ((,class :inherit modus-theme-variable-pitch
                             :foreground ,fg-special-cold
                             ,@(modus-operandi-theme-scale modus-operandi-theme-scale-5))))
   `(cfw:face-today ((,class :background ,bg-inactive)))
   `(cfw:face-today-title ((,class :background ,bg-active)))
   `(cfw:face-toolbar ((,class :background ,bg-alt :foreground ,bg-alt)))
   `(cfw:face-toolbar-button-off ((,class :foreground ,fg-alt)))
   `(cfw:face-toolbar-button-on ((,class :inherit bold :background ,blue-nuanced-bg
                                         :foreground ,blue-alt)))
;;;;; centaur-tabs
   `(centaur-tabs-active-bar-face ((,class :background ,fg-tab-active)))
   `(centaur-tabs-close-mouse-face ((,class :inherit bold :foreground ,red-active :underline t)))
   `(centaur-tabs-close-selected ((,class :inherit centaur-tabs-selected)))
   `(centaur-tabs-close-unselected ((,class :inherit centaur-tabs-unselected)))
   `(centaur-tabs-modified-marker-selected ((,class :inherit centaur-tabs-selected)))
   `(centaur-tabs-modified-marker-unselected ((,class :inherit centaur-tabs-unselected)))
   `(centaur-tabs-default ((,class :background ,bg-main :foreground ,bg-main)))
   `(centaur-tabs-selected ((,class :inherit bold :background ,bg-tab-active :foreground ,fg-main)))
   `(centaur-tabs-selected-modified ((,class :inherit italic :background ,bg-tab-active :foreground ,fg-main)))
   `(centaur-tabs-unselected ((,class :background ,bg-tab-inactive :foreground ,fg-dim)))
   `(centaur-tabs-unselected-modified ((,class :inherit italic :background ,bg-tab-inactive :foreground ,fg-dim)))
;;;;; change-log and log-view (`vc-print-log' and `vc-print-root-log')
   `(change-log-acknowledgment ((,class :foreground ,fg-alt)))
   `(change-log-conditionals ((,class :foreground ,magenta-alt)))
   `(change-log-date ((,class :foreground ,cyan-alt-other)))
   `(change-log-email ((,class :foreground ,cyan)))
   `(change-log-file ((,class :foreground ,blue)))
   `(change-log-function ((,class :foreground ,green-alt-other)))
   `(change-log-list ((,class :foreground ,magenta-alt-other)))
   `(change-log-name ((,class :foreground ,cyan)))
   `(log-edit-header ((,class :foreground ,fg-special-warm)))
   `(log-edit-summary ((,class :inherit bold :foreground ,cyan)))
   `(log-edit-unknown-header ((,class :foreground ,fg-alt)))
   `(log-view-file ((,class :inherit bold :foreground ,fg-special-cold)))
   `(log-view-message ((,class :foreground ,fg-alt)))
;;;;; cider
   `(cider-debug-code-overlay-face ((,class :background ,bg-alt)))
   `(cider-debug-prompt-face ((,class :foreground ,magenta-alt :underline t)))
   `(cider-deprecated-face ((,class :inherit modus-theme-refine-yellow)))
   `(cider-docview-emphasis-face ((,class :inherit italic :foreground ,fg-special-cold)))
   `(cider-docview-literal-face ((,class :foreground ,blue-alt)))
   `(cider-docview-strong-face ((,class :inherit bold :foreground ,fg-special-cold)))
   `(cider-docview-table-border-face ((,class :foreground ,fg-alt)))
   `(cider-enlightened-face ((,class :box (:line-width -1 :color ,yellow-alt :style nil) :background ,bg-dim)))
   `(cider-enlightened-local-face ((,class :inherit bold :foreground ,yellow-alt-other)))
   `(cider-error-highlight-face ((,class :foreground ,red :underline t)))
   `(cider-fragile-button-face ((,class :box (:line-width 3 :color ,fg-alt :style released-button) :foreground ,yellow)))
   `(cider-fringe-good-face ((,class :foreground ,green-active)))
   `(cider-instrumented-face ((,class :box (:line-width -1 :color ,red :style nil) :background ,bg-dim)))
   `(cider-reader-conditional-face ((,class :inherit italic :foreground ,fg-special-warm)))
   `(cider-repl-input-face ((,class :inherit bold)))
   `(cider-repl-prompt-face ((,class :foreground ,cyan-alt-other)))
   `(cider-repl-stderr-face ((,class :inherit bold :foreground ,red)))
   `(cider-repl-stdout-face ((,class :foreground ,blue)))
   `(cider-result-overlay-face ((,class :box (:line-width -1 :color ,blue :style nil) :background ,bg-dim)))
   `(cider-stacktrace-error-class-face ((,class :inherit bold :foreground ,red)))
   `(cider-stacktrace-error-message-face ((,class :inherit italic :foreground ,red-alt-other)))
   `(cider-stacktrace-face ((,class :foreground ,fg-main)))
   `(cider-stacktrace-filter-active-face ((,class :foreground ,cyan-alt :underline t)))
   `(cider-stacktrace-filter-inactive-face ((,class :foreground ,cyan-alt)))
   `(cider-stacktrace-fn-face ((,class :inherit bold :foreground ,fg-main)))
   `(cider-stacktrace-ns-face ((,class :inherit italic :foreground ,fg-alt)))
   `(cider-stacktrace-promoted-button-face ((,class :box (:line-width 3 :color ,fg-alt :style released-button) :foreground ,red)))
   `(cider-stacktrace-suppressed-button-face ((,class :box (:line-width 3 :color ,fg-alt :style pressed-button)
                                                      :background ,bg-alt :foreground ,fg-alt)))
   `(cider-test-error-face ((,class :inherit modus-theme-subtle-red)))
   `(cider-test-failure-face ((,class :inherit (modus-theme-intense-red bold))))
   `(cider-test-success-face ((,class :inherit modus-theme-intense-green)))
   `(cider-traced-face ((,class :box (:line-width -1 :color ,cyan :style nil) :background ,bg-dim)))
   `(cider-warning-highlight-face ((,class :foreground ,yellow :underline t)))
;;;;; circe (and lui)
   `(circe-fool-face ((,class :foreground ,fg-alt)))
   `(circe-highlight-nick-face ((,class :inherit bold :foreground ,blue)))
   `(circe-prompt-face ((,class :inherit bold :foreground ,cyan-alt-other)))
   `(circe-server-face ((,class :foreground ,fg-unfocused)))
   `(lui-button-face ((,class :inherit button)))
   `(lui-highlight-face ((,class :foreground ,magenta-alt)))
   `(lui-time-stamp-face ((,class :foreground ,blue-nuanced)))
;;;;; color-rg
   `(color-rg-font-lock-column-number ((,class :foreground ,magenta-alt-other)))
   `(color-rg-font-lock-command ((,class :inherit bold :foreground ,fg-main)))
   `(color-rg-font-lock-file ((,class :inherit bold :foreground ,fg-special-cold)))
   `(color-rg-font-lock-flash ((,class :inherit modus-theme-intense-blue)))
   `(color-rg-font-lock-function-location ((,class :inherit modus-theme-special-calm)))
   `(color-rg-font-lock-header-line-directory ((,class :foreground ,blue-active)))
   `(color-rg-font-lock-header-line-edit-mode ((,class :foreground ,magenta-active)))
   `(color-rg-font-lock-header-line-keyword ((,class :foreground ,green-active)))
   `(color-rg-font-lock-header-line-text ((,class :foreground ,fg-active)))
   `(color-rg-font-lock-line-number ((,class :foreground ,fg-special-warm)))
   `(color-rg-font-lock-mark-changed ((,class :inherit bold :foreground ,blue)))
   `(color-rg-font-lock-mark-deleted ((,class :inherit bold :foreground ,red)))
   `(color-rg-font-lock-match ((,class :inherit modus-theme-special-calm)))
   `(color-rg-font-lock-position-splitter ((,class :foreground ,fg-alt)))
;;;;; column-enforce-mode
   `(column-enforce-face ((,class :inherit modus-theme-refine-yellow)))
;;;;; company-mode
   `(company-echo-common ((,class :foreground ,magenta-alt-other)))
   `(company-preview ((,class :background ,bg-dim :foreground ,fg-dim)))
   `(company-preview-common ((,class :foreground ,blue-alt)))
   `(company-preview-search ((,class :inherit modus-theme-special-calm)))
   `(company-scrollbar-bg ((,class :background ,bg-active)))
   `(company-scrollbar-fg ((,class :background ,fg-active)))
   `(company-template-field ((,class :inherit modus-theme-intense-magenta)))
   `(company-tooltip ((,class :background ,bg-alt :foreground ,fg-alt)))
   `(company-tooltip-annotation ((,class :inherit modus-theme-slant :foreground ,fg-special-cold)))
   `(company-tooltip-annotation-selection ((,class :inherit bold :foreground ,fg-main)))
   `(company-tooltip-common ((,class :inherit bold :foreground ,blue-alt)))
   `(company-tooltip-common-selection ((,class :foreground ,fg-main)))
   `(company-tooltip-mouse ((,class :inherit modus-theme-intense-blue)))
   `(company-tooltip-search ((,class :inherit (modus-theme-refine-cyan bold))))
   `(company-tooltip-search-selection ((,class :inherit (modus-theme-intense-green bold) :underline t)))
   `(company-tooltip-selection ((,class :inherit (modus-theme-subtle-cyan bold))))
;;;;; company-posframe
   `(company-posframe-active-backend-name ((,class :inherit bold :background ,bg-active :foreground ,blue-active)))
   `(company-posframe-inactive-backend-name ((,class :background ,bg-active :foreground ,fg-active)))
   `(company-posframe-metadata ((,class :background ,bg-inactive :foreground ,fg-inactive)))
;;;;; compilation feedback
   `(compilation-column-number ((,class :foreground ,magenta-alt-other)))
   `(compilation-error ((,class :inherit modus-theme-bold :foreground ,red)))
   `(compilation-info ((,class :foreground ,fg-special-cold)))
   `(compilation-line-number ((,class :foreground ,fg-special-warm)))
   `(compilation-mode-line-exit ((,class :inherit modus-theme-bold :foreground ,blue-active)))
   `(compilation-mode-line-fail ((,class :inherit modus-theme-bold :foreground ,red-active)))
   `(compilation-mode-line-run ((,class :inherit modus-theme-bold :foreground ,magenta-active)))
   `(compilation-warning ((,class :inherit modus-theme-bold :foreground ,yellow)))
;;;;; completions
   `(completions-annotations ((,class :inherit modus-theme-slant :foreground ,fg-special-cold)))
   `(completions-common-part ((,class ,@(modus-operandi-theme-standard-completions
                                         blue-alt blue-nuanced-bg
                                         cyan-refine-bg cyan-refine-fg))))
   `(completions-first-difference ((,class :inherit bold
                                           ,@(modus-operandi-theme-standard-completions
                                              magenta-alt blue-nuanced-bg
                                              magenta-intense-bg fg-main))))
;;;;; counsel
   `(counsel-active-mode ((,class :foreground ,magenta-alt-other)))
   `(counsel-application-name ((,class :foreground ,red-alt-other)))
   `(counsel-key-binding ((,class :inherit bold :foreground ,blue-alt-other)))
   `(counsel-outline-1 ((,class :inherit outline-1)))
   `(counsel-outline-2 ((,class :inherit outline-2)))
   `(counsel-outline-3 ((,class :inherit outline-3)))
   `(counsel-outline-4 ((,class :inherit outline-4)))
   `(counsel-outline-5 ((,class :inherit outline-5)))
   `(counsel-outline-6 ((,class :inherit outline-6)))
   `(counsel-outline-7 ((,class :inherit outline-7)))
   `(counsel-outline-8 ((,class :inherit outline-8)))
   `(counsel-outline-default ((,class :inherit bold :foreground ,green-alt-other)))
   `(counsel-variable-documentation ((,class :inherit modus-theme-slant :foreground ,yellow-alt-other)))
;;;;; counsel-css
   `(counsel-css-selector-depth-face-1 ((,class :foreground ,blue)))
   `(counsel-css-selector-depth-face-2 ((,class :foreground ,cyan)))
   `(counsel-css-selector-depth-face-3 ((,class :foreground ,green)))
   `(counsel-css-selector-depth-face-4 ((,class :foreground ,yellow)))
   `(counsel-css-selector-depth-face-5 ((,class :foreground ,magenta)))
   `(counsel-css-selector-depth-face-6 ((,class :foreground ,red)))
;;;;; counsel-notmuch
   `(counsel-notmuch-count-face ((,class :foreground ,cyan)))
   `(counsel-notmuch-date-face ((,class :foreground ,blue)))
   `(counsel-notmuch-people-face ((,class :foreground ,magenta)))
   `(counsel-notmuch-subject-face ((,class :foreground ,magenta-alt-other)))
;;;;; counsel-org-capture-string
   `(counsel-org-capture-string-template-body-face ((,class :foreground ,fg-special-cold)))
;;;;; cov
   `(cov-coverage-not-run-face ((,class :foreground ,red-intense)))
   `(cov-coverage-run-face ((,class :foreground ,green-intense)))
   `(cov-heavy-face ((,class :foreground ,magenta-intense)))
   `(cov-light-face ((,class :foreground ,blue-intense)))
   `(cov-med-face ((,class :foreground ,yellow-intense)))
   `(cov-none-face ((,class :foreground ,cyan-intense)))
;;;;; cperl-mode
   `(cperl-nonoverridable-face ((,class :foreground ,yellow-alt-other)))
   `(cperl-array-face ((,class :inherit bold :background ,bg-alt :foreground ,magenta-alt)))
   `(cperl-hash-face ((,class :inherit (bold modus-theme-slant) :background ,bg-alt :foreground ,red-alt)))
;;;;; csv-mode
   `(csv-separator-face ((,class :background ,bg-special-cold :foreground ,fg-main)))
;;;;; ctrlf
   `(ctrlf-highlight-active ((,class :inherit (modus-theme-intense-green bold))))
   `(ctrlf-highlight-line ((,class :inherit modus-theme-hl-line)))
   `(ctrlf-highlight-passive ((,class :inherit modus-theme-refine-cyan)))
;;;;; custom (M-x customize)
   `(custom-button ((,class :box (:line-width 2 :color nil :style released-button)
                            :background ,bg-active :foreground ,fg-main)))
   `(custom-button-mouse ((,class :box (:line-width 2 :color nil :style released-button)
                                  :background ,bg-active :foreground ,fg-active)))
   `(custom-button-pressed ((,class :box (:line-width 2 :color nil :style pressed-button)
                                    :background ,bg-active :foreground ,fg-main)))
   `(custom-changed ((,class :inherit modus-theme-subtle-cyan)))
   `(custom-comment ((,class :foreground ,fg-alt)))
   `(custom-comment-tag ((,class :background ,bg-alt :foreground ,yellow-alt-other)))
   `(custom-face-tag ((,class :inherit bold :foreground ,blue-intense)))
   `(custom-group-tag ((,class :inherit bold :foreground ,green-intense)))
   `(custom-group-tag-1 ((,class :inherit modus-theme-special-warm)))
   `(custom-invalid ((,class :inherit (modus-theme-intense-red bold))))
   `(custom-modified ((,class :inherit modus-theme-subtle-cyan)))
   `(custom-rogue ((,class :inherit modus-theme-refine-magenta)))
   `(custom-set ((,class :foreground ,blue-alt)))
   `(custom-state ((,class :foreground ,cyan-alt-other)))
   `(custom-themed ((,class :inherit modus-theme-subtle-blue)))
   `(custom-variable-tag ((,class :inherit bold :foreground ,cyan)))
;;;;; dap-mode
   `(dap-mouse-eval-thing-face ((,class :box (:line-width -1 :color ,blue-active :style nil)
                                        :background ,bg-active :foreground ,fg-main)))
   `(dap-result-overlay-face ((,class :box (:line-width -1 :color ,bg-active :style nil)
                                      :background ,bg-active :foreground ,fg-main)))
   `(dap-ui-breakpoint-verified-fringe ((,class :inherit bold :foreground ,green-active)))
   `(dap-ui-compile-errline ((,class :inherit bold :foreground ,red-intense)))
   `(dap-ui-locals-scope-face ((,class :inherit bold :foreground ,magenta :underline t)))
   `(dap-ui-locals-variable-face ((,class :inherit bold :foreground ,cyan)))
   `(dap-ui-locals-variable-leaf-face ((,class :inherit italic :foreground ,cyan-alt-other)))
   `(dap-ui-marker-face ((,class :inherit modus-theme-subtle-blue)))
   `(dap-ui-sessions-stack-frame-face ((,class :inherit bold :foreground ,magenta-alt)))
   `(dap-ui-sessions-terminated-active-face ((,class :inherit bold :foreground ,fg-alt)))
   `(dap-ui-sessions-terminated-face ((,class :foreground ,fg-alt)))
;;;;; dashboard (emacs-dashboard)
   `(dashboard-banner-logo-title ((,class :inherit bold :foreground ,fg-special-cold)))
   `(dashboard-footer ((,class :inherit bold :foreground ,fg-special-mild)))
   `(dashboard-heading ((,class :inherit bold :foreground ,fg-special-warm)))
   `(dashboard-navigator ((,class :foreground ,cyan-alt-other)))
   `(dashboard-text-banner ((,class :foreground ,fg-dim)))
;;;;; deadgrep
   `(deadgrep-filename-face ((,class :inherit bold :foreground ,fg-special-cold)))
   `(deadgrep-match-face ((,class :inherit modus-theme-special-calm)))
   `(deadgrep-meta-face ((,class :foreground ,fg-alt)))
   `(deadgrep-regexp-metachar-face ((,class :inherit bold :foreground ,yellow-intense)))
   `(deadgrep-search-term-face ((,class :inherit bold :foreground ,green-intense)))
;;;;; debbugs
   `(debbugs-gnu-archived ((,class :inverse-video t)))
   `(debbugs-gnu-done ((,class :foreground ,fg-alt)))
   `(debbugs-gnu-forwarded ((,class :foreground ,fg-special-warm)))
   `(debbugs-gnu-handled ((,class :foreground ,green)))
   `(debbugs-gnu-new ((,class :foreground ,red)))
   `(debbugs-gnu-pending ((,class :foreground ,cyan)))
   `(debbugs-gnu-stale-1 ((,class :foreground ,yellow-nuanced)))
   `(debbugs-gnu-stale-2 ((,class :foreground ,yellow)))
   `(debbugs-gnu-stale-3 ((,class :foreground ,yellow-alt)))
   `(debbugs-gnu-stale-4 ((,class :foreground ,yellow-alt-other)))
   `(debbugs-gnu-stale-5 ((,class :foreground ,red-alt)))
   `(debbugs-gnu-tagged ((,class :foreground ,magenta-alt)))
;;;;; define-word
   `(define-word-face-1 ((,class :foreground ,yellow)))
   `(define-word-face-2 ((,class :foreground ,fg-main)))
;;;;; deft
   `(deft-filter-string-error-face ((,class :inherit modus-theme-refine-red)))
   `(deft-filter-string-face ((,class :foreground ,green-intense)))
   `(deft-header-face ((,class :inherit bold :foreground ,fg-special-warm)))
   `(deft-separator-face ((,class :foreground ,fg-alt)))
   `(deft-summary-face ((,class :inherit modus-theme-slant :foreground ,fg-alt)))
   `(deft-time-face ((,class :foreground ,fg-special-cold)))
   `(deft-title-face ((,class :inherit bold :foreground ,fg-main)))
;;;;; dictionary
   `(dictionary-button-face ((,class :inherit bold :foreground ,fg-special-cold)))
   `(dictionary-reference-face ((,class :inherit button :foreground ,blue-alt-other)))
   `(dictionary-word-definition-face ((,class :foreground ,fg-main)))
   `(dictionary-word-entry-face ((,class :inherit modus-theme-slant :foreground ,fg-special-cold)))
;;;;; diff-hl
   `(diff-hl-change ((,class :inherit modus-theme-fringe-yellow)))
   `(diff-hl-delete ((,class :inherit modus-theme-fringe-red)))
   `(diff-hl-dired-change ((,class :inherit diff-hl-change)))
   `(diff-hl-dired-delete ((,class :inherit diff-hl-delete)))
   `(diff-hl-dired-ignored ((,class :inherit dired-ignored)))
   `(diff-hl-dired-insert ((,class :inherit diff-hl-insert)))
   `(diff-hl-dired-unknown ((,class :inherit dired-ignored)))
   `(diff-hl-insert ((,class :inherit modus-theme-fringe-green)))
   `(diff-hl-reverted-hunk-highlight ((,class :inherit (modus-theme-active-magenta bold))))
;;;;; diff-mode
   `(diff-added ((,class :inherit modus-theme-diff-added)))
   `(diff-changed ((,class :inherit modus-theme-diff-changed)))
   `(diff-context ((,class :foreground ,fg-unfocused)))
   `(diff-file-header ((,class :inherit bold :foreground ,blue)))
   `(diff-function ((,class :foreground ,fg-special-cold)))
   `(diff-header ((,class :foreground ,blue-nuanced)))
   `(diff-hunk-header ((,class :inherit modus-theme-diff-heading)))
   `(diff-index ((,class :inherit bold :foreground ,blue-alt)))
   `(diff-indicator-added ((,class :inherit diff-added)))
   `(diff-indicator-changed ((,class :inherit diff-changed)))
   `(diff-indicator-removed ((,class :inherit diff-removed)))
   `(diff-nonexistent ((,class :inherit (modus-theme-neutral bold))))
   `(diff-refine-added ((,class :inherit modus-theme-diff-refine-added)))
   `(diff-refine-changed ((,class :inherit modus-theme-diff-refine-changed)))
   `(diff-refine-removed ((,class :inherit modus-theme-diff-refine-removed)))
   `(diff-removed ((,class :inherit modus-theme-diff-removed)))
;;;;; dim-autoload
   `(dim-autoload-cookie-line ((,class :inherit font-lock-comment-face)))
;;;;; dir-treeview
   `(dir-treeview-archive-face ((,class :foreground ,fg-special-warm)))
   `(dir-treeview-archive-icon-face ((,class :inherit dir-treeview-default-icon-face :foreground ,yellow)))
   `(dir-treeview-audio-face ((,class :foreground ,magenta)))
   `(dir-treeview-audio-icon-face ((,class :inherit dir-treeview-default-icon-face :foreground ,magenta-alt)))
   `(dir-treeview-control-face ((,class :foreground ,fg-alt)))
   `(dir-treeview-control-mouse-face ((,class :inherit highlight)))
   `(dir-treeview-default-icon-face ((,class :inherit bold :family "Font Awesome" :foreground ,fg-alt)))
   `(dir-treeview-default-filename-face ((,class :foreground ,fg-main)))
   `(dir-treeview-directory-face ((,class :foreground ,blue)))
   `(dir-treeview-directory-icon-face ((,class :inherit dir-treeview-default-icon-face :foreground ,blue-alt)))
   `(dir-treeview-executable-face ((,class :foreground ,red-alt)))
   `(dir-treeview-executable-icon-face ((,class :inherit dir-treeview-default-icon-face :foreground ,red-alt-other)))
   `(dir-treeview-image-face ((,class :foreground ,green-alt-other)))
   `(dir-treeview-image-icon-face ((,class :inherit dir-treeview-default-icon-face :foreground ,green-alt)))
   `(dir-treeview-indent-face ((,class :foreground ,fg-alt)))
   `(dir-treeview-label-mouse-face ((,class :inherit highlight)))
   `(dir-treeview-start-dir-face ((,class :inherit modus-theme-pseudo-header)))
   `(dir-treeview-symlink-face ((,class :inherit button
                                        ,@(modus-operandi-theme-link-color
                                           cyan cyan-faint))))
   `(dir-treeview-video-face ((,class :foreground ,magenta-alt-other)))
   `(dir-treeview-video-icon-face ((,class :inherit dir-treeview-default-icon-face :foreground ,magenta-alt-other)))
;;;;; dired
   `(dired-directory ((,class :foreground ,blue)))
   `(dired-flagged ((,class :inherit modus-theme-mark-del)))
   `(dired-header ((,class :inherit modus-theme-pseudo-header)))
   `(dired-ignored ((,class :foreground ,fg-alt)))
   `(dired-mark ((,class :inherit modus-theme-mark-symbol)))
   `(dired-marked ((,class :inherit modus-theme-mark-sel)))
   `(dired-perm-write ((,class :foreground ,fg-special-warm)))
   `(dired-symlink ((,class :inherit button
                            ,@(modus-operandi-theme-link-color
                               cyan-alt cyan-alt-faint))))
   `(dired-warning ((,class :inherit bold :foreground ,yellow)))
;;;;; dired-async
   `(dired-async-failures ((,class :inherit modus-theme-bold :foreground ,red-active)))
   `(dired-async-message ((,class :inherit modus-theme-bold :foreground ,green-active)))
   `(dired-async-mode-message ((,class :inherit modus-theme-bold :foreground ,cyan-active)))
;;;;; dired-git
   `(dired-git-branch-else ((,class :inherit bold :foreground ,magenta-alt)))
   `(dired-git-branch-master ((,class :inherit bold :foreground ,magenta-alt-other)))
;;;;; dired-git-info
   `(dgi-commit-message-face ((,class :foreground ,fg-special-mild)))
;;;;; dired-narrow
   `(dired-narrow-blink ((,class :inherit (modus-theme-subtle-cyan bold))))
;;;;; dired-subtree
   ;; remove background from dired-subtree, else it breaks
   ;; dired-{flagged,marked} and any other face that sets a background
   ;; such as hl-line
   `(dired-subtree-depth-1-face ((,class :background nil)))
   `(dired-subtree-depth-2-face ((,class :background nil)))
   `(dired-subtree-depth-3-face ((,class :background nil)))
   `(dired-subtree-depth-4-face ((,class :background nil)))
   `(dired-subtree-depth-5-face ((,class :background nil)))
   `(dired-subtree-depth-6-face ((,class :background nil)))
;;;;; diredfl
   `(diredfl-autofile-name ((,class :inherit modus-theme-special-cold)))
   `(diredfl-compressed-file-name ((,class :foreground ,fg-special-warm)))
   `(diredfl-compressed-file-suffix ((,class :foreground ,red-alt)))
   `(diredfl-date-time ((,class :foreground ,cyan-alt-other)))
   `(diredfl-deletion ((,class :inherit modus-theme-mark-del)))
   `(diredfl-deletion-file-name ((,class :inherit modus-theme-mark-del)))
   `(diredfl-dir-heading ((,class :inherit modus-theme-pseudo-header)))
   `(diredfl-dir-name ((,class :inherit dired-directory)))
   `(diredfl-dir-priv ((,class :foreground ,blue-alt)))
   `(diredfl-exec-priv ((,class :foreground ,magenta)))
   `(diredfl-executable-tag ((,class :foreground ,magenta-alt)))
   `(diredfl-file-name ((,class :foreground ,fg-main)))
   `(diredfl-file-suffix ((,class :foreground ,cyan)))
   `(diredfl-flag-mark ((,class :inherit modus-theme-mark-sel)))
   `(diredfl-flag-mark-line ((,class :inherit modus-theme-mark-sel)))
   `(diredfl-ignored-file-name ((,class :foreground ,fg-alt)))
   `(diredfl-link-priv ((,class :foreground ,blue-alt-other)))
   `(diredfl-no-priv ((,class :foreground ,fg-alt)))
   `(diredfl-number ((,class :foreground ,cyan-alt)))
   `(diredfl-other-priv ((,class :foreground ,yellow)))
   `(diredfl-rare-priv ((,class :foreground ,red-alt)))
   `(diredfl-read-priv ((,class :foreground ,fg-main)))
   `(diredfl-symlink ((,class :inherit dired-symlink)))
   `(diredfl-tagged-autofile-name ((,class :inherit modus-theme-refine-magenta)))
   `(diredfl-write-priv ((,class :foreground ,cyan)))
;;;;; disk-usage
   `(disk-usage-children ((,class :foreground ,yellow)))
   `(disk-usage-inaccessible ((,class :inherit bold :foreground ,red)))
   `(disk-usage-percent ((,class :foreground ,green)))
   `(disk-usage-size ((,class :foreground ,cyan)))
   `(disk-usage-symlink ((,class :inherit button)))
   `(disk-usage-symlink-directory ((,class :inherit bold :foreground ,blue-alt)))
;;;;; doom-modeline
   `(doom-modeline-bar ((,class :inherit modus-theme-active-blue)))
   `(doom-modeline-bar-inactive ((,class :background ,fg-inactive :foreground ,bg-main)))
   `(doom-modeline-battery-charging ((,class :foreground ,green-active)))
   `(doom-modeline-battery-critical ((,class :inherit bold :foreground ,red-active)))
   `(doom-modeline-battery-error ((,class :inherit bold :box (:line-width -2)
                                          :foreground ,red-active)))
   `(doom-modeline-battery-full ((,class :foreground ,blue-active)))
   `(doom-modeline-battery-normal ((,class :foreground ,fg-active)))
   `(doom-modeline-battery-warning ((,class :inherit bold :foreground ,yellow-active)))
   `(doom-modeline-buffer-file ((,class :inherit bold :foreground ,fg-active)))
   `(doom-modeline-buffer-major-mode ((,class :inherit bold :foreground ,cyan-active)))
   `(doom-modeline-buffer-minor-mode ((,class :foreground ,fg-inactive)))
   `(doom-modeline-buffer-modified ((,class :inherit bold :foreground ,magenta-active)))
   `(doom-modeline-buffer-path ((,class :inherit bold :foreground ,fg-active)))
   `(doom-modeline-debug ((,class :inherit bold :foreground ,yellow-active)))
   `(doom-modeline-debug-visual ((,class :inherit bold :foreground ,red-active)))
   `(doom-modeline-evil-emacs-state ((,class :inherit bold :foreground ,magenta-active)))
   `(doom-modeline-evil-insert-state ((,class :inherit bold :foreground ,green-active)))
   `(doom-modeline-evil-motion-state ((,class :inherit bold :foreground ,fg-inactive)))
   `(doom-modeline-evil-normal-state ((,class :inherit bold :foreground ,fg-active)))
   `(doom-modeline-evil-operator-state ((,class :inherit bold :foreground ,blue-active)))
   `(doom-modeline-evil-replace-state ((,class :inherit bold :foreground ,red-active)))
   `(doom-modeline-evil-visual-state ((,class :inherit bold :foreground ,cyan-active)))
   `(doom-modeline-highlight ((,class :inherit bold :foreground ,blue-active)))
   `(doom-modeline-host ((,class :inherit italic)))
   `(doom-modeline-info ((,class :foreground ,green-active)))
   `(doom-modeline-lsp-error ((,class :inherit bold :foreground ,red-active)))
   `(doom-modeline-lsp-success ((,class :inherit bold :foreground ,green-active)))
   `(doom-modeline-lsp-warning ((,class :inherit bold :foreground ,yellow-active)))
   `(doom-modeline-panel ((,class :inherit modus-theme-active-blue)))
   `(doom-modeline-persp-buffer-not-in-persp ((,class :inherit italic :foreground ,yellow-active)))
   `(doom-modeline-persp-name ((,class :foreground ,fg-active)))
   `(doom-modeline-project-dir ((,class :inherit bold :foreground ,blue-active)))
   `(doom-modeline-project-parent-dir ((,class :foreground ,blue-active)))
   `(doom-modeline-project-root-dir ((,class :foreground ,fg-active)))
   `(doom-modeline-unread-number ((,class :inherit italic :foreground ,fg-active)))
   `(doom-modeline-urgent ((,class :inherit bold :foreground ,red-active)))
   `(doom-modeline-warning ((,class :inherit bold :foreground ,yellow-active)))
;;;;; dynamic-ruler
   `(dynamic-ruler-negative-face ((,class :inherit modus-theme-intense-neutral)))
   `(dynamic-ruler-positive-face ((,class :inherit modus-theme-intense-yellow)))
;;;;; easy-jekyll
   `(easy-jekyll-help-face ((,class :background ,bg-dim :foreground ,cyan-alt-other)))
;;;;; easy-kill
   `(easy-kill-origin ((,class :inherit modus-theme-subtle-red)))
   `(easy-kill-selection ((,class :inherit modus-theme-subtle-yellow)))
;;;;; ebdb
   `(ebdb-address-default ((,class :foreground ,fg-main)))
   `(ebdb-db-char ((,class :foreground ,fg-special-cold)))
   `(ebdb-defunct ((,class :foreground ,fg-alt)))
   `(ebdb-field-hidden ((,class :foreground ,magenta)))
   `(ebdb-field-url ((,class :foreground ,blue)))
   `(ebdb-label ((,class :foreground ,cyan-alt-other)))
   `(ebdb-mail-default ((,class :foreground ,fg-main)))
   `(ebdb-mail-primary ((,class :foreground ,blue-alt)))
   `(ebdb-marked ((,class :background ,cyan-intense-bg)))
   `(ebdb-organization-name ((,class :foreground ,fg-special-calm)))
   `(ebdb-person-name ((,class :foreground ,magenta-alt-other)))
   `(ebdb-phone-default ((,class :foreground ,fg-special-warm)))
   `(ebdb-role-defunct ((,class :foreground ,fg-alt)))
   `(eieio-custom-slot-tag-face ((,class :foreground ,red-alt)))
;;;;; ediff
   ;; NOTE: here we break from the pattern of inheriting from the
   ;; modus-theme-diff-* faces.
   `(ediff-current-diff-A ((,class ,@(modus-operandi-theme-diff
                                      bg-dim red
                                      bg-diff-removed fg-diff-removed
                                      red-nuanced-bg red-faint))))
   `(ediff-current-diff-Ancestor ((,class ,@(modus-operandi-theme-diff
                                             bg-dim fg-special-cold
                                             bg-special-cold fg-special-cold
                                             blue-nuanced-bg blue))))
   `(ediff-current-diff-B ((,class ,@(modus-operandi-theme-diff
                                      bg-dim green
                                      bg-diff-added fg-diff-added
                                      green-nuanced-bg green-faint))))
   `(ediff-current-diff-C ((,class ,@(modus-operandi-theme-diff
                                      bg-dim yellow
                                      bg-diff-changed fg-diff-changed
                                      yellow-nuanced-bg yellow-faint))))
   `(ediff-even-diff-A ((,class :background ,bg-diff-neutral-1 :foreground ,fg-diff-neutral-1)))
   `(ediff-even-diff-Ancestor ((,class :background ,bg-diff-neutral-2 :foreground ,fg-diff-neutral-1)))
   `(ediff-even-diff-B ((,class :background ,bg-diff-neutral-1 :foreground ,fg-diff-neutral-1)))
   `(ediff-even-diff-C ((,class :background ,bg-diff-neutral-2 :foreground ,fg-diff-neutral-2)))
   `(ediff-fine-diff-A ((,class :background ,bg-diff-focus-removed :foreground ,fg-diff-focus-removed)))
   `(ediff-fine-diff-Ancestor ((,class :inherit modus-theme-refine-cyan)))
   `(ediff-fine-diff-B ((,class :background ,bg-diff-focus-added :foreground ,fg-diff-focus-added)))
   `(ediff-fine-diff-C ((,class :background ,bg-diff-focus-changed :foreground ,fg-diff-focus-changed)))
   `(ediff-odd-diff-A ((,class :background ,bg-diff-neutral-2 :foreground ,fg-diff-neutral-2)))
   `(ediff-odd-diff-Ancestor ((,class :background ,bg-diff-neutral-0 :foreground ,fg-diff-neutral-0)))
   `(ediff-odd-diff-B ((,class :background ,bg-diff-neutral-2 :foreground ,fg-diff-neutral-2)))
   `(ediff-odd-diff-C ((,class :background ,bg-diff-neutral-1 :foreground ,fg-diff-neutral-1)))
;;;;; eglot
   `(eglot-mode-line ((,class :inherit modus-theme-bold :foreground ,magenta-active)))
;;;;; el-search
   `(el-search-highlight-in-prompt-face ((,class :inherit bold :foreground ,magenta-alt)))
   `(el-search-match ((,class :inherit modus-theme-intense-green)))
   `(el-search-other-match ((,class :inherit modus-theme-special-mild)))
   `(el-search-occur-match ((,class :inherit modus-theme-special-calm)))
;;;;; eldoc
   ;; NOTE: see https://github.com/purcell/package-lint/issues/187
   (list 'eldoc-highlight-function-argument `((,class :inherit bold :foreground ,blue-alt-other)))
;;;;; eldoc-box
   `(eldoc-box-body ((,class :background ,bg-alt :foreground ,fg-main)))
   `(eldoc-box-border ((,class :background ,fg-alt)))
;;;;; elfeed
   `(elfeed-log-date-face ((,class :foreground ,cyan-alt)))
   `(elfeed-log-debug-level-face ((,class :foreground ,magenta)))
   `(elfeed-log-error-level-face ((,class :foreground ,red)))
   `(elfeed-log-info-level-face ((,class :foreground ,green)))
   `(elfeed-log-warn-level-face ((,class :foreground ,yellow)))
   `(elfeed-search-date-face ((,class :foreground ,blue-nuanced)))
   `(elfeed-search-feed-face ((,class :foreground ,cyan)))
   `(elfeed-search-filter-face ((,class :inherit bold :foreground ,magenta-active)))
   `(elfeed-search-last-update-face ((,class :foreground ,cyan-active)))
   `(elfeed-search-tag-face ((,class :foreground ,blue-nuanced)))
   `(elfeed-search-title-face ((,class :foreground ,fg-dim)))
   `(elfeed-search-unread-count-face ((,class :foreground ,green-active)))
   `(elfeed-search-unread-title-face ((,class :inherit bold :foreground ,fg-main)))
;;;;; elfeed-score
   `(elfeed-score-date-face ((,class :foreground ,blue)))
   `(elfeed-score-debug-level-face ((,class :foreground ,magenta-alt-other)))
   `(elfeed-score-error-level-face ((,class :foreground ,red)))
   `(elfeed-score-info-level-face ((,class :foreground ,cyan)))
   `(elfeed-score-warn-level-face ((,class :foreground ,yellow)))
;;;;; emms
   `(emms-playlist-track-face ((,class :foreground ,blue)))
   `(emms-playlist-selected-face ((,class :inherit bold :foreground ,magenta)))
;;;;; enhanced-ruby-mode
   `(enh-ruby-heredoc-delimiter-face ((,class :foreground ,blue-alt-other)))
   `(enh-ruby-op-face ((,class :foreground ,fg-main)))
   `(enh-ruby-regexp-delimiter-face ((,class :foreground ,green)))
   `(enh-ruby-regexp-face ((,class :foreground ,magenta)))
   `(enh-ruby-string-delimiter-face ((,class :foreground ,blue-alt)))
   `(erm-syn-errline ((,class :foreground ,red :underline t)))
   `(erm-syn-warnline ((,class :foreground ,yellow :underline t)))
;;;;; epa
   `(epa-field-body ((,class :foreground ,fg-main)))
   `(epa-field-name ((,class :inherit bold :foreground ,fg-dim)))
   `(epa-mark ((,class :inherit bold :foreground ,magenta)))
   `(epa-string ((,class :foreground ,blue-alt)))
   `(epa-validity-disabled ((,class :inherit modus-theme-refine-red)))
   `(epa-validity-high ((,class :inherit bold :foreground ,green-alt-other)))
   `(epa-validity-low ((,class :foreground ,fg-alt)))
   `(epa-validity-medium ((,class :foreground ,green-alt)))
;;;;; equake
   `(equake-buffer-face ((,class :background ,bg-main :foreground ,fg-main)))
   `(equake-shell-type-eshell ((,class :background ,bg-inactive :foreground ,green-active)))
   `(equake-shell-type-rash ((,class :background ,bg-inactive :foreground ,red-active)))
   `(equake-shell-type-shell ((,class :background ,bg-inactive :foreground ,cyan-active)))
   `(equake-shell-type-term ((,class :background ,bg-inactive :foreground ,yellow-active)))
   `(equake-shell-type-vterm ((,class :background ,bg-inactive :foreground ,magenta-active)))
   `(equake-tab-active ((,class :background ,fg-alt :foreground ,bg-alt)))
   `(equake-tab-inactive ((,class :foreground ,fg-inactive)))
;;;;; erc
   `(erc-action-face ((,class :inherit bold :foreground ,cyan)))
   `(erc-bold-face ((,class :inherit bold)))
   `(erc-button ((,class :inherit button)))
   `(erc-command-indicator-face ((,class :inherit bold :foreground ,cyan-alt)))
   `(erc-current-nick-face ((,class :foreground ,magenta-alt-other)))
   `(erc-dangerous-host-face ((,class :inherit modus-theme-intense-red)))
   `(erc-direct-msg-face ((,class :foreground ,magenta)))
   `(erc-error-face ((,class :inherit bold :foreground ,red)))
   `(erc-fool-face ((,class :foreground ,fg-inactive)))
   `(erc-header-line ((,class :background ,bg-header :foreground ,fg-header)))
   `(erc-input-face ((,class :foreground ,fg-special-calm)))
   `(erc-inverse-face ((,class :inherit erc-default-face :inverse-video t)))
   `(erc-keyword-face ((,class :inherit bold :foreground ,magenta-alt)))
   `(erc-my-nick-face ((,class :inherit bold :foreground ,magenta)))
   `(erc-my-nick-prefix-face ((,class :inherit erc-my-nick-face)))
   `(erc-nick-default-face ((,class :inherit bold :foreground ,blue)))
   `(erc-nick-msg-face ((,class :inherit bold :foreground ,green)))
   `(erc-nick-prefix-face ((,class :inherit erc-nick-default-face)))
   `(erc-notice-face ((,class :foreground ,fg-unfocused)))
   `(erc-pal-face ((,class :inherit bold :foreground ,red-alt)))
   `(erc-prompt-face ((,class :inherit bold :foreground ,cyan-alt-other)))
   `(erc-timestamp-face ((,class :foreground ,blue-nuanced)))
   `(erc-underline-face ((,class :underline t)))
   `(bg:erc-color-face0 ((,class :background "white")))
   `(bg:erc-color-face1 ((,class :background "black")))
   `(bg:erc-color-face10 ((,class :background ,cyan-subtle-bg)))
   `(bg:erc-color-face11 ((,class :background ,cyan-intense-bg)))
   `(bg:erc-color-face12 ((,class :background ,blue-subtle-bg)))
   `(bg:erc-color-face13 ((,class :background ,magenta-subtle-bg)))
   `(bg:erc-color-face14 ((,class :background "gray60")))
   `(bg:erc-color-face15 ((,class :background "gray80")))
   `(bg:erc-color-face2 ((,class :background ,blue-intense-bg)))
   `(bg:erc-color-face3 ((,class :background ,green-intense-bg)))
   `(bg:erc-color-face4 ((,class :background ,red-subtle-bg)))
   `(bg:erc-color-face5 ((,class :background ,red-intense-bg)))
   `(bg:erc-color-face6 ((,class :background ,magenta-refine-bg)))
   `(bg:erc-color-face7 ((,class :background ,yellow-subtle-bg)))
   `(bg:erc-color-face8 ((,class :background ,yellow-refine-bg)))
   `(bg:erc-color-face9 ((,class :background ,green-subtle-bg)))
   `(fg:erc-color-face0 ((,class :foreground "white")))
   `(fg:erc-color-face1 ((,class :foreground "black")))
   `(fg:erc-color-face10 ((,class :foreground ,cyan)))
   `(fg:erc-color-face11 ((,class :foreground ,cyan-alt-other)))
   `(fg:erc-color-face12 ((,class :foreground ,blue)))
   `(fg:erc-color-face13 ((,class :foreground ,magenta-alt)))
   `(fg:erc-color-face14 ((,class :foreground "gray60")))
   `(fg:erc-color-face15 ((,class :foreground "gray80")))
   `(fg:erc-color-face2 ((,class :foreground ,blue-alt-other)))
   `(fg:erc-color-face3 ((,class :foreground ,green)))
   `(fg:erc-color-face4 ((,class :foreground ,red)))
   `(fg:erc-color-face5 ((,class :foreground ,red-alt)))
   `(fg:erc-color-face6 ((,class :foreground ,magenta-alt-other)))
   `(fg:erc-color-face7 ((,class :foreground ,yellow-alt-other)))
   `(fg:erc-color-face8 ((,class :foreground ,yellow-alt)))
   `(fg:erc-color-face9 ((,class :foreground ,green-alt-other)))
;;;;; eros
   `(eros-result-overlay-face ((,class :box (:line-width -1 :color ,blue)
                                       :background ,bg-dim :foreground ,fg-dim)))
;;;;; ert
   `(ert-test-result-expected ((,class :inherit modus-theme-intense-green)))
   `(ert-test-result-unexpected ((,class :inherit modus-theme-intense-red)))
;;;;; eshell
   `(eshell-ls-archive ((,class :inherit bold :foreground ,cyan-alt)))
   `(eshell-ls-backup ((,class :foreground ,yellow-alt)))
   `(eshell-ls-clutter ((,class :foreground ,red-alt)))
   `(eshell-ls-directory ((,class :inherit bold :foreground ,blue-alt)))
   `(eshell-ls-executable ((,class :foreground ,magenta-alt)))
   `(eshell-ls-missing ((,class :inherit modus-theme-intense-red)))
   `(eshell-ls-product ((,class :foreground ,fg-special-warm)))
   `(eshell-ls-readonly ((,class :foreground ,fg-special-cold)))
   `(eshell-ls-special ((,class :inherit bold :foreground ,magenta)))
   `(eshell-ls-symlink ((,class :inherit button
                                ,@(modus-operandi-theme-link-color
                                   cyan cyan-faint))))
   `(eshell-ls-unreadable ((,class :background ,bg-inactive :foreground ,fg-inactive)))
   `(eshell-prompt ((,class :inherit modus-theme-bold
                            ,@(modus-operandi-theme-prompt
                               green-alt-other
                               green-nuanced-bg green-alt
                               green-refine-bg fg-main))))
;;;;; eshell-fringe-status
   `(eshell-fringe-status-failure ((,class :foreground ,red)))
   `(eshell-fringe-status-success ((,class :foreground ,green)))
;;;;; eshell-git-prompt
   `(eshell-git-prompt-add-face ((,class :foreground ,fg-alt)))
   `(eshell-git-prompt-branch-face ((,class :foreground ,fg-alt)))
   `(eshell-git-prompt-directory-face ((,class :foreground ,cyan)))
   `(eshell-git-prompt-exit-fail-face ((,class :foreground ,red)))
   `(eshell-git-prompt-exit-success-face ((,class :foreground ,green)))
   `(eshell-git-prompt-modified-face ((,class :foreground ,yellow)))
   `(eshell-git-prompt-powerline-clean-face ((,class :background ,green-refine-bg)))
   `(eshell-git-prompt-powerline-dir-face ((,class :background ,blue-refine-bg)))
   `(eshell-git-prompt-powerline-not-clean-face ((,class :background ,magenta-refine-bg)))
   `(eshell-git-prompt-robyrussell-branch-face ((,class :foreground ,red)))
   `(eshell-git-prompt-robyrussell-git-dirty-face ((,class :foreground ,yellow)))
   `(eshell-git-prompt-robyrussell-git-face ((,class :foreground ,blue)))
;;;;; eshell-prompt-extras (epe)
   `(epe-dir-face ((,class :inherit modus-theme-bold :foreground ,blue)))
   `(epe-git-dir-face ((,class :foreground ,red-alt-other)))
   `(epe-git-face ((,class :foreground ,cyan-alt)))
   `(epe-pipeline-delimiter-face ((,class :foreground ,green-alt)))
   `(epe-pipeline-host-face ((,class :foreground ,blue)))
   `(epe-pipeline-time-face ((,class :foreground ,fg-special-warm)))
   `(epe-pipeline-user-face ((,class :foreground ,magenta)))
   `(epe-remote-face ((,class :inherit modus-theme-slant :foreground ,fg-alt)))
   `(epe-status-face ((,class :foreground ,magenta-alt-other)))
   `(epe-venv-face ((,class :inherit modus-theme-slant :foreground ,fg-alt)))
;;;;; eshell-syntax-highlighting
   `(eshell-syntax-highlighting-alias-face ((,class :foreground ,cyan)))
   `(eshell-syntax-highlighting-comment-face ((,class :foreground ,fg-alt)))
   `(eshell-syntax-highlighting-directory-face ((,class :foreground ,blue)))
   `(eshell-syntax-highlighting-envvar-face ((,class :foreground ,magenta-alt)))
   `(eshell-syntax-highlighting-invalid-face ((,class :foreground ,red)))
   `(eshell-syntax-highlighting-lisp-function-face ((,class :foreground ,magenta)))
   `(eshell-syntax-highlighting-shell-command-face ((,class :foreground ,cyan-alt-other)))
   `(eshell-syntax-highlighting-string-face ((,class :foreground ,blue-alt)))
;;;;; evil-mode
   `(evil-ex-commands ((,class :foreground ,magenta-alt-other)))
   `(evil-ex-info ((,class :foreground ,cyan-alt-other)))
   `(evil-ex-lazy-highlight ((,class :inherit modus-theme-refine-cyan)))
   `(evil-ex-search ((,class :inherit modus-theme-intense-green)))
   `(evil-ex-substitute-matches ((,class :inherit modus-theme-refine-yellow :underline t)))
   `(evil-ex-substitute-replacement ((,class :inherit (modus-theme-intense-green bold))))
;;;;; evil-goggles
   `(evil-goggles-change-face ((,class :inherit modus-theme-refine-yellow)))
   `(evil-goggles-commentary-face ((,class :inherit (modus-theme-subtle-neutral modus-theme-slant))))
   `(evil-goggles-default-face ((,class :inherit modus-theme-subtle-neutral)))
   `(evil-goggles-delete-face ((,class :inherit modus-theme-refine-red)))
   `(evil-goggles-fill-and-move-face ((,class :inherit evil-goggles-default-face)))
   `(evil-goggles-indent-face ((,class :inherit evil-goggles-default-face)))
   `(evil-goggles-join-face ((,class :inherit modus-theme-subtle-green)))
   `(evil-goggles-nerd-commenter-face ((,class :inherit evil-goggles-commentary-face)))
   `(evil-goggles-paste-face ((,class :inherit modus-theme-subtle-cyan)))
   `(evil-goggles-record-macro-face ((,class :inherit modus-theme-special-cold)))
   `(evil-goggles-replace-with-register-face ((,class :inherit modus-theme-refine-magenta)))
   `(evil-goggles-set-marker-face ((,class :inherit modus-theme-intense-magenta)))
   `(evil-goggles-shift-face ((,class :inherit evil-goggles-default-face)))
   `(evil-goggles-surround-face ((,class :inherit evil-goggles-default-face)))
   `(evil-goggles-yank-face ((,class :inherit modus-theme-subtle-blue)))
;;;;; evil-visual-mark-mode
   `(evil-visual-mark-face ((,class :inherit modus-theme-intense-magenta)))
;;;;; eww
   `(eww-invalid-certificate ((,class :foreground ,red-active)))
   `(eww-valid-certificate ((,class :foreground ,green-active)))
   `(eww-form-checkbox ((,class :box (:line-width 1 :color ,fg-inactive :style released-button) :background ,bg-inactive :foreground ,fg-main)))
   `(eww-form-file ((,class :box (:line-width 1 :color ,fg-inactive :style released-button) :background ,bg-active :foreground ,fg-main)))
   `(eww-form-select ((,class :inherit eww-form-checkbox)))
   `(eww-form-submit ((,class :inherit eww-form-file)))
   `(eww-form-text ((,class :box (:line-width 1 :color ,fg-inactive :style none) :background ,bg-active :foreground ,fg-active)))
   `(eww-form-textarea ((,class :background ,bg-alt :foreground ,fg-main)))
;;;;; eyebrowse
   `(eyebrowse-mode-line-active ((,class :inherit bold :foreground ,blue-active)))
;;;;; fancy-dabbrev
   `(fancy-dabbrev-menu-face ((,class :background ,bg-alt :foreground ,fg-alt)))
   `(fancy-dabbrev-preview-face ((,class :foreground ,fg-alt :underline t)))
   `(fancy-dabbrev-selection-face ((,class :inherit (modus-theme-intense-cyan bold))))
;;;;; flycheck
   `(flycheck-error
     ((,(append '((supports :underline (:style wave))) class)
       :underline (:color ,fg-lang-error :style wave))
      (,class :foreground ,fg-lang-error :underline t)))
   `(flycheck-error-list-checker-name ((,class :foreground ,magenta-active)))
   `(flycheck-error-list-column-number ((,class :foreground ,fg-special-cold)))
   `(flycheck-error-list-error ((,class :inherit modus-theme-bold :foreground ,red)))
   `(flycheck-error-list-filename ((,class :foreground ,blue)))
   `(flycheck-error-list-highlight ((,class :inherit modus-theme-hl-line)))
   `(flycheck-error-list-id ((,class :foreground ,magenta-alt-other)))
   `(flycheck-error-list-id-with-explainer ((,class :inherit flycheck-error-list-id :box t)))
   `(flycheck-error-list-info ((,class :foreground ,cyan)))
   `(flycheck-error-list-line-number ((,class :foreground ,fg-special-warm)))
   `(flycheck-error-list-warning ((,class :foreground ,yellow)))
   `(flycheck-fringe-error ((,class :inherit modus-theme-fringe-red)))
   `(flycheck-fringe-info ((,class :inherit modus-theme-fringe-cyan)))
   `(flycheck-fringe-warning ((,class :inherit modus-theme-fringe-yellow)))
   `(flycheck-info
     ((,(append '((supports :underline (:style wave))) class)
       :underline (:color ,fg-lang-note :style wave))
      (,class :foreground ,fg-lang-note :underline t)))
   `(flycheck-verify-select-checker ((,class :box (:line-width 1 :color nil :style released-button))))
   `(flycheck-warning
     ((,(append '((supports :underline (:style wave))) class)
       :underline (:color ,fg-lang-warning :style wave))
      (,class :foreground ,fg-lang-warning :underline t)))
;;;;; flycheck-color-mode-line
   `(flycheck-color-mode-line-error-face ((,class :inherit flycheck-fringe-error)))
   `(flycheck-color-mode-line-info-face ((,class :inherit flycheck-fringe-info)))
   `(flycheck-color-mode-line-running-face ((,class :inherit italic :foreground ,fg-inactive)))
   `(flycheck-color-mode-line-info-face ((,class :inherit flycheck-fringe-warning)))
;;;;; flycheck-indicator
   `(flycheck-indicator-disabled ((,class :inherit modus-theme-slant :foreground ,fg-inactive)))
   `(flycheck-indicator-error ((,class :inherit modus-theme-bold :foreground ,red-active)))
   `(flycheck-indicator-info ((,class :inherit modus-theme-bold :foreground ,blue-active)))
   `(flycheck-indicator-running ((,class :inherit modus-theme-bold :foreground ,magenta-active)))
   `(flycheck-indicator-success ((,class :inherit modus-theme-bold :foreground ,green-active)))
   `(flycheck-indicator-warning ((,class :inherit modus-theme-bold :foreground ,yellow-active)))
;;;;; flycheck-posframe
   `(flycheck-posframe-background-face ((,class :background ,bg-alt)))
   `(flycheck-posframe-border-face ((,class :foreground ,fg-alt)))
   `(flycheck-posframe-error-face ((,class :inherit bold :foreground ,red)))
   `(flycheck-posframe-face ((,class :inherit modus-theme-slant :foreground ,fg-main)))
   `(flycheck-posframe-info-face ((,class :inherit bold :foreground ,cyan)))
   `(flycheck-posframe-warning-face ((,class :inherit bold :foreground ,yellow)))
;;;;; flymake
   `(flymake-error
     ((,(append '((supports :underline (:style wave))) class)
       :underline (:color ,fg-lang-error :style wave))
      (,class :foreground ,fg-lang-error :underline t)))
   `(flymake-note
     ((,(append '((supports :underline (:style wave))) class)
       :underline (:color ,fg-lang-note :style wave))
      (,class :foreground ,fg-lang-note :underline t)))
   `(flymake-warning
     ((,(append '((supports :underline (:style wave))) class)
       :underline (:color ,fg-lang-warning :style wave))
      (,class :foreground ,fg-lang-warning :underline t)))
;;;;; flyspell
   `(flyspell-duplicate
     ((,(append '((supports :underline (:style wave))) class)
       :underline (:color ,fg-lang-warning :style wave))
      (,class :foreground ,fg-lang-warning :underline t)))
   `(flyspell-incorrect
     ((,(append '((supports :underline (:style wave))) class)
       :underline (:color ,fg-lang-error :style wave))
      (,class :foreground ,fg-lang-error :underline t)))
;;;;; flyspell-correct
   `(flyspell-correct-highlight-face ((,class :inherit modus-theme-refine-green)))
;;;;; flx
   `(flx-highlight-face ((,class ,@(modus-operandi-theme-extra-completions
                                    'modus-theme-subtle-magenta
                                    'modus-theme-intense-magenta
                                    'modus-theme-nuanced-magenta
                                    magenta-alt
                                    'bold))))
;;;;; freeze-it
   `(freeze-it-show ((,class :background ,bg-dim :foreground ,fg-special-warm)))
;;;;; frog-menu
   `(frog-menu-action-keybinding-face ((,class :foreground ,blue-alt-other)))
   `(frog-menu-actions-face ((,class :foreground ,magenta)))
   `(frog-menu-border ((,class :background ,bg-active)))
   `(frog-menu-candidates-face ((,class :foreground ,fg-main)))
   `(frog-menu-posframe-background-face ((,class :background ,bg-dim)))
   `(frog-menu-prompt-face ((,class :foreground ,cyan)))
;;;;; focus
   `(focus-unfocused ((,class :foreground ,fg-unfocused)))
;;;;; fold-this
   `(fold-this-overlay ((,class :inherit modus-theme-special-mild)))
;;;;; font-lock
   `(font-lock-builtin-face ((,class :inherit modus-theme-bold
                                     ,@(modus-operandi-theme-syntax-foreground
                                        magenta-alt magenta-alt-faint))))
   `(font-lock-comment-delimiter-face ((,class :inherit font-lock-comment-face)))
   `(font-lock-comment-face ((,class :inherit modus-theme-slant
                                     ,@(modus-operandi-theme-comment
                                        fg-comment-green fg-comment-yellow fg-alt))))
   `(font-lock-constant-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                         blue-alt-other blue-alt-other-faint))))
   `(font-lock-doc-face ((,class :inherit modus-theme-slant
                                 ,@(modus-operandi-theme-syntax-foreground
                                    fg-special-cold cyan-alt-other-faint))))
   `(font-lock-function-name-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                              magenta magenta-faint))))
   `(font-lock-keyword-face ((,class :inherit modus-theme-bold
                                     ,@(modus-operandi-theme-syntax-foreground
                                        magenta-alt-other magenta-alt-other-faint))))
   `(font-lock-negation-char-face ((,class :inherit modus-theme-bold
                                           ,@(modus-operandi-theme-syntax-foreground
                                              yellow yellow-faint))))
   `(font-lock-preprocessor-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                             red-alt-other red-alt-other-faint))))
   `(font-lock-regexp-grouping-backslash ((,class :inherit bold :foreground ,fg-escape-char-backslash)))
   `(font-lock-regexp-grouping-construct ((,class :inherit bold :foreground ,fg-escape-char-construct)))
   `(font-lock-string-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                       blue-alt blue-alt-faint))))
   `(font-lock-type-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                     magenta-alt magenta-alt-faint))))
   `(font-lock-variable-name-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                              cyan cyan-faint))))
   `(font-lock-warning-face ((,class :inherit modus-theme-bold
                                     ,@(modus-operandi-theme-syntax-foreground
                                        yellow-active yellow-alt-faint))))
;;;;; forge
   `(forge-post-author ((,class :inherit bold :foreground ,fg-main)))
   `(forge-post-date ((,class :foreground ,fg-special-cold)))
   `(forge-topic-closed ((,class :foreground ,fg-alt)))
   `(forge-topic-merged ((,class :foreground ,fg-alt)))
   `(forge-topic-open ((,class :foreground ,fg-special-mild)))
   `(forge-topic-unmerged ((,class :inherit modus-theme-slant :foreground ,magenta)))
   `(forge-topic-unread ((,class :inherit bold :foreground ,fg-main)))
;;;;; fountain-mode
   `(fountain-character ((,class :foreground ,blue-alt-other)))
   `(fountain-comment ((,class :inherit modus-theme-slant :foreground ,fg-alt)))
   `(fountain-dialog ((,class :foreground ,blue-alt)))
   `(fountain-metadata-key ((,class :foreground ,green-alt-other)))
   `(fountain-metadata-value ((,class :foreground ,blue)))
   `(fountain-non-printing ((,class :foreground ,fg-alt)))
   `(fountain-note ((,class :inherit modus-theme-slant :foreground ,yellow)))
   `(fountain-page-break ((,class :inherit bold :foreground ,red-alt)))
   `(fountain-page-number ((,class :inherit bold :foreground ,red-alt-other)))
   `(fountain-paren ((,class :foreground ,cyan)))
   `(fountain-scene-heading ((,class :inherit bold :foreground ,blue-nuanced)))
   `(fountain-section-heading ((,class :inherit modus-theme-heading-1)))
   `(fountain-section-heading-1 ((,class :inherit modus-theme-heading-1)))
   `(fountain-section-heading-2 ((,class :inherit modus-theme-heading-2)))
   `(fountain-section-heading-3 ((,class :inherit modus-theme-heading-3)))
   `(fountain-section-heading-4 ((,class :inherit modus-theme-heading-4)))
   `(fountain-section-heading-5 ((,class :inherit modus-theme-heading-5)))
   `(fountain-synopsis ((,class :foreground ,cyan-alt)))
   `(fountain-trans ((,class :foreground ,yellow-alt-other)))
;;;;; geiser
   `(geiser-font-lock-autodoc-current-arg ((,class ,@(modus-operandi-theme-syntax-foreground
                                                      magenta magenta-faint))))
   `(geiser-font-lock-autodoc-identifier ((,class ,@(modus-operandi-theme-syntax-foreground
                                                     blue blue-faint))))
   `(geiser-font-lock-doc-button ((,class ,@(modus-operandi-theme-syntax-foreground
                                             cyan-alt cyan-alt-faint)
                                          :underline t)))
   `(geiser-font-lock-doc-link ((,class :inherit button)))
   `(geiser-font-lock-error-link ((,class ,@(modus-operandi-theme-syntax-foreground
                                             red-alt red-alt-faint)
                                          :underline t)))
   `(geiser-font-lock-image-button ((,class ,@(modus-operandi-theme-syntax-foreground
                                               green-alt green-alt-faint)
                                            :underline t)))
   `(geiser-font-lock-repl-input ((,class :inherit bold)))
   `(geiser-font-lock-repl-output ((,class ,@(modus-operandi-theme-syntax-foreground
                                              magenta-alt-other magenta-alt-other-faint))))
   `(geiser-font-lock-repl-prompt ((,class ,@(modus-operandi-theme-syntax-foreground
                                              cyan-alt-other cyan-alt-other-faint))))
   `(geiser-font-lock-xref-header ((,class :inherit bold)))
   `(geiser-font-lock-xref-link ((,class :inherit button)))
;;;;; git-commit
   `(git-commit-comment-action ((,class :inherit font-lock-comment-face)))
   `(git-commit-comment-branch-local ((,class :inherit modus-theme-slant :foreground ,blue-alt)))
   `(git-commit-comment-branch-remote ((,class :inherit modus-theme-slant :foreground ,magenta-alt)))
   `(git-commit-comment-detached ((,class :inherit modus-theme-slant :foreground ,cyan-alt)))
   `(git-commit-comment-file ((,class :inherit modus-theme-slant
                                      ,@(modus-operandi-theme-comment
                                         cyan-nuanced red-nuanced fg-special-cold))))
   `(git-commit-comment-heading ((,class :inherit (bold modus-theme-slant)
                                         ,@(modus-operandi-theme-comment
                                            fg-special-mild fg-special-warm fg-dim))))
   `(git-commit-keyword ((,class :foreground ,magenta)))
   `(git-commit-known-pseudo-header ((,class :foreground ,cyan-alt-other)))
   `(git-commit-nonempty-second-line ((,class :inherit modus-theme-refine-yellow)))
   `(git-commit-overlong-summary ((,class :inherit modus-theme-refine-yellow)))
   `(git-commit-pseudo-header ((,class :foreground ,blue)))
   `(git-commit-summary ((,class :inherit bold :foreground ,cyan)))
;;;;; git-gutter
   `(git-gutter:added ((,class :inherit modus-theme-fringe-green)))
   `(git-gutter:deleted ((,class :inherit modus-theme-fringe-red)))
   `(git-gutter:modified ((,class :inherit modus-theme-fringe-yellow)))
   `(git-gutter:separator ((,class :inherit modus-theme-fringe-cyan)))
   `(git-gutter:unchanged ((,class :inherit modus-theme-fringe-magenta)))
;;;;; git-gutter-fr
   `(git-gutter-fr:added ((,class :inherit modus-theme-fringe-green)))
   `(git-gutter-fr:deleted ((,class :inherit modus-theme-fringe-red)))
   `(git-gutter-fr:modified ((,class :inherit modus-theme-fringe-yellow)))
;;;;; git-{gutter,fringe}+
   `(git-gutter+-added ((,class :inherit modus-theme-fringe-green)))
   `(git-gutter+-deleted ((,class :inherit modus-theme-fringe-red)))
   `(git-gutter+-modified ((,class :inherit modus-theme-fringe-yellow)))
   `(git-gutter+-separator ((,class :inherit modus-theme-fringe-cyan)))
   `(git-gutter+-unchanged ((,class :inherit modus-theme-fringe-magenta)))
   `(git-gutter-fr+-added ((,class :inherit modus-theme-fringe-green)))
   `(git-gutter-fr+-deleted ((,class :inherit modus-theme-fringe-red)))
   `(git-gutter-fr+-modified ((,class :inherit modus-theme-fringe-yellow)))
;;;;; git-lens
   `(git-lens-added ((,class :inherit bold :foreground ,green)))
   `(git-lens-deleted ((,class :inherit bold :foreground ,red)))
   `(git-lens-header ((,class :inherit bold :height 1.1 :foreground ,cyan)))
   `(git-lens-modified ((,class :inherit bold :foreground ,yellow)))
   `(git-lens-renamed ((,class :inherit bold :foreground ,magenta)))
;;;;; git-rebase
   `(git-rebase-comment-hash ((,class :inherit modus-theme-slant
                                      ,@(modus-operandi-theme-comment
                                         cyan-nuanced red-nuanced fg-special-cold))))
   `(git-rebase-comment-heading  ((,class :inherit (bold modus-theme-slant)
                                          ,@(modus-operandi-theme-comment
                                             fg-special-mild fg-special-warm fg-dim))))
   `(git-rebase-description ((,class :foreground ,fg-main)))
   `(git-rebase-hash ((,class :foreground ,cyan-alt-other)))
;;;;; git-timemachine
   `(git-timemachine-commit ((,class :inherit bold :foreground ,yellow-active)))
   `(git-timemachine-minibuffer-author-face ((,class :foreground ,fg-special-warm)))
   `(git-timemachine-minibuffer-detail-face ((,class :foreground ,red-alt)))
;;;;; git-walktree
   `(git-walktree-commit-face ((,class :foreground ,yellow)))
   `(git-walktree-symlink-face ((,class :inherit button)))
   `(git-walktree-tree-face ((,class :foreground ,magenta)))
;;;;; gnus
   `(gnus-button ((,class :inherit button)))
   `(gnus-cite-1 ((,class :foreground ,blue-alt)))
   `(gnus-cite-10 ((,class :foreground ,magenta-alt-other)))
   `(gnus-cite-11 ((,class :foreground ,yellow-alt-other)))
   `(gnus-cite-2 ((,class :foreground ,red-alt)))
   `(gnus-cite-3 ((,class :foreground ,green-alt)))
   `(gnus-cite-4 ((,class :foreground ,magenta-alt)))
   `(gnus-cite-5 ((,class :foreground ,yellow-alt)))
   `(gnus-cite-6 ((,class :foreground ,cyan-alt)))
   `(gnus-cite-7 ((,class :foreground ,blue-alt-other)))
   `(gnus-cite-8 ((,class :foreground ,red-alt-other)))
   `(gnus-cite-9 ((,class :foreground ,green-alt-other)))
   `(gnus-cite-attribution ((,class :inherit italic :foreground ,fg-main)))
   `(gnus-emphasis-bold ((,class :inherit bold)))
   `(gnus-emphasis-bold-italic ((,class :inherit bold-italic)))
   `(gnus-emphasis-highlight-words ((,class :inherit modus-theme-refine-yellow)))
   `(gnus-emphasis-italic ((,class :inherit italic)))
   `(gnus-emphasis-underline-bold ((,class :inherit gnus-emphasis-bold :underline t)))
   `(gnus-emphasis-underline-bold-italic ((,class :inherit gnus-emphasis-bold-italic :underline t)))
   `(gnus-emphasis-underline-italic ((,class :inherit gnus-emphasis-italic :underline t)))
   `(gnus-group-mail-1 ((,class :inherit bold :foreground ,magenta-alt)))
   `(gnus-group-mail-1-empty ((,class :foreground ,magenta-alt)))
   `(gnus-group-mail-2 ((,class :inherit bold :foreground ,magenta)))
   `(gnus-group-mail-2-empty ((,class :foreground ,magenta)))
   `(gnus-group-mail-3 ((,class :inherit bold :foreground ,magenta-alt-other)))
   `(gnus-group-mail-3-empty ((,class :foreground ,magenta-alt-other)))
   `(gnus-group-mail-low ((,class :inherit bold :foreground ,magenta-nuanced)))
   `(gnus-group-mail-low-empty ((,class :foreground ,magenta-nuanced)))
   `(gnus-group-news-1 ((,class :inherit bold :foreground ,green)))
   `(gnus-group-news-1-empty ((,class :foreground ,green)))
   `(gnus-group-news-2 ((,class :inherit bold :foreground ,cyan)))
   `(gnus-group-news-2-empty ((,class :foreground ,cyan)))
   `(gnus-group-news-3 ((,class :inherit bold :foreground ,yellow-nuanced)))
   `(gnus-group-news-3-empty ((,class :foreground ,yellow-nuanced)))
   `(gnus-group-news-4 ((,class :inherit bold :foreground ,cyan-nuanced)))
   `(gnus-group-news-4-empty ((,class :foreground ,cyan-nuanced)))
   `(gnus-group-news-5 ((,class :inherit bold :foreground ,red-nuanced)))
   `(gnus-group-news-5-empty ((,class :foreground ,red-nuanced)))
   `(gnus-group-news-6 ((,class :inherit bold :foreground ,fg-alt)))
   `(gnus-group-news-6-empty ((,class :foreground ,fg-alt)))
   `(gnus-group-news-low ((,class :inherit bold :foreground ,green-nuanced)))
   `(gnus-group-news-low-empty ((,class :foreground ,green-nuanced)))
   `(gnus-header-content ((,class :foreground ,cyan)))
   `(gnus-header-from ((,class :inherit bold :foreground ,cyan-alt-other :underline nil)))
   `(gnus-header-name ((,class :foreground ,green)))
   `(gnus-header-newsgroups ((,class :inherit bold :foreground ,blue-alt)))
   `(gnus-header-subject ((,class :inherit bold :foreground ,magenta-alt-other)))
   `(gnus-server-agent ((,class :inherit bold :foreground ,cyan)))
   `(gnus-server-closed ((,class :inherit bold :foreground ,magenta)))
   `(gnus-server-cloud ((,class :inherit bold :foreground ,cyan-alt)))
   `(gnus-server-cloud-host ((,class :inherit modus-theme-refine-cyan)))
   `(gnus-server-denied ((,class :inherit bold :foreground ,red)))
   `(gnus-server-offline ((,class :inherit bold :foreground ,yellow)))
   `(gnus-server-opened ((,class :inherit bold :foreground ,green)))
   `(gnus-signature ((,class :inherit italic :foreground ,fg-special-cold)))
   `(gnus-splash ((,class :foreground ,fg-alt)))
   `(gnus-summary-cancelled ((,class :inherit modus-theme-mark-alt)))
   `(gnus-summary-high-ancient ((,class :inherit bold :foreground ,fg-alt)))
   `(gnus-summary-high-read ((,class :inherit bold :foreground ,fg-special-cold)))
   `(gnus-summary-high-ticked ((,class :inherit bold :foreground ,red-alt-other)))
   `(gnus-summary-high-undownloaded ((,class :inherit bold :foreground ,yellow)))
   `(gnus-summary-high-unread ((,class :inherit bold :foreground ,fg-main)))
   `(gnus-summary-low-ancient ((,class :inherit italic :foreground ,fg-alt)))
   `(gnus-summary-low-read ((,class :inherit italic :foreground ,fg-alt)))
   `(gnus-summary-low-ticked ((,class :inherit italic :foreground ,red-refine-fg)))
   `(gnus-summary-low-undownloaded ((,class :inherit italic :foreground ,yellow-refine-fg)))
   `(gnus-summary-low-unread ((,class :inherit bold :foreground ,fg-special-cold)))
   `(gnus-summary-normal-ancient ((,class :foreground ,fg-special-calm)))
   `(gnus-summary-normal-read ((,class :foreground ,fg-alt)))
   `(gnus-summary-normal-ticked ((,class :foreground ,red-alt-other)))
   `(gnus-summary-normal-undownloaded ((,class :foreground ,yellow)))
   `(gnus-summary-normal-unread ((,class :foreground ,fg-main)))
   `(gnus-summary-selected ((,class :inherit modus-theme-subtle-blue)))
;;;;; golden-ratio-scroll-screen
   `(golden-ratio-scroll-highlight-line-face ((,class :background ,cyan-subtle-bg :foreground ,fg-main)))
;;;;; helm
   `(helm-M-x-key ((,class :inherit bold :foreground ,magenta-alt-other)))
   `(helm-action ((,class :underline t)))
   `(helm-bookmark-addressbook ((,class :foreground ,green-alt)))
   `(helm-bookmark-directory ((,class :inherit bold :foreground ,blue)))
   `(helm-bookmark-file ((,class :foreground ,fg-main)))
   `(helm-bookmark-file-not-found ((,class :background ,bg-alt :foreground ,fg-alt)))
   `(helm-bookmark-gnus ((,class :foreground ,magenta)))
   `(helm-bookmark-info ((,class :foreground ,cyan-alt)))
   `(helm-bookmark-man ((,class :foreground ,yellow-alt)))
   `(helm-bookmark-w3m ((,class :foreground ,blue-alt)))
   `(helm-buffer-archive ((,class :inherit bold :foreground ,cyan)))
   `(helm-buffer-directory ((,class :inherit bold :foreground ,blue)))
   `(helm-buffer-file ((,class :foreground ,fg-main)))
   `(helm-buffer-modified ((,class :foreground ,yellow-alt)))
   `(helm-buffer-not-saved ((,class :foreground ,red-alt)))
   `(helm-buffer-process ((,class :foreground ,magenta)))
   `(helm-buffer-saved-out ((,class :inherit bold :background ,bg-alt :foreground ,red)))
   `(helm-buffer-size ((,class :foreground ,fg-alt)))
   `(helm-candidate-number ((,class :foreground ,cyan-active)))
   `(helm-candidate-number-suspended ((,class :foreground ,yellow-active)))
   `(helm-comint-prompts-buffer-name ((,class :foreground ,green-active)))
   `(helm-comint-prompts-promptidx ((,class :foreground ,cyan-active)))
   `(helm-delete-async-message ((,class :inherit bold :foreground ,magenta-active)))
   `(helm-eob-line ((,class :background ,bg-main :foreground ,fg-main)))
   `(helm-eshell-prompts-buffer-name ((,class :foreground ,green-active)))
   `(helm-eshell-prompts-promptidx ((,class :foreground ,cyan-active)))
   `(helm-etags-file ((,class :foreground ,fg-dim :underline t)))
   `(helm-ff-backup-file ((,class :foreground ,fg-alt)))
   `(helm-ff-denied ((,class ,@(modus-operandi-theme-extra-completions
                                'modus-theme-subtle-red
                                'modus-theme-intense-red
                                'modus-theme-nuanced-red
                                red))))
   `(helm-ff-directory ((,class :inherit helm-buffer-directory)))
   `(helm-ff-dirs ((,class :inherit bold :foreground ,blue-alt-other)))
   `(helm-ff-dotted-directory ((,class :inherit bold :background ,bg-alt :foreground ,fg-alt)))
   `(helm-ff-dotted-symlink-directory ((,class :inherit (button helm-ff-dotted-directory))))
   `(helm-ff-executable ((,class :foreground ,magenta-alt)))
   `(helm-ff-file ((,class :foreground ,fg-main)))
   `(helm-ff-file-extension ((,class :foreground ,fg-special-warm)))
   `(helm-ff-invalid-symlink ((,class :inherit button
                                      ,@(modus-operandi-theme-link-color
                                         red red-faint))))
   `(helm-ff-pipe ((,class ,@(modus-operandi-theme-extra-completions
                              'modus-theme-refine-magenta
                              'modus-theme-subtle-magenta
                              'modus-theme-nuanced-magenta
                              magenta))))
   `(helm-ff-prefix ((,class ,@(modus-operandi-theme-extra-completions
                                'modus-theme-refine-yellow
                                'modus-theme-subtle-yellow
                                'modus-theme-nuanced-yellow
                                yellow-alt-other))))
   `(helm-ff-socket ((,class :foreground ,red-alt-other)))
   `(helm-ff-suid ((,class ,@(modus-operandi-theme-extra-completions
                              'modus-theme-subtle-red
                              'modus-theme-refine-red
                              'modus-theme-nuanced-yellow
                              red-alt))))
   `(helm-ff-symlink ((,class :inherit button
                              ,@(modus-operandi-theme-link-color
                                 cyan cyan-faint))))
   `(helm-ff-truename ((,class :foreground ,blue-alt-other)))
   `(helm-grep-cmd-line ((,class :foreground ,yellow-alt-other)))
   `(helm-grep-file ((,class :inherit bold :foreground ,fg-special-cold)))
   `(helm-grep-finish ((,class :foreground ,green-active)))
   `(helm-grep-lineno ((,class :foreground ,fg-special-warm)))
   `(helm-grep-match ((,class :inherit modus-theme-special-calm)))
   `(helm-header ((,class :inherit bold :foreground ,fg-special-cold)))
   `(helm-header-line-left-margin ((,class :inherit bold :foreground ,yellow-intense)))
   `(helm-history-deleted ((,class ,@(modus-operandi-theme-extra-completions
                                      'modus-theme-subtle-red
                                      'modus-theme-intense-red
                                      'modus-theme-nuanced-red
                                      red
                                      'bold))))
   `(helm-history-remote ((,class :foreground ,red-alt-other)))
   `(helm-lisp-completion-info ((,class :foreground ,fg-special-warm)))
   `(helm-lisp-show-completion ((,class ,@(modus-operandi-theme-extra-completions
                                           'modus-theme-subtle-yellow
                                           'modus-theme-refine-yellow
                                           'modus-theme-nuanced-yellow
                                           yellow
                                           'bold))))
   `(helm-locate-finish ((,class :foreground ,green-active)))
   `(helm-match ((,class ,@(modus-operandi-theme-extra-completions
                            'modus-theme-subtle-cyan
                            'modus-theme-refine-cyan
                            'modus-theme-nuanced-cyan
                            cyan
                            'bold))))
   `(helm-match-item ((,class ,@(modus-operandi-theme-extra-completions
                                 'modus-theme-subtle-neutral
                                 'modus-theme-subtle-cyan
                                 'modus-theme-nuanced-cyan
                                 cyan-alt-other))))
   `(helm-minibuffer-prompt ((,class :inherit minibuffer-prompt)))
   `(helm-moccur-buffer ((,class :inherit button
                                 ,@(modus-operandi-theme-link-color
                                    cyan-alt-other cyan-alt-other-faint))))
   `(helm-mode-prefix ((,class ,@(modus-operandi-theme-extra-completions
                                  'modus-theme-subtle-magenta
                                  'modus-theme-intense-magenta
                                  'modus-theme-nuanced-magenta
                                  magenta-alt
                                  'bold))))
   `(helm-non-file-buffer ((,class :foreground ,fg-alt)))
   `(helm-prefarg ((,class :foreground ,red-active)))
   `(helm-resume-need-update ((,class ,@(modus-operandi-theme-extra-completions
                                         'modus-theme-subtle-magenta
                                         'modus-theme-refine-magenta
                                         'modus-theme-nuanced-magenta
                                         magenta-alt-other))))
   `(helm-selection ((,class ,@(modus-operandi-theme-extra-completions
                                'modus-theme-subtle-blue
                                'modus-theme-refine-blue
                                'modus-theme-special-cold
                                nil
                                'bold))))
   `(helm-selection-line ((,class :inherit modus-theme-special-cold)))
   `(helm-separator ((,class :foreground ,fg-special-mild)))
   `(helm-time-zone-current ((,class :foreground ,green)))
   `(helm-time-zone-home ((,class :foreground ,magenta)))
   `(helm-source-header ((,class :inherit bold :foreground ,red-alt
                                 ,@(modus-operandi-theme-scale modus-operandi-theme-scale-4))))
   `(helm-top-columns ((,class :inherit helm-header)))
   `(helm-ucs-char ((,class :foreground ,yellow-alt-other)))
   `(helm-visible-mark ((,class :inherit modus-theme-subtle-cyan)))
;;;;; helm-ls-git
   `(helm-ls-git-added-copied-face ((,class :foreground ,green-intense)))
   `(helm-ls-git-added-modified-face ((,class :foreground ,yellow-intense)))
   `(helm-ls-git-conflict-face ((,class :inherit bold :foreground ,red-intense)))
   `(helm-ls-git-deleted-and-staged-face ((,class :foreground ,red-nuanced)))
   `(helm-ls-git-deleted-not-staged-face ((,class :foreground ,red)))
   `(helm-ls-git-modified-and-staged-face ((,class :foreground ,yellow-nuanced)))
   `(helm-ls-git-modified-not-staged-face ((,class :foreground ,yellow)))
   `(helm-ls-git-renamed-modified-face ((,class :foreground ,magenta)))
   `(helm-ls-git-untracked-face ((,class :foreground ,fg-special-cold)))
;;;;; helm-switch-shell
   `(helm-switch-shell-new-shell-face ((,class ,@(modus-operandi-theme-extra-completions
                                                  'modus-theme-subtle-magenta
                                                  'modus-theme-refine-magenta
                                                  'modus-theme-nuanced-magenta
                                                  magenta-alt-other
                                                  'bold))))
;;;;; helm-xref
   `(helm-xref-file-name ((,class :inherit bold :foreground ,fg-special-cold)))
   `(helm-xref-file-name ((,class :foreground ,fg-special-warm)))
;;;;; helpful
   `(helpful-heading ((,class :inherit modus-theme-heading-1)))
;;;;; highlight region or ad-hoc regexp
   `(hi-black-b ((,class :background ,fg-main :foreground ,bg-main)))
   `(hi-blue ((,class :background ,bg-alt :foreground ,blue :underline t)))
   `(hi-blue-b ((,class :inherit modus-theme-intense-blue)))
   `(hi-green ((,class :background ,bg-alt :foreground ,green :underline t)))
   `(hi-green-b ((,class :inherit modus-theme-intense-green)))
   `(hi-pink ((,class :background ,bg-alt :foreground ,magenta :underline t)))
   `(hi-red-b ((,class :inherit modus-theme-intense-red)))
   `(hi-yellow ((,class :background ,bg-alt :foreground ,yellow :underline t)))
   `(highlight ((,class :inherit modus-theme-subtle-blue)))
   `(highlight-changes ((,class :foreground ,yellow-alt-other)))
   `(highlight-changes-delete ((,class :foreground ,red-alt-other :underline t)))
   `(hl-line ((,class :inherit modus-theme-hl-line)))
;;;;; highlight-blocks
   `(highlight-blocks-depth-1-face ((,class :background ,bg-dim :foreground ,fg-main)))
   `(highlight-blocks-depth-2-face ((,class :background ,bg-alt :foreground ,fg-main)))
   `(highlight-blocks-depth-3-face ((,class :background ,bg-special-cold :foreground ,fg-main)))
   `(highlight-blocks-depth-4-face ((,class :background ,bg-special-calm :foreground ,fg-main)))
   `(highlight-blocks-depth-5-face ((,class :background ,bg-special-warm :foreground ,fg-main)))
   `(highlight-blocks-depth-6-face ((,class :background ,bg-special-mild :foreground ,fg-main)))
   `(highlight-blocks-depth-7-face ((,class :background ,bg-inactive :foreground ,fg-main)))
   `(highlight-blocks-depth-8-face ((,class :background ,bg-active :foreground ,fg-main)))
   `(highlight-blocks-depth-9-face ((,class :background ,cyan-subtle-bg :foreground ,fg-main)))
;;;;; highlight-defined
   `(highlight-defined-builtin-function-name-face ((,class :foreground ,magenta)))
   `(highlight-defined-face-name-face ((,class :foreground ,fg-main)))
   `(highlight-defined-function-name-face ((,class :foreground ,magenta)))
   `(highlight-defined-macro-name-face ((,class :foreground ,magenta-alt)))
   `(highlight-defined-special-form-name-face ((,class :foreground ,magenta-alt-other)))
   `(highlight-defined-variable-name-face ((,class :foreground ,cyan)))
;;;;; highlight-escape-sequences (`hes-mode')
   `(hes-escape-backslash-face ((,class :inherit bold :foreground ,fg-escape-char-construct)))
   `(hes-escape-sequence-face ((,class :inherit bold :foreground ,fg-escape-char-backslash)))
;;;;; highlight-indentation
   `(highlight-indentation-face ((,class :inherit modus-theme-hl-line)))
   `(highlight-indentation-current-column-face ((,class :background ,bg-active)))
;;;;; highlight-numbers
   `(highlight-numbers-number ((,class :foreground ,blue-alt-other)))
;;;;; highlight-symbol
   `(highlight-symbol-face ((,class :inherit modus-theme-special-mild)))
;;;;; highlight-thing
   `(highlight-thing ((,class :background ,bg-alt :foreground ,cyan)))
;;;;; hl-defined
   `(hdefd-functions ((,class :foreground ,blue)))
   `(hdefd-undefined ((,class :foreground ,red-alt)))
   `(hdefd-variables ((,class :foreground ,cyan-alt)))
;;;;; hl-fill-column
   `(hl-fill-column-face ((,class :background ,bg-active :foreground ,fg-active)))
;;;;; hl-todo
   `(hl-todo ((,class :inherit (bold modus-theme-slant) :foreground ,red-alt-other)))
;;;;; hydra
   `(hydra-face-amaranth ((,class :inherit bold :foreground ,yellow)))
   `(hydra-face-blue ((,class :inherit bold :foreground ,blue-alt)))
   `(hydra-face-pink ((,class :inherit bold :foreground ,magenta-alt)))
   `(hydra-face-red ((,class :inherit bold :foreground ,red)))
   `(hydra-face-teal ((,class :inherit bold :foreground ,cyan)))
;;;;; hyperlist
   `(hyperlist-condition ((,class :foreground ,green)))
   `(hyperlist-hashtag ((,class :foreground ,yellow)))
   `(hyperlist-operator ((,class :foreground ,blue-alt)))
   `(hyperlist-paren ((,class :foreground ,cyan-alt-other)))
   `(hyperlist-quote ((,class :foreground ,cyan-alt)))
   `(hyperlist-ref ((,class :foreground ,magenta-alt-other)))
   `(hyperlist-stars ((,class :foreground ,fg-alt)))
   `(hyperlist-tag ((,class :foreground ,red)))
   `(hyperlist-toplevel ((,class :inherit bold :foreground ,fg-main)))
;;;;; icomplete
   `(icomplete-first-match ((,class :inherit bold
                                    ,@(modus-operandi-theme-standard-completions
                                       magenta bg-alt
                                       bg-active fg-main))))
;;;;; icomplete-vertical
   `(icomplete-vertical-separator ((,class :foreground ,fg-alt)))
;;;;; ido-mode
   `(ido-first-match ((,class :inherit bold
                              ,@(modus-operandi-theme-standard-completions
                                 magenta bg-alt
                                 bg-active fg-main))))
   `(ido-incomplete-regexp ((,class :inherit error)))
   `(ido-indicator ((,class :inherit modus-theme-subtle-yellow)))
   `(ido-only-match ((,class :inherit bold
                             ,@(modus-operandi-theme-standard-completions
                                green green-nuanced-bg
                                green-intense-bg fg-main))))
   `(ido-subdir ((,class :foreground ,blue)))
   `(ido-virtual ((,class :foreground ,fg-special-warm)))
;;;;; iedit
   `(iedit-occurrence ((,class :inherit modus-theme-refine-blue)))
   `(iedit-read-only-occurrence ((,class :inherit modus-theme-intense-yellow)))
;;;;; iflipb
   `(iflipb-current-buffer-face ((,class :inherit bold :foreground ,cyan-alt)))
   `(iflipb-other-buffer-face ((,class :foreground ,fg-alt)))
;;;;; imenu-list
   `(imenu-list-entry-face-0 ((,class :foreground ,cyan)))
   `(imenu-list-entry-face-1 ((,class :foreground ,blue)))
   `(imenu-list-entry-face-2 ((,class :foreground ,cyan-alt-other)))
   `(imenu-list-entry-face-3 ((,class :foreground ,blue-alt)))
   `(imenu-list-entry-subalist-face-0 ((,class :inherit bold :foreground ,magenta-alt-other :underline t)))
   `(imenu-list-entry-subalist-face-1 ((,class :inherit bold :foreground ,magenta :underline t)))
   `(imenu-list-entry-subalist-face-2 ((,class :inherit bold :foreground ,green-alt-other :underline t)))
   `(imenu-list-entry-subalist-face-3 ((,class :inherit bold :foreground ,red-alt-other :underline t)))
;;;;; indium
   `(indium-breakpoint-face ((,class :foreground ,red-active)))
   `(indium-frame-url-face ((,class :inherit button :foreground ,fg-alt)))
   `(indium-keyword-face ((,class :foreground ,magenta-alt-other)))
   `(indium-litable-face ((,class :inherit modus-theme-slant :foreground ,fg-special-warm)))
   `(indium-repl-error-face ((,class :inherit bold :foreground ,red)))
   `(indium-repl-prompt-face ((,class :foreground ,cyan-alt-other)))
   `(indium-repl-stdout-face ((,class :foreground ,fg-main)))
;;;;; info
   `(Info-quoted ((,class ,@(modus-operandi-theme-mixed-fonts)
                          :foreground ,magenta))) ; the capitalization is canonical
   `(info-header-node ((,class :inherit bold :foreground ,fg-alt)))
   `(info-header-xref ((,class :foreground ,blue-active)))
   `(info-index-match ((,class :inherit match)))
   `(info-menu-header ((,class :inherit modus-theme-heading-3)))
   `(info-menu-star ((,class :foreground ,red)))
   `(info-node ((,class :inherit bold)))
   `(info-title-1 ((,class :inherit modus-theme-heading-1)))
   `(info-title-2 ((,class :inherit modus-theme-heading-2)))
   `(info-title-3 ((,class :inherit modus-theme-heading-3)))
   `(info-title-4 ((,class :inherit modus-theme-heading-4)))
;;;;; info-colors
   `(info-colors-lisp-code-block ((,class :inherit fixed-pitch)))
   `(info-colors-ref-item-command ((,class :foreground ,magenta)))
   `(info-colors-ref-item-constant ((,class :foreground ,blue-alt-other)))
   `(info-colors-ref-item-function ((,class :foreground ,magenta)))
   `(info-colors-ref-item-macro ((,class :inherit modus-theme-bold :foreground ,magenta-alt-other)))
   `(info-colors-ref-item-other ((,class :foreground ,cyan)))
   `(info-colors-ref-item-special-form ((,class :inherit modus-theme-bold :foreground ,magenta-alt-other)))
   `(info-colors-ref-item-syntax-class ((,class :foreground ,magenta)))
   `(info-colors-ref-item-type ((,class :foreground ,magenta-alt)))
   `(info-colors-ref-item-user-option ((,class :foreground ,cyan)))
   `(info-colors-ref-item-variable ((,class :foreground ,cyan)))
;;;;; interaction-log
   `(ilog-buffer-face ((,class :foreground ,magenta-alt-other)))
   `(ilog-change-face ((,class :foreground ,magenta-alt)))
   `(ilog-echo-face ((,class :foreground ,yellow-alt-other)))
   `(ilog-load-face ((,class :foreground ,green)))
   `(ilog-message-face ((,class :foreground ,fg-alt)))
   `(ilog-non-change-face ((,class :foreground ,blue)))
;;;;; ioccur
   `(ioccur-cursor ((,class :foreground ,fg-main)))
   `(ioccur-invalid-regexp ((,class :foreground ,red)))
   `(ioccur-match-face ((,class :inherit modus-theme-special-calm)))
   `(ioccur-match-overlay-face ((,class ,@(and (>= emacs-major-version 27) '(:extend t))
                                        :inherit modus-theme-special-cold)))
   `(ioccur-num-line-face ((,class :foreground ,fg-special-warm)))
   `(ioccur-overlay-face ((,class ,@(and (>= emacs-major-version 27) '(:extend t))
                                  :inherit modus-theme-refine-blue)))
   `(ioccur-regexp-face ((,class :inherit (modus-theme-intense-magenta bold))))
   `(ioccur-title-face ((,class :inherit bold :foreground ,red-alt
                                ,@(modus-operandi-theme-scale modus-operandi-theme-scale-4))))
;;;;; isearch, occur, and the like
   `(isearch ((,class :inherit (modus-theme-intense-green bold))))
   `(isearch-fail ((,class :inherit modus-theme-refine-red)))
   `(lazy-highlight ((,class :inherit modus-theme-refine-cyan)))
   `(match ((,class :inherit modus-theme-special-calm)))
   `(query-replace ((,class :inherit (modus-theme-intense-yellow bold))))
;;;;; ivy
   `(ivy-action ((,class :inherit bold :foreground ,red-alt)))
   `(ivy-completions-annotations ((,class :inherit modus-theme-slant :foreground ,fg-special-cold)))
   `(ivy-confirm-face ((,class :foreground ,cyan)))
   `(ivy-current-match ((,class ,@(modus-operandi-theme-extra-completions
                                   'modus-theme-refine-cyan
                                   'modus-theme-intense-cyan
                                   'modus-theme-special-warm
                                   nil
                                   'bold))))
   `(ivy-cursor ((,class :background ,fg-main :foreground ,bg-main)))
   `(ivy-grep-info ((,class :foreground ,cyan-alt)))
   `(ivy-grep-line-number ((,class :foreground ,fg-special-warm)))
   `(ivy-highlight-face ((,class :foreground ,magenta)))
   `(ivy-match-required-face ((,class :inherit error)))
   `(ivy-minibuffer-match-face-1 ((,class ,@(modus-operandi-theme-extra-completions
                                             'modus-theme-subtle-neutral
                                             'modus-theme-intense-neutral
                                             'modus-theme-subtle-neutral
                                             fg-alt))))
   `(ivy-minibuffer-match-face-2 ((,class ,@(modus-operandi-theme-extra-completions
                                             'modus-theme-subtle-green
                                             'modus-theme-refine-green
                                             'modus-theme-nuanced-green
                                             green-alt-other
                                             'bold))))
   `(ivy-minibuffer-match-face-3 ((,class ,@(modus-operandi-theme-extra-completions
                                             'modus-theme-subtle-cyan
                                             'modus-theme-refine-cyan
                                             'modus-theme-nuanced-cyan
                                             cyan-alt-other
                                             'bold))))
   `(ivy-minibuffer-match-face-4 ((,class ,@(modus-operandi-theme-extra-completions
                                             'modus-theme-subtle-magenta
                                             'modus-theme-refine-magenta
                                             'modus-theme-nuanced-magenta
                                             magenta-alt-other
                                             'bold))))
   `(ivy-minibuffer-match-highlight ((,class ,@(modus-operandi-theme-extra-completions
                                                'modus-theme-subtle-blue
                                                'modus-theme-intense-blue
                                                'modus-theme-nuanced-blue
                                                blue-alt-other
                                                'bold))))
   `(ivy-modified-buffer ((,class :inherit modus-theme-slant :foreground ,yellow)))
   `(ivy-modified-outside-buffer ((,class :inherit modus-theme-slant :foreground ,yellow-alt)))
   `(ivy-org ((,class :foreground ,cyan-alt-other)))
   `(ivy-prompt-match ((,class :inherit ivy-current-match)))
   `(ivy-remote ((,class :foreground ,magenta)))
   `(ivy-separator ((,class :foreground ,fg-alt)))
   `(ivy-subdir ((,class :foreground ,blue-alt-other)))
   `(ivy-virtual ((,class :foreground ,magenta-alt-other)))
   `(ivy-yanked-word ((,class ,@(modus-operandi-theme-extra-completions
                                 'modus-theme-subtle-blue
                                 'modus-theme-refine-blue
                                 'modus-theme-nuanced-blue
                                 blue-alt))))
;;;;; ivy-posframe
   `(ivy-posframe ((,class :background ,bg-dim :foreground ,fg-main)))
   `(ivy-posframe-border ((,class :background ,bg-active)))
   `(ivy-posframe-cursor ((,class :background ,fg-main :foreground ,bg-main)))
;;;;; jira (org-jira)
   `(jiralib-comment-face ((,class :background ,bg-alt)))
   `(jiralib-comment-header-face ((,class :inherit bold)))
   `(jiralib-issue-info-face ((,class :inherit modus-theme-special-warm)))
   `(jiralib-issue-info-header-face ((,class :inherit (modus-theme-special-warm bold))))
   `(jiralib-issue-summary-face ((,class :inherit bold)))
   `(jiralib-link-filter-face ((,class :underline t)))
   `(jiralib-link-issue-face ((,class :underline t)))
   `(jiralib-link-project-face ((,class :underline t)))
;;;;; journalctl-mode
   `(journalctl-error-face ((,class :inherit bold :foreground ,red)))
   `(journalctl-finished-face ((,class :inherit bold :foreground ,green)))
   `(journalctl-host-face ((,class :foreground ,blue)))
   `(journalctl-process-face ((,class :foreground ,cyan-alt-other)))
   `(journalctl-starting-face ((,class :foreground ,green)))
   `(journalctl-timestamp-face ((,class :foreground ,fg-special-cold)))
   `(journalctl-warning-face ((,class :inherit bold :foreground ,yellow)))
;;;;; js2-mode
   `(js2-error ((,class :foreground ,red)))
   `(js2-external-variable ((,class :foreground ,cyan-alt-other)))
   `(js2-function-call ((,class :foreground ,magenta)))
   `(js2-function-param ((,class :foreground ,blue)))
   `(js2-instance-member ((,class :foreground ,magenta-alt-other)))
   `(js2-jsdoc-html-tag-delimiter ((,class :foreground ,fg-main)))
   `(js2-jsdoc-html-tag-name ((,class :foreground ,cyan)))
   `(js2-jsdoc-tag ((,class :foreground ,fg-special-calm)))
   `(js2-jsdoc-type ((,class :foreground ,fg-special-cold)))
   `(js2-jsdoc-value ((,class :foreground ,fg-special-warm)))
   `(js2-object-property ((,class :foreground ,fg-main)))
   `(js2-object-property-access ((,class :foreground ,fg-main)))
   `(js2-private-function-call ((,class :foreground ,green-alt-other)))
   `(js2-private-member ((,class :foreground ,fg-special-mild)))
   `(js2-warning ((,class :foreground ,yellow-alt :underline t)))
;;;;; julia
   `(julia-macro-face ((,class :inherit modus-theme-bold :foreground ,magenta)))
   `(julia-quoted-symbol-face ((,class :foreground ,blue-alt-other)))
;;;;; jupyter
   `(jupyter-eval-overlay ((,class :inherit bold :foreground ,blue)))
   `(jupyter-repl-input-prompt ((,class :foreground ,cyan-alt-other)))
   `(jupyter-repl-output-prompt ((,class :foreground ,magenta-alt-other)))
   `(jupyter-repl-traceback ((,class :inherit modus-theme-intense-red)))
;;;;; kaocha-runner
   `(kaocha-runner-error-face ((,class :foreground ,red)))
   `(kaocha-runner-success-face ((,class :foreground ,green)))
   `(kaocha-runner-warning-face ((,class :foreground ,yellow)))
;;;;; keycast
   `(keycast-command ((,class :inherit bold :foreground ,blue-active)))
   `(keycast-key ((,class ,@(modus-operandi-theme-mode-line-attrs
                             bg-main blue-active
                             bg-main blue-active
                             blue-active blue-intense
                             'alt-style -3))))
;;;;; line numbers (display-line-numbers-mode and global variant)
   `(line-number ((,class :inherit default :background ,bg-dim :foreground ,fg-alt)))
   `(line-number-current-line ((,class :inherit default :background ,bg-active :foreground ,fg-main)))
;;;;; lsp-mode
   `(lsp-face-highlight-read ((,class :inherit modus-theme-subtle-blue :underline t)))
   `(lsp-face-highlight-textual ((,class :inherit modus-theme-subtle-blue)))
   `(lsp-face-highlight-write ((,class :inherit (modus-theme-refine-blue bold))))
   `(lsp-face-semhl-constant ((,class :foreground ,blue-alt-other)))
   `(lsp-face-semhl-deprecated
     ((,(append '((supports :underline (:style wave))) class)
       :foreground ,yellow :underline (:style wave))
      (,class :foreground ,yellow :underline t)))
   `(lsp-face-semhl-enummember ((,class :foreground ,blue-alt-other)))
   `(lsp-face-semhl-field ((,class :foreground ,cyan-alt)))
   `(lsp-face-semhl-field-static ((,class :inherit modus-theme-slant :foreground ,cyan-alt)))
   `(lsp-face-semhl-function ((,class :foreground ,magenta)))
   `(lsp-face-semhl-method ((,class :foreground ,magenta)))
   `(lsp-face-semhl-namespace ((,class :inherit modus-theme-bold :foreground ,magenta-alt)))
   `(lsp-face-semhl-preprocessor ((,class :foreground ,red-alt-other)))
   `(lsp-face-semhl-static-method ((,class :inherit modus-theme-slant :foreground ,magenta)))
   `(lsp-face-semhl-type-class ((,class :foreground ,magenta-alt)))
   `(lsp-face-semhl-type-enum ((,class :foreground ,magenta-alt)))
   `(lsp-face-semhl-type-primitive ((,class :inherit modus-theme-slant :foreground ,magenta-alt)))
   `(lsp-face-semhl-type-template ((,class :inherit modus-theme-slant :foreground ,magenta-alt)))
   `(lsp-face-semhl-type-typedef ((,class :inherit modus-theme-slant :foreground ,magenta-alt)))
   `(lsp-face-semhl-variable ((,class :foreground ,cyan)))
   `(lsp-face-semhl-variable-local ((,class :foreground ,cyan)))
   `(lsp-face-semhl-variable-parameter ((,class :foreground ,cyan-alt-other)))
   `(lsp-lens-face ((,class :height 0.8 :foreground ,fg-alt)))
   `(lsp-lens-mouse-face ((,class :height 0.8 :foreground ,blue-alt-other :underline t)))
   `(lsp-ui-doc-background ((,class :background ,bg-alt)))
   `(lsp-ui-doc-header ((,class :background ,bg-header :foreground ,fg-header)))
   `(lsp-ui-doc-url ((,class :inherit button)))
   `(lsp-ui-peek-filename ((,class :foreground ,fg-special-warm)))
   `(lsp-ui-peek-footer ((,class :background ,bg-header :foreground ,fg-header)))
   `(lsp-ui-peek-header ((,class :background ,bg-header :foreground ,fg-header)))
   `(lsp-ui-peek-highlight ((,class :inherit modus-theme-subtle-blue)))
   `(lsp-ui-peek-line-number ((,class :foreground ,fg-alt)))
   `(lsp-ui-peek-list ((,class :background ,bg-dim)))
   `(lsp-ui-peek-peek ((,class :background ,bg-alt)))
   `(lsp-ui-peek-selection ((,class :inherit modus-theme-subtle-cyan)))
   `(lsp-ui-sideline-code-action ((,class :foreground ,yellow)))
   `(lsp-ui-sideline-current-symbol ((,class :inherit bold :height 0.99 :box (:line-width -1 :style nil) :foreground ,fg-main)))
   `(lsp-ui-sideline-symbol ((,class :inherit bold :height 0.99 :box (:line-width -1 :style nil) :foreground ,fg-alt)))
   `(lsp-ui-sideline-symbol-info ((,class :inherit italic :height 0.99)))
;;;;; magit
   `(magit-bisect-bad ((,class :foreground ,red-alt-other)))
   `(magit-bisect-good ((,class :foreground ,green-alt-other)))
   `(magit-bisect-skip ((,class :foreground ,yellow-alt-other)))
   `(magit-blame-date ((,class :foreground ,blue)))
   `(magit-blame-dimmed ((,class :foreground ,fg-alt)))
   `(magit-blame-hash ((,class :foreground ,fg-special-warm)))
   `(magit-blame-heading ((,class :background ,bg-alt)))
   `(magit-blame-highlight ((,class :inherit modus-theme-nuanced-cyan)))
   `(magit-blame-margin ((,class :inherit magit-blame-highlight)))
   `(magit-blame-name ((,class :foreground ,magenta-alt-other)))
   `(magit-blame-summary ((,class :foreground ,cyan-alt-other)))
   `(magit-branch-current ((,class :foreground ,blue-alt-other :box t)))
   `(magit-branch-local ((,class :foreground ,blue-alt)))
   `(magit-branch-remote ((,class :foreground ,magenta-alt)))
   `(magit-branch-remote-head ((,class :foreground ,magenta-alt-other :box t)))
   `(magit-branch-upstream ((,class :inherit italic)))
   `(magit-cherry-equivalent ((,class :background ,bg-main :foreground ,magenta-intense)))
   `(magit-cherry-unmatched ((,class :background ,bg-main :foreground ,cyan-intense)))
   ;; NOTE: here we break from the pattern of inheriting from the
   ;; modus-theme-diff-* faces, though only for the standard actions,
   ;; not the highlighted ones.  This is because Magit's interaction
   ;; model relies on highlighting the current diff hunk.
   `(magit-diff-added ((,class ,@(modus-operandi-theme-diff
                                  bg-main green
                                  bg-diff-added fg-diff-added
                                  green-nuanced-bg fg-diff-added))))
   `(magit-diff-added-highlight ((,class :inherit modus-theme-diff-focus-added)))
   `(magit-diff-base ((,class ,@(modus-operandi-theme-diff
                                 bg-main yellow
                                 bg-diff-changed fg-diff-changed
                                 yellow-nuanced-bg fg-diff-changed))))
   `(magit-diff-base-highlight ((,class :inherit modus-theme-diff-focus-changed)))
   `(magit-diff-context ((,class :foreground ,fg-unfocused)))
   `(magit-diff-context-highlight ((,class ,@(modus-operandi-theme-diff
                                              bg-dim fg-dim
                                              bg-inactive fg-inactive
                                              bg-dim fg-alt))))
   `(magit-diff-file-heading ((,class :inherit bold :foreground ,fg-special-cold)))
   `(magit-diff-file-heading-highlight ((,class :inherit (modus-theme-special-cold bold))))
   `(magit-diff-file-heading-selection ((,class :inherit modus-theme-refine-cyan)))
   ;; NOTE: here we break from the pattern of inheriting from the
   ;; modus-theme-diff-* faces.
   `(magit-diff-hunk-heading ((,class :inherit bold :background ,bg-active
                                      :foreground ,fg-inactive)))
   `(magit-diff-hunk-heading-highlight ((,class :inherit bold :background ,bg-diff-heading
                                                :foreground ,fg-diff-heading)))
   `(magit-diff-hunk-heading-selection ((,class :inherit modus-theme-refine-blue)))
   `(magit-diff-hunk-region ((,class :inherit bold)))
   `(magit-diff-lines-boundary ((,class :background ,fg-main)))
   `(magit-diff-lines-heading ((,class :inherit modus-theme-refine-magenta)))
   `(magit-diff-removed ((,class ,@(modus-operandi-theme-diff
                                    bg-main red
                                    bg-diff-removed fg-diff-removed
                                    red-nuanced-bg fg-diff-removed))))
   `(magit-diff-removed-highlight ((,class :inherit modus-theme-diff-focus-removed)))
   `(magit-diffstat-added ((,class :foreground ,green)))
   `(magit-diffstat-removed ((,class :foreground ,red)))
   `(magit-dimmed ((,class :foreground ,fg-unfocused)))
   `(magit-filename ((,class :foreground ,fg-special-cold)))
   `(magit-hash ((,class :foreground ,fg-alt)))
   `(magit-head ((,class :inherit magit-branch-local)))
   `(magit-header-line ((,class :inherit bold :foreground ,magenta-active)))
   `(magit-header-line-key ((,class :inherit bold :foreground ,red-active)))
   `(magit-header-line-log-select ((,class :inherit bold :foreground ,fg-main)))
   `(magit-keyword ((,class :foreground ,magenta)))
   `(magit-keyword-squash ((,class :inherit bold :foreground ,yellow-alt-other)))
   `(magit-log-author ((,class :foreground ,cyan)))
   `(magit-log-date ((,class :foreground ,fg-alt)))
   `(magit-log-graph ((,class :foreground ,fg-dim)))
   `(magit-mode-line-process ((,class :inherit bold :foreground ,blue-active)))
   `(magit-mode-line-process-error ((,class :inherit bold :foreground ,red-active)))
   `(magit-process-ng ((,class :inherit error)))
   `(magit-process-ok ((,class :inherit success)))
   `(magit-reflog-amend ((,class :background ,bg-main :foreground ,magenta-intense)))
   `(magit-reflog-checkout ((,class :background ,bg-main :foreground ,blue-intense)))
   `(magit-reflog-cherry-pick ((,class :background ,bg-main :foreground ,green-intense)))
   `(magit-reflog-commit ((,class :background ,bg-main :foreground ,green-intense)))
   `(magit-reflog-merge ((,class :background ,bg-main :foreground ,green-intense)))
   `(magit-reflog-other ((,class :background ,bg-main :foreground ,cyan-intense)))
   `(magit-reflog-rebase ((,class :background ,bg-main :foreground ,magenta-intense)))
   `(magit-reflog-remote ((,class :background ,bg-main :foreground ,cyan-intense)))
   `(magit-reflog-reset ((,class :background ,bg-main :foreground ,red-intense)))
   `(magit-refname ((,class :foreground ,fg-alt)))
   `(magit-refname-pullreq ((,class :foreground ,fg-alt)))
   `(magit-refname-stash ((,class :foreground ,fg-alt)))
   `(magit-refname-wip ((,class :foreground ,fg-alt)))
   `(magit-section ((,class :background ,bg-dim :foreground ,fg-main)))
   `(magit-section-heading ((,class :inherit bold :foreground ,cyan)))
   `(magit-section-heading-selection ((,class :inherit (modus-theme-refine-cyan bold))))
   `(magit-section-highlight ((,class :background ,bg-alt)))
   `(magit-sequence-done ((,class :foreground ,green-alt)))
   `(magit-sequence-drop ((,class :foreground ,red-alt)))
   `(magit-sequence-exec ((,class :foreground ,magenta-alt)))
   `(magit-sequence-head ((,class :foreground ,cyan-alt)))
   `(magit-sequence-onto ((,class :foreground ,fg-alt)))
   `(magit-sequence-part ((,class :foreground ,yellow-alt)))
   `(magit-sequence-pick ((,class :foreground ,blue-alt)))
   `(magit-sequence-stop ((,class :foreground ,red)))
   `(magit-signature-bad ((,class :inherit bold :foreground ,red)))
   `(magit-signature-error ((,class :foreground ,red-alt)))
   `(magit-signature-expired ((,class :foreground ,yellow)))
   `(magit-signature-expired-key ((,class :foreground ,yellow)))
   `(magit-signature-good ((,class :foreground ,green)))
   `(magit-signature-revoked ((,class :foreground ,magenta)))
   `(magit-signature-untrusted ((,class :foreground ,cyan)))
   `(magit-tag ((,class :foreground ,yellow-alt-other)))
;;;;; magit-imerge
   `(magit-imerge-overriding-value ((,class :inherit bold :foreground ,red-alt)))
;;;;; man
   `(Man-overstrike ((,class :inherit bold :foreground ,magenta)))
   `(Man-reverse ((,class :inherit modus-theme-subtle-magenta)))
   `(Man-underline ((,class :foreground ,cyan :underline t)))
;;;;; markdown-mode
   `(markdown-blockquote-face ((,class :inherit modus-theme-slant :foreground ,fg-special-cold)))
   `(markdown-bold-face ((,class :inherit bold)))
   `(markdown-code-face ((,class ,@(modus-operandi-theme-mixed-fonts))))
   `(markdown-comment-face ((,class :inherit font-lock-comment-face)))
   `(markdown-footnote-marker-face ((,class :inherit bold :foreground ,cyan-alt)))
   `(markdown-footnote-text-face ((,class :inherit modus-theme-slant :foreground ,fg-main)))
   `(markdown-gfm-checkbox-face ((,class :foreground ,cyan-alt-other)))
   `(markdown-header-delimiter-face ((,class :inherit modus-theme-bold :foreground ,fg-dim)))
   `(markdown-header-face ((t nil)))
   `(markdown-header-face-1 ((,class :inherit modus-theme-heading-1)))
   `(markdown-header-face-2 ((,class :inherit modus-theme-heading-2)))
   `(markdown-header-face-3 ((,class :inherit modus-theme-heading-3)))
   `(markdown-header-face-4 ((,class :inherit modus-theme-heading-4)))
   `(markdown-header-face-5 ((,class :inherit modus-theme-heading-5)))
   `(markdown-header-face-6 ((,class :inherit modus-theme-heading-6)))
   `(markdown-header-rule-face ((,class :inherit bold :foreground ,fg-special-warm)))
   `(markdown-hr-face ((,class :inherit bold :foreground ,fg-special-warm)))
   `(markdown-html-attr-name-face ((,class ,@(modus-operandi-theme-mixed-fonts)
                                           :foreground ,cyan)))
   `(markdown-html-attr-value-face ((,class ,@(modus-operandi-theme-mixed-fonts)
                                            :foreground ,blue)))
   `(markdown-html-entity-face ((,class ,@(modus-operandi-theme-mixed-fonts)
                                        :foreground ,cyan)))
   `(markdown-html-tag-delimiter-face ((,class ,@(modus-operandi-theme-mixed-fonts)
                                               :foreground ,fg-special-mild)))
   `(markdown-html-tag-name-face ((,class ,@(modus-operandi-theme-mixed-fonts)
                                          :foreground ,magenta-alt)))
   `(markdown-inline-code-face ((,class ,@(modus-operandi-theme-mixed-fonts)
                                        :foreground ,magenta)))
   `(markdown-italic-face ((,class :inherit italic :foreground ,fg-special-cold)))
   `(markdown-language-info-face ((,class ,@(modus-operandi-theme-mixed-fonts)
                                          :foreground ,fg-special-cold)))
   `(markdown-language-keyword-face ((,class ,@(modus-operandi-theme-mixed-fonts)
                                             :foreground ,green-alt-other)))
   `(markdown-line-break-face ((,class :inherit modus-theme-refine-cyan :underline t)))
   `(markdown-link-face ((,class :inherit button)))
   `(markdown-link-title-face ((,class :inherit modus-theme-slant :foreground ,fg-special-cold)))
   `(markdown-list-face ((,class :foreground ,fg-dim)))
   `(markdown-markup-face ((,class :foreground ,fg-alt)))
   `(markdown-math-face ((,class :foreground ,magenta-alt-other)))
   `(markdown-metadata-key-face ((,class :foreground ,cyan-alt-other)))
   `(markdown-metadata-value-face ((,class :foreground ,blue-alt)))
   `(markdown-missing-link-face ((,class :inherit bold :foreground ,yellow)))
   `(markdown-plain-url-face ((,class :inherit markdown-link-face)))
   `(markdown-pre-face ((,class ,@(and (>= emacs-major-version 27) '(:extend t))
                                ,@(modus-operandi-theme-mixed-fonts)
                                :background ,bg-dim
                                :foreground ,fg-special-mild)))
   `(markdown-reference-face ((,class :inherit markdown-markup-face)))
   `(markdown-strike-through-face ((,class :strike-through t)))
   `(markdown-table-face ((,class ,@(modus-operandi-theme-mixed-fonts)
                                  :foreground ,fg-special-cold)))
   `(markdown-url-face ((,class :foreground ,blue-alt)))
;;;;; markup-faces (`adoc-mode')
   `(markup-anchor-face ((,class :foreground ,fg-inactive)))
   `(markup-attribute-face ((,class :inherit italic :foreground ,fg-inactive)))
   `(markup-big-face ((,class :height 1.3 :foreground ,blue-nuanced)))
   `(markup-bold-face ((,class :inherit bold :foreground ,red-nuanced)))
   `(markup-code-face ((,class :inherit fixed-pitch :foreground ,magenta)))
   `(markup-command-face ((,class :foreground ,fg-inactive)))
   `(markup-comment-face ((,class :inherit font-lock-comment-face)))
   `(markup-complex-replacement-face ((,class :box (:line-width 2 :color nil :style released-button)
                                              :inherit modus-theme-refine-magenta)))
   `(markup-emphasis-face ((,class :inherit italic :foreground ,fg-special-cold)))
   `(markup-error-face ((,class :inherit bold :foreground ,red)))
   `(markup-gen-face ((,class :foreground ,magenta-alt)))
   `(markup-internal-reference-face ((,class :inherit button :foreground ,fg-alt)))
   `(markup-italic-face ((,class :inherit italic :foreground ,fg-special-cold)))
   `(markup-list-face ((,class :inherit modus-theme-special-calm)))
   `(markup-meta-face ((,class :foreground ,fg-inactive)))
   `(markup-meta-hide-face ((,class :foreground ,fg-alt)))
   `(markup-passthrough-face ((,class :inherit fixed-pitch :foreground ,cyan)))
   `(markup-preprocessor-face ((,class :foreground ,red-alt-other)))
   `(markup-replacement-face ((,class :foreground ,yellow-alt-other)))
   `(markup-secondary-text-face ((,class :height 0.8 :foreground ,magenta-nuanced)))
   `(markup-small-face ((,class :height 0.8 :foreground ,fg-main)))
   `(markup-strong-face ((,class :inherit bold :foreground ,red-nuanced)))
   `(markup-subscript-face ((,class :height 0.8 :foreground ,fg-special-cold)))
   `(markup-superscript-face ((,class :height 0.8 :foreground ,fg-special-cold)))
   `(markup-table-cell-face ((,class :inherit modus-theme-special-cold)))
   `(markup-table-face ((,class :inherit modus-theme-subtle-cyan)))
   `(markup-table-row-face ((,class :inherit modus-theme-subtle-cyan)))
   `(markup-title-0-face ((,class :height 3.0 :foreground ,blue-nuanced)))
   `(markup-title-1-face ((,class :height 2.4 :foreground ,blue-nuanced)))
   `(markup-title-2-face ((,class :height 1.8 :foreground ,blue-nuanced)))
   `(markup-title-3-face ((,class :height 1.4 :foreground ,blue-nuanced)))
   `(markup-title-4-face ((,class :height 1.2 :foreground ,blue-nuanced)))
   `(markup-title-5-face ((,class :height 1.2 :foreground ,blue-nuanced :underline t)))
   `(markup-value-face ((,class :foreground ,fg-inactive)))
   `(markup-verbatim-face ((,class :inherit modus-theme-special-mild)))
;;;;; mentor
   `(mentor-download-message ((,class :foreground ,fg-special-warm)))
   `(mentor-download-name ((,class :foreground ,fg-special-cold)))
   `(mentor-download-progress ((,class :foreground ,blue-alt-other)))
   `(mentor-download-size ((,class :foreground ,magenta-alt-other)))
   `(mentor-download-speed-down ((,class :foreground ,cyan-alt)))
   `(mentor-download-speed-up ((,class :foreground ,red-alt)))
   `(mentor-download-state ((,class :foreground ,yellow-alt)))
   `(mentor-highlight-face ((,class :inherit modus-theme-subtle-blue)))
   `(mentor-tracker-name ((,class :foreground ,magenta-alt)))
;;;;; messages
   `(message-cited-text-1 ((,class :foreground ,blue-alt)))
   `(message-cited-text-2 ((,class :foreground ,red-alt)))
   `(message-cited-text-3 ((,class :foreground ,green-alt)))
   `(message-cited-text-4 ((,class :foreground ,magenta-alt)))
   `(message-header-cc ((,class :inherit bold :foreground ,cyan-alt)))
   `(message-header-name ((,class :foreground ,green-alt-other)))
   `(message-header-newsgroups ((,class :inherit bold :foreground ,green-alt)))
   `(message-header-other ((,class :inherit bold :foreground ,cyan-alt-other)))
   `(message-header-subject ((,class :inherit bold :foreground ,magenta-alt-other)))
   `(message-header-to ((,class :inherit bold :foreground ,blue)))
   `(message-header-xheader ((,class :foreground ,cyan)))
   `(message-mml ((,class :foreground ,fg-special-warm)))
   `(message-separator ((,class :inherit modus-theme-intense-neutral)))
;;;;; minibuffer-line
   `(minibuffer-line ((,class :foreground ,fg-main)))
;;;;; minimap
   `(minimap-active-region-background ((,class :background ,bg-active)))
   `(minimap-current-line-face ((,class :background ,cyan-intense-bg :foreground ,fg-main)))
;;;;; modeline
   `(mode-line ((,class ,@(modus-operandi-theme-mode-line-attrs
                           fg-active bg-active fg-dim bg-active
                           fg-alt bg-active 'alt-style nil bg-main))))
   `(mode-line-buffer-id ((,class :inherit bold)))
   `(mode-line-emphasis ((,class :inherit bold :foreground ,blue-active)))
   `(mode-line-highlight ((,class :inherit modus-theme-active-blue :box (:line-width -1 :style pressed-button))))
   `(mode-line-inactive ((,class ,@(modus-operandi-theme-mode-line-attrs
                                    fg-inactive bg-inactive fg-alt bg-dim
                                    bg-region bg-active))))
;;;;; mood-line
   `(mood-line-modified ((,class :foreground ,magenta-active)))
   `(mood-line-status-error ((,class :inherit bold :foreground ,red-active)))
   `(mood-line-status-info ((,class :foreground ,cyan-active)))
   `(mood-line-status-neutral ((,class :foreground ,blue-active)))
   `(mood-line-status-success ((,class :foreground ,green-active)))
   `(mood-line-status-warning ((,class :inherit bold :foreground ,yellow-active)))
   `(mood-line-unimportant ((,class :foreground ,fg-inactive)))
;;;;; mpdel
   `(mpdel-browser-directory-face ((,class :foreground ,blue)))
   `(mpdel-playlist-current-song-face ((,class :inherit bold :foreground ,blue-alt-other)))
;;;;; mu4e
   `(mu4e-attach-number-face ((,class :inherit bold :foreground ,cyan-alt)))
   `(mu4e-cited-1-face ((,class :foreground ,blue-alt)))
   `(mu4e-cited-2-face ((,class :foreground ,red-alt)))
   `(mu4e-cited-3-face ((,class :foreground ,green-alt)))
   `(mu4e-cited-4-face ((,class :foreground ,magenta-alt)))
   `(mu4e-cited-5-face ((,class :foreground ,yellow-alt)))
   `(mu4e-cited-6-face ((,class :foreground ,cyan-alt)))
   `(mu4e-cited-7-face ((,class :foreground ,magenta)))
   `(mu4e-compose-header-face ((,class :inherit mu4e-compose-separator-face)))
   `(mu4e-compose-separator-face ((,class :inherit modus-theme-intense-neutral)))
   `(mu4e-contact-face ((,class :inherit bold :foreground ,cyan-alt-other)))
   `(mu4e-context-face ((,class :foreground ,blue-active)))
   `(mu4e-draft-face ((,class :foreground ,magenta-alt)))
   `(mu4e-flagged-face ((,class :foreground ,red-alt)))
   `(mu4e-footer-face ((,class :inherit modus-theme-slant :foreground ,fg-special-cold)))
   `(mu4e-forwarded-face ((,class :foreground ,magenta-alt-other)))
   `(mu4e-header-face ((,class :foreground ,fg-alt)))
   `(mu4e-header-highlight-face ((,class :inherit modus-theme-hl-line)))
   `(mu4e-header-key-face ((,class :foreground ,cyan)))
   `(mu4e-header-marks-face ((,class :inherit bold :foreground ,magenta-alt)))
   `(mu4e-header-title-face ((,class :foreground ,fg-special-mild)))
   `(mu4e-header-value-face ((,class :inherit bold :foreground ,magenta-alt-other)))
   `(mu4e-highlight-face ((,class :inherit bold :foreground ,blue-alt-other)))
   `(mu4e-link-face ((,class :inherit button)))
   `(mu4e-modeline-face ((,class :foreground ,magenta-active)))
   `(mu4e-moved-face ((,class :inherit modus-theme-slant :foreground ,yellow)))
   `(mu4e-ok-face ((,class :inherit bold :foreground ,green)))
   `(mu4e-region-code ((,class :inherit modus-theme-special-calm)))
   `(mu4e-replied-face ((,class :foreground ,blue-faint)))
   `(mu4e-special-header-value-face ((,class :inherit bold :foreground ,blue-alt-other)))
   `(mu4e-system-face ((,class :inherit modus-theme-slant :foreground ,fg-mark-del)))
   `(mu4e-title-face ((,class :foreground ,fg-main)))
   `(mu4e-trashed-face ((,class :foreground ,red)))
   `(mu4e-unread-face ((,class :inherit bold :foreground ,fg-main)))
   `(mu4e-url-number-face ((,class :inherit bold :foreground ,cyan-alt-other)))
   `(mu4e-view-body-face ((,class :foreground ,fg-main)))
   `(mu4e-warning-face ((,class :inherit warning)))
;;;;; mu4e-conversation
   `(mu4e-conversation-header ((,class :inherit modus-theme-special-cold)))
   `(mu4e-conversation-sender-1 ((,class :foreground ,fg-special-warm)))
   `(mu4e-conversation-sender-2 ((,class :foreground ,fg-special-cold)))
   `(mu4e-conversation-sender-3 ((,class :foreground ,fg-special-mild)))
   `(mu4e-conversation-sender-4 ((,class :foreground ,fg-alt)))
   `(mu4e-conversation-sender-5 ((,class :foreground ,yellow-refine-fg)))
   `(mu4e-conversation-sender-6 ((,class :foreground ,cyan-refine-fg)))
   `(mu4e-conversation-sender-7 ((,class :foreground ,green-refine-fg)))
   `(mu4e-conversation-sender-8 ((,class :foreground ,blue-refine-fg)))
   `(mu4e-conversation-sender-me ((,class :foreground ,fg-main)))
   `(mu4e-conversation-unread ((,class :inherit bold)))
;;;;; multiple-cursors
   `(mc/cursor-bar-face ((,class :height 1 :background ,fg-main)))
   `(mc/cursor-face ((,class :inverse-video t)))
   `(mc/region-face ((,class :inherit region)))
;;;;; neotree
   `(neo-banner-face ((,class :foreground ,magenta)))
   `(neo-button-face ((,class :inherit button)))
   `(neo-dir-link-face ((,class :inherit bold :foreground ,blue)))
   `(neo-expand-btn-face ((,class :foreground ,cyan)))
   `(neo-file-link-face ((,class :foreground ,fg-main)))
   `(neo-header-face ((,class :inherit bold :foreground ,fg-main)))
   `(neo-root-dir-face ((,class :inherit bold :foreground ,cyan-alt)))
   `(neo-vc-added-face ((,class :foreground ,green)))
   `(neo-vc-conflict-face ((,class :inherit bold :foreground ,red)))
   `(neo-vc-default-face ((,class :foreground ,fg-main)))
   `(neo-vc-edited-face ((,class :foreground ,yellow)))
   `(neo-vc-ignored-face ((,class :foreground ,fg-inactive)))
   `(neo-vc-missing-face ((,class :foreground ,red-alt)))
   `(neo-vc-needs-merge-face ((,class :foreground ,magenta-alt)))
   `(neo-vc-needs-update-face ((,class :underline t)))
   `(neo-vc-removed-face ((,class :strike-through t)))
   `(neo-vc-unlocked-changes-face ((,class :inherit modus-theme-refine-blue)))
   `(neo-vc-up-to-date-face ((,class :foreground ,fg-alt)))
   `(neo-vc-user-face ((,class :foreground ,magenta)))
;;;;; no-emoji
   `(no-emoji ((,class :foreground ,cyan)))
;;;;; notmuch
   `(notmuch-crypto-decryption ((,class :inherit modus-theme-refine-magenta)))
   `(notmuch-crypto-part-header ((,class :foreground ,magenta-alt-other)))
   `(notmuch-crypto-signature-bad ((,class :inherit modus-theme-intense-red)))
   `(notmuch-crypto-signature-good ((,class :inherit modus-theme-refine-green)))
   `(notmuch-crypto-signature-good-key ((,class :inherit modus-theme-refine-yellow)))
   `(notmuch-crypto-signature-unknown ((,class :inherit modus-theme-refine-red)))
   `(notmuch-hello-logo-background ((,class :background ,bg-main)))
   `(notmuch-message-summary-face ((,class :inherit modus-theme-nuanced-cyan)))
   `(notmuch-search-flagged-face ((,class :foreground ,red-alt)))
   `(notmuch-search-matching-authors ((,class :foreground ,fg-main)))
   `(notmuch-search-non-matching-authors ((,class :foreground ,fg-alt)))
   `(notmuch-search-unread-face ((,class :inherit bold)))
   `(notmuch-tag-added
     ((,(append '((supports :underline (:style wave))) class)
       :underline (:color ,green :style wave))
      (,class :foreground ,green :underline t)))
   `(notmuch-tag-deleted
     ((,(append '((supports :underline (:style wave))) class)
       :underline (:color ,red :style wave))
      (,class :foreground ,red :underline t)))
   `(notmuch-tag-face ((,class :inherit bold :foreground ,blue-alt)))
   `(notmuch-tag-flagged ((,class :foreground ,red-alt)))
   `(notmuch-tag-unread ((,class :foreground ,magenta-alt)))
   `(notmuch-tree-match-author-face ((,class :foreground ,fg-special-cold)))
   `(notmuch-tree-match-face ((,class :foreground ,fg-main)))
   `(notmuch-tree-match-tag-face ((,class :inherit bold :foreground ,blue-alt)))
   `(notmuch-tree-no-match-face ((,class :foreground ,fg-alt)))
   `(notmuch-wash-cited-text ((,class :foreground ,cyan)))
   `(notmuch-wash-toggle-button ((,class :background ,bg-alt :foreground ,fg-alt)))
;;;;; num3-mode
   `(num3-face-even ((,class :inherit bold :background ,bg-alt)))
;;;;; nxml-mode
   `(nxml-attribute-colon ((,class :foreground ,fg-main)))
   `(nxml-attribute-local-name ((,class ,@(modus-operandi-theme-syntax-foreground
                                           cyan-alt cyan-alt-faint))))
   `(nxml-attribute-prefix ((,class :inherit modus-theme-bold
                                    ,@(modus-operandi-theme-syntax-foreground
                                       cyan-alt-other cyan-alt-other-faint))))
   `(nxml-attribute-value ((,class ,@(modus-operandi-theme-syntax-foreground
                                      blue blue-faint))))
   `(nxml-cdata-section-CDATA ((,class :inherit modus-theme-bold
                                       ,@(modus-operandi-theme-syntax-foreground
                                          red-alt red-alt-faint))))
   `(nxml-cdata-section-delimiter ((,class ,@(modus-operandi-theme-syntax-foreground
                                              red-alt red-alt-faint))))
   `(nxml-char-ref-delimiter ((,class ,@(modus-operandi-theme-syntax-foreground
                                         green-alt-other green-alt-other-faint))))
   `(nxml-char-ref-number ((,class :inherit modus-theme-bold
                                   ,@(modus-operandi-theme-syntax-foreground
                                      green-alt-other green-alt-other-faint))))
   `(nxml-delimited-data ((,class :inherit modus-theme-slant :foreground ,fg-special-cold)))
   `(nxml-delimiter ((,class :foreground ,fg-dim)))
   `(nxml-element-colon ((,class :foreground ,fg-main)))
   `(nxml-element-local-name ((,class ,@(modus-operandi-theme-syntax-foreground
                                         magenta magenta-faint))))
   `(nxml-element-prefix ((,class :inherit modus-theme-bold
                                  ,@(modus-operandi-theme-syntax-foreground
                                     magenta-alt magenta-alt-faint))))
   `(nxml-entity-ref-delimiter ((,class ,@(modus-operandi-theme-syntax-foreground
                                           green-alt-other green-alt-other-faint))))
   `(nxml-entity-ref-name ((,class :inherit modus-theme-bold
                                   ,@(modus-operandi-theme-syntax-foreground
                                      green-alt-other green-alt-other-faint))))
   `(nxml-glyph ((,class :inherit modus-theme-intense-neutral)))
   `(nxml-hash ((,class :inherit modus-theme-bold
                        ,@(modus-operandi-theme-syntax-foreground
                           blue-alt blue-alt-faint))))
   `(nxml-heading ((,class :inherit bold)))
   `(nxml-name ((,class :inherit modus-theme-bold
                        ,@(modus-operandi-theme-syntax-foreground
                           magenta-alt magenta-alt-faint))))
   `(nxml-namespace-attribute-colon ((,class :foreground ,fg-main)))
   `(nxml-namespace-attribute-prefix ((,class ,@(modus-operandi-theme-syntax-foreground
                                                 cyan cyan-faint))))
   `(nxml-processing-instruction-target ((,class :inherit modus-theme-bold
                                                 ,@(modus-operandi-theme-syntax-foreground
                                                    magenta-alt-other magenta-alt-other-faint))))
   `(nxml-prolog-keyword ((,class :inherit modus-theme-bold
                                  ,@(modus-operandi-theme-syntax-foreground
                                     magenta-alt-other magenta-alt-other-faint))))
   `(nxml-ref ((,class :inherit modus-theme-bold
                       ,@(modus-operandi-theme-syntax-foreground
                          green-alt-other green-alt-other-faint))))
;;;;; objed
   `(objed-hl ((,class :background ,(if modus-operandi-theme-intense-hl-line
                                        bg-hl-alt-intense bg-hl-alt))))
   `(objed-mark ((,class :background ,bg-active)))
   `(objed-mode-line ((,class :foreground ,cyan-active)))
;;;;; orderless
   `(orderless-match-face-0 ((,class :inherit bold
                                     ,@(modus-operandi-theme-standard-completions
                                        blue-alt-other blue-nuanced-bg
                                        blue-refine-bg blue-refine-fg))))
   `(orderless-match-face-1 ((,class :inherit bold
                                     ,@(modus-operandi-theme-standard-completions
                                        magenta-alt magenta-nuanced-bg
                                        magenta-refine-bg magenta-refine-fg))))
   `(orderless-match-face-2 ((,class :inherit bold
                                     ,@(modus-operandi-theme-standard-completions
                                        green green-nuanced-bg
                                        green-refine-bg green-refine-fg))))
   `(orderless-match-face-3 ((,class :inherit bold
                                     ,@(modus-operandi-theme-standard-completions
                                        yellow yellow-nuanced-bg
                                        yellow-refine-bg yellow-refine-fg))))
;;;;; org
   `(org-agenda-calendar-event ((,class :foreground ,fg-main)))
   `(org-agenda-calendar-sexp ((,class :foreground ,cyan-alt)))
   `(org-agenda-clocking ((,class :inherit modus-theme-special-cold
                                  ,@(and (>= emacs-major-version 27) '(:extend t)))))
   `(org-agenda-column-dateline ((,class :background ,bg-alt)))
   `(org-agenda-current-time ((,class :inherit bold :foreground ,blue-alt-other)))
   `(org-agenda-date ((,class :foreground ,cyan)))
   `(org-agenda-date-today ((,class :inherit bold :foreground ,fg-main :underline t)))
   `(org-agenda-date-weekend ((,class :foreground ,cyan-alt-other)))
   `(org-agenda-diary ((,class :foreground ,fg-main)))
   `(org-agenda-dimmed-todo-face ((,class :inherit bold :foreground ,fg-alt)))
   `(org-agenda-done ((,class :foreground ,green-alt)))
   `(org-agenda-filter-category ((,class :inherit bold :foreground ,magenta-active)))
   `(org-agenda-filter-effort ((,class :inherit bold :foreground ,magenta-active)))
   `(org-agenda-filter-regexp ((,class :inherit bold :foreground ,magenta-active)))
   `(org-agenda-filter-tags ((,class :inherit bold :foreground ,magenta-active)))
   `(org-agenda-restriction-lock ((,class :background ,bg-dim :foreground ,fg-dim)))
   `(org-agenda-structure ((,class :foreground ,blue-alt)))
   `(org-archived ((,class :background ,bg-alt :foreground ,fg-alt)))
   `(org-block ((,class ,@(modus-operandi-theme-mixed-fonts)
                        ,@(modus-operandi-theme-org-block bg-dim)
                        :foreground ,fg-main)))
   `(org-block-begin-line ((,class ,@(modus-operandi-theme-mixed-fonts)
                                   ,@(modus-operandi-theme-org-block-delim
                                      bg-dim fg-special-cold
                                      bg-alt fg-special-mild))))
   `(org-block-end-line ((,class :inherit org-block-begin-line)))
   `(org-checkbox ((,class :box (:line-width 1 :color ,bg-active)
                           :background ,bg-inactive :foreground ,fg-active)))
   `(org-checkbox-statistics-done ((,class :inherit org-done)))
   `(org-checkbox-statistics-todo ((,class :inherit org-todo)))
   `(org-clock-overlay ((,class :inherit modus-theme-special-cold)))
   `(org-code ((,class ,@(modus-operandi-theme-mixed-fonts) :foreground ,magenta)))
   `(org-column ((,class :background ,bg-alt)))
   `(org-column-title ((,class :inherit bold :underline t :background ,bg-alt)))
   `(org-date ((,class :inherit (button fixed-pitch)
                       ,@(modus-operandi-theme-link-color
                          cyan cyan-faint))))
   `(org-date-selected ((,class :inherit bold :foreground ,blue-alt :inverse-video t)))
   `(org-document-info ((,class :foreground ,fg-special-cold)))
   `(org-document-info-keyword ((,class ,@(modus-operandi-theme-mixed-fonts)
                                        :foreground ,fg-alt)))
   `(org-document-title ((,class :inherit (bold modus-theme-variable-pitch) :foreground ,fg-special-cold
                                 ,@(modus-operandi-theme-scale modus-operandi-theme-scale-5))))
   `(org-done ((,class :foreground ,green)))
   `(org-drawer ((,class ,@(modus-operandi-theme-mixed-fonts)
                         :foreground ,fg-alt)))
   `(org-ellipsis ((,class :foreground nil))) ; inherits from the heading's color
   `(org-footnote ((,class :inherit button
                           ,@(modus-operandi-theme-link-color
                              blue-alt blue-alt-faint))))
   `(org-formula ((,class ,@(modus-operandi-theme-mixed-fonts)
                          :foreground ,red-alt)))
   `(org-habit-alert-face ((,class :inherit modus-theme-intense-yellow)))
   `(org-habit-alert-future-face ((,class :inherit modus-theme-refine-yellow)))
   `(org-habit-clear-face ((,class :inherit modus-theme-intense-magenta)))
   `(org-habit-clear-future-face ((,class :inherit modus-theme-refine-magenta)))
   `(org-habit-overdue-face ((,class :inherit modus-theme-intense-red)))
   `(org-habit-overdue-future-face ((,class :inherit modus-theme-refine-red)))
   `(org-habit-ready-face ((,class :inherit modus-theme-intense-blue)))
   `(org-habit-ready-future-face ((,class :inherit modus-theme-refine-blue)))
   `(org-headline-done ((,class :inherit modus-theme-variable-pitch :foreground ,green-nuanced)))
   `(org-headline-todo ((,class :inherit modus-theme-variable-pitch :foreground ,red-nuanced)))
   `(org-hide ((,class :foreground ,bg-main)))
   `(org-indent ((,class :inherit (fixed-pitch org-hide))))
   `(org-latex-and-related ((,class :foreground ,magenta-refine-fg)))
   `(org-level-1 ((,class :inherit modus-theme-heading-1)))
   `(org-level-2 ((,class :inherit modus-theme-heading-2)))
   `(org-level-3 ((,class :inherit modus-theme-heading-3)))
   `(org-level-4 ((,class :inherit modus-theme-heading-4)))
   `(org-level-5 ((,class :inherit modus-theme-heading-5)))
   `(org-level-6 ((,class :inherit modus-theme-heading-6)))
   `(org-level-7 ((,class :inherit modus-theme-heading-7)))
   `(org-level-8 ((,class :inherit modus-theme-heading-8)))
   `(org-link ((,class :inherit button)))
   `(org-list-dt ((,class :inherit bold)))
   `(org-macro ((,class :background ,blue-nuanced-bg :foreground ,magenta-alt-other)))
   `(org-meta-line ((,class ,@(modus-operandi-theme-mixed-fonts) :foreground ,fg-alt)))
   `(org-mode-line-clock ((,class :foreground ,fg-main)))
   `(org-mode-line-clock-overrun ((,class :inherit modus-theme-active-red)))
   `(org-priority ((,class :foreground ,magenta)))
   `(org-property-value ((,class ,@(modus-operandi-theme-mixed-fonts)
                                 :foreground ,fg-special-cold)))
   `(org-quote ((,class :inherit modus-theme-slant
                        ,@(modus-operandi-theme-org-block bg-dim)
                        :foreground ,fg-special-cold)))
   `(org-scheduled ((,class :foreground ,fg-special-warm)))
   `(org-scheduled-previously ((,class :foreground ,yellow-alt-other)))
   `(org-scheduled-today ((,class :foreground ,magenta-alt-other)))
   `(org-sexp-date ((,class :inherit org-date)))
   `(org-special-keyword ((,class ,@(modus-operandi-theme-mixed-fonts)
                                  :foreground ,fg-alt)))
   `(org-table ((,class ,@(modus-operandi-theme-mixed-fonts)
                        :foreground ,fg-special-cold)))
   `(org-table-header ((,class :inherit (fixed-pitch modus-theme-intense-neutral))))
   `(org-tag ((,class :foreground ,magenta-nuanced)))
   `(org-tag-group ((,class :inherit bold :foreground ,cyan-nuanced)))
   `(org-target ((,class :underline t)))
   `(org-time-grid ((,class :foreground ,fg-unfocused)))
   `(org-todo ((,class :foreground ,red)))
   `(org-upcoming-deadline ((,class :foreground ,red-alt-other)))
   `(org-upcoming-distant-deadline ((,class :foreground ,red-nuanced)))
   `(org-verbatim ((,class ,@(modus-operandi-theme-mixed-fonts)
                           :background ,bg-alt :foreground ,fg-special-calm)))
   `(org-verse ((,class :inherit org-quote)))
   `(org-warning ((,class :inherit bold :foreground ,red-alt-other)))
;;;;; org-journal
   `(org-journal-calendar-entry-face ((,class :inherit modus-theme-slant :foreground ,yellow-alt-other)))
   `(org-journal-calendar-scheduled-face ((,class :inherit modus-theme-slant :foreground ,red-alt-other)))
   `(org-journal-highlight ((,class :foreground ,magenta-alt)))
;;;;; org-noter
   `(org-noter-no-notes-exist-face ((,class :inherit bold :foreground ,red-active)))
   `(org-noter-notes-exist-face ((,class :inherit bold :foreground ,green-active)))
;;;;; org-pomodoro
   `(org-pomodoro-mode-line ((,class :foreground ,red-active)))
   `(org-pomodoro-mode-line-break ((,class :foreground ,cyan-active)))
   `(org-pomodoro-mode-line-overtime ((,class :inherit bold :foreground ,red-active)))
;;;;; org-recur
   `(org-recur ((,class :foreground ,magenta-active)))
;;;;; org-roam
   `(org-roam-link ((,class :inherit button
                            ,@(modus-operandi-theme-link-color
                               green green-faint))))
   `(org-roam-link-current ((,class :inherit button
                                    ,@(modus-operandi-theme-link-color
                                       green-alt green-alt-faint))))
   `(org-roam-link-invalid ((,class :inherit button
                                    ,@(modus-operandi-theme-link-color
                                       red red-faint))))
   `(org-roam-link-shielded ((,class :inherit button
                                     ,@(modus-operandi-theme-link-color
                                        yellow yellow-faint))))
   `(org-roam-tag ((,class :inherit italic :foreground ,fg-alt)))
;;;;; org-superstar
   `(org-superstar-item ((,class :foreground ,fg-main)))
   `(org-superstar-leading ((,class :foreground ,fg-whitespace)))
;;;;; org-table-sticky-header
   `(org-table-sticky-header-face ((,class :inherit modus-theme-intense-neutral)))
;;;;; org-treescope
   `(org-treescope-faces--markerinternal-midday ((,class :inherit modus-theme-intense-blue)))
   `(org-treescope-faces--markerinternal-range ((,class :inherit modus-theme-special-mild)))
;;;;; origami
   `(origami-fold-header-face ((,class :background ,bg-dim :foreground ,fg-dim :box t)))
   `(origami-fold-replacement-face ((,class :background ,bg-alt :foreground ,fg-alt)))
;;;;; outline-mode
   `(outline-1 ((,class :inherit modus-theme-heading-1)))
   `(outline-2 ((,class :inherit modus-theme-heading-2)))
   `(outline-3 ((,class :inherit modus-theme-heading-3)))
   `(outline-4 ((,class :inherit modus-theme-heading-4)))
   `(outline-5 ((,class :inherit modus-theme-heading-5)))
   `(outline-6 ((,class :inherit modus-theme-heading-6)))
   `(outline-7 ((,class :inherit modus-theme-heading-7)))
   `(outline-8 ((,class :inherit modus-theme-heading-8)))
;;;;; outline-minor-faces
   `(outline-minor-0 ((,class nil)))
;;;;; package (M-x list-packages)
   `(package-description ((,class :foreground ,fg-special-cold)))
   `(package-help-section-name ((,class :inherit bold :foreground ,magenta-alt-other)))
   `(package-name ((,class :inherit button)))
   `(package-status-avail-obso ((,class :inherit bold :foreground ,red)))
   `(package-status-available ((,class :foreground ,fg-special-mild)))
   `(package-status-built-in ((,class :foreground ,magenta)))
   `(package-status-dependency ((,class :foreground ,magenta-alt-other)))
   `(package-status-disabled ((,class :inherit modus-theme-subtle-red)))
   `(package-status-external ((,class :foreground ,cyan-alt-other)))
   `(package-status-held ((,class :foreground ,yellow-alt)))
   `(package-status-incompat ((,class :inherit bold :foreground ,yellow)))
   `(package-status-installed ((,class :foreground ,fg-special-warm)))
   `(package-status-new ((,class :inherit bold :foreground ,green)))
   `(package-status-unsigned ((,class :inherit bold :foreground ,red-alt)))
;;;;; page-break-lines
   `(page-break-lines ((,class :inherit default :foreground ,fg-window-divider-outer)))
;;;;; paradox
   `(paradox-archive-face ((,class :foreground ,fg-special-mild)))
   `(paradox-comment-face ((,class :inherit modus-theme-slant :foreground ,fg-alt)))
   `(paradox-commit-tag-face ((,class :inherit modus-theme-refine-magenta :box t)))
   `(paradox-description-face ((,class :foreground ,fg-special-cold)))
   `(paradox-description-face-multiline ((,class :foreground ,fg-special-cold)))
   `(paradox-download-face ((,class :inherit modus-theme-bold :foreground ,blue-alt-other)))
   `(paradox-highlight-face ((,class :inherit modus-theme-bold :foreground ,cyan-alt-other)))
   `(paradox-homepage-button-face ((,class :foreground ,magenta-alt-other :underline t)))
   `(paradox-mode-line-face ((,class :inherit bold :foreground ,cyan-active)))
   `(paradox-name-face ((,class :foreground ,blue :underline t)))
   `(paradox-star-face ((,class :foreground ,magenta)))
   `(paradox-starred-face ((,class :foreground ,magenta-alt)))
;;;;; paren-face
   `(parenthesis ((,class :foreground ,fg-unfocused)))
;;;;; parrot
   `(parrot-rotate-rotation-highlight-face ((,class :inherit modus-theme-refine-magenta)))
;;;;; pass
   `(pass-mode-directory-face ((,class :inherit bold :foreground ,fg-special-cold)))
   `(pass-mode-entry-face ((,class :background ,bg-main :foreground ,fg-main)))
   `(pass-mode-header-face ((,class :foreground ,fg-special-warm)))
;;;;; persp-mode
   `(persp-face-lighter-buffer-not-in-persp ((,class :inherit modus-theme-intense-red)))
   `(persp-face-lighter-default ((,class :inherit bold :foreground ,blue-active)))
   `(persp-face-lighter-nil-persp ((,class :inherit bold :foreground ,fg-active)))
;;;;; perspective
   `(persp-selected-face ((,class :inherit bold :foreground ,blue-active)))
;;;;; phi-grep
   `(phi-grep-heading-face  ((,class :inherit bold :foreground ,red-alt
                                     ,@(modus-operandi-theme-scale modus-operandi-theme-scale-4))))
   `(phi-grep-line-number-face ((,class :foreground ,fg-special-warm)))
   `(phi-grep-match-face ((,class :inherit modus-theme-special-calm)))
   `(phi-grep-modified-face ((,class :inherit modus-theme-refine-yellow)))
   `(phi-grep-overlay-face ((,class :inherit modus-theme-refine-blue)))
;;;;; phi-search
   `(phi-replace-preview-face ((,class :inherit modus-theme-intense-magenta)))
   `(phi-search-failpart-face ((,class :inherit modus-theme-refine-red)))
   `(phi-search-match-face ((,class :inherit modus-theme-refine-cyan)))
   `(phi-search-selection-face ((,class :inherit (modus-theme-intense-green bold))))
;;;;; pkgbuild-mode
   `(pkgbuild-error-face ((,class :underline ,fg-lang-error)))
;;;;; pomidor
   `(pomidor-break-face ((,class :foreground ,blue-alt-other)))
   `(pomidor-overwork-face ((,class :foreground ,red-alt-other)))
   `(pomidor-skip-face ((,class :inherit modus-theme-slant :foreground ,fg-alt)))
   `(pomidor-work-face ((,class :foreground ,green-alt-other)))
;;;;; popup
   `(popup-face ((,class :background ,bg-alt :foreground ,fg-main)))
   `(popup-isearch-match ((,class :inherit (modus-theme-refine-cyan bold))))
   `(popup-menu-mouse-face ((,class :inherit modus-theme-intense-blue)))
   `(popup-menu-selection-face ((,class :inherit (modus-theme-subtle-cyan bold))))
   `(popup-scroll-bar-background-face ((,class :background ,bg-active)))
   `(popup-scroll-bar-foreground-face ((,class :foreground ,fg-active)))
   `(popup-summary-face ((,class :background ,bg-active :foreground ,fg-inactive)))
   `(popup-tip-face ((,class :inherit modus-theme-refine-yellow)))
;;;;; powerline
   `(powerline-active0 ((,class :background ,bg-main :foreground ,blue-faint :inverse-video t)))
   `(powerline-active1 ((,class :background ,blue-nuanced-bg :foreground ,blue-nuanced)))
   `(powerline-active2 ((,class :background ,bg-active :foreground ,fg-active)))
   `(powerline-inactive0 ((,class :background ,bg-special-cold :foreground ,fg-special-cold)))
   `(powerline-inactive1 ((,class :background ,bg-dim :foreground ,fg-inactive)))
   `(powerline-inactive2 ((,class :background ,bg-inactive :foreground ,fg-inactive)))
;;;;; powerline-evil
   `(powerline-evil-base-face ((,class :background ,fg-main :foreground ,bg-main)))
   `(powerline-evil-emacs-face ((,class :inherit modus-theme-active-magenta)))
   `(powerline-evil-insert-face ((,class :inherit modus-theme-active-green)))
   `(powerline-evil-motion-face ((,class :inherit modus-theme-active-blue)))
   `(powerline-evil-normal-face ((,class :background ,fg-alt :foreground ,bg-main)))
   `(powerline-evil-operator-face ((,class :inherit modus-theme-active-yellow)))
   `(powerline-evil-replace-face ((,class :inherit modus-theme-active-red)))
   `(powerline-evil-visual-face ((,class :inherit modus-theme-active-cyan)))
;;;;; proced
   `(proced-mark ((,class :inherit modus-theme-mark-symbol)))
   `(proced-marked ((,class :inherit modus-theme-mark-alt)))
   `(proced-sort-header ((,class :inherit bold :foreground ,fg-special-calm :underline t)))
;;;;; prodigy
   `(prodigy-green-face ((,class :foreground ,green)))
   `(prodigy-red-face ((,class :foreground ,red)))
   `(prodigy-yellow-face ((,class :foreground ,yellow)))
;;;;; racket-mode
   `(racket-debug-break-face ((,class :inherit modus-theme-intense-red)))
   `(racket-debug-locals-face ((,class :box (:line-width -1 :color nil)
                                       :foreground ,green-alt-other)))
   `(racket-debug-result-face ((,class :inherit bold :box (:line-width -1 :color nil)
                                       :foreground ,green)))
   `(racket-here-string-face ((,class :foreground ,blue-alt)))
   `(racket-keyword-argument-face ((,class :foreground ,red-alt)))
   `(racket-logger-config-face ((,class :inherit modus-theme-slant :foreground ,fg-alt)))
   `(racket-logger-debug-face ((,class :foreground ,blue-alt-other)))
   `(racket-logger-info-face ((,class :foreground ,fg-lang-note)))
   `(racket-logger-topic-face ((,class :inherit modus-theme-slant :foreground ,magenta)))
   `(racket-selfeval-face ((,class :foreground ,green-alt)))
   `(racket-xp-error-face
     ((,(append '((supports :underline (:style wave))) class)
       :underline (:color ,fg-lang-error :style wave))
      (,class :foreground ,fg-lang-error :underline t)))
;;;;; rainbow-blocks
   `(rainbow-blocks-depth-1-face ((,class :foreground ,magenta-alt-other)))
   `(rainbow-blocks-depth-2-face ((,class :foreground ,blue)))
   `(rainbow-blocks-depth-3-face ((,class :foreground ,magenta-alt)))
   `(rainbow-blocks-depth-4-face ((,class :foreground ,green)))
   `(rainbow-blocks-depth-5-face ((,class :foreground ,magenta)))
   `(rainbow-blocks-depth-6-face ((,class :foreground ,cyan)))
   `(rainbow-blocks-depth-7-face ((,class :foreground ,yellow)))
   `(rainbow-blocks-depth-8-face ((,class :foreground ,cyan-alt)))
   `(rainbow-blocks-depth-9-face ((,class :foreground ,red-alt)))
   `(rainbow-blocks-unmatched-face ((,class :foreground ,red)))
;;;;; rainbow-identifiers
   `(rainbow-identifiers-identifier-1 ((,class :foreground ,green-alt-other)))
   `(rainbow-identifiers-identifier-2 ((,class :foreground ,magenta-alt-other)))
   `(rainbow-identifiers-identifier-3 ((,class :foreground ,cyan-alt-other)))
   `(rainbow-identifiers-identifier-4 ((,class :foreground ,yellow-alt-other)))
   `(rainbow-identifiers-identifier-5 ((,class :foreground ,blue-alt-other)))
   `(rainbow-identifiers-identifier-6 ((,class :foreground ,green-alt)))
   `(rainbow-identifiers-identifier-7 ((,class :foreground ,magenta-alt)))
   `(rainbow-identifiers-identifier-8 ((,class :foreground ,cyan-alt)))
   `(rainbow-identifiers-identifier-9 ((,class :foreground ,yellow-alt)))
   `(rainbow-identifiers-identifier-10 ((,class :foreground ,green)))
   `(rainbow-identifiers-identifier-11 ((,class :foreground ,magenta)))
   `(rainbow-identifiers-identifier-12 ((,class :foreground ,cyan)))
   `(rainbow-identifiers-identifier-13 ((,class :foreground ,yellow)))
   `(rainbow-identifiers-identifier-14 ((,class :foreground ,blue-alt)))
   `(rainbow-identifiers-identifier-15 ((,class :foreground ,red-alt)))
;;;;; rainbow-delimiters
   `(rainbow-delimiters-base-face-error ((,class :foreground ,red)))
   `(rainbow-delimiters-base-face ((,class :foreground ,fg-main)))
   `(rainbow-delimiters-depth-1-face ((,class :foreground ,green-alt-other)))
   `(rainbow-delimiters-depth-2-face ((,class :foreground ,magenta-alt-other)))
   `(rainbow-delimiters-depth-3-face ((,class :foreground ,cyan-alt-other)))
   `(rainbow-delimiters-depth-4-face ((,class :foreground ,yellow-alt-other)))
   `(rainbow-delimiters-depth-5-face ((,class :foreground ,blue-alt-other)))
   `(rainbow-delimiters-depth-6-face ((,class :foreground ,green-alt)))
   `(rainbow-delimiters-depth-7-face ((,class :foreground ,magenta-alt)))
   `(rainbow-delimiters-depth-8-face ((,class :foreground ,cyan-alt)))
   `(rainbow-delimiters-depth-9-face ((,class :foreground ,yellow-alt)))
   `(rainbow-delimiters-mismatched-face ((,class :inherit bold :foreground ,red-alt)))
   `(rainbow-delimiters-unmatched-face ((,class :inherit bold :foreground ,red)))
;;;;; rcirc
   `(rcirc-bright-nick ((,class :inherit bold :foreground ,magenta-alt)))
   `(rcirc-dim-nick ((,class :foreground ,fg-alt)))
   `(rcirc-my-nick ((,class :inherit bold :foreground ,magenta)))
   `(rcirc-nick-in-message ((,class :foreground ,magenta-alt-other)))
   `(rcirc-nick-in-message-full-line ((,class :inherit bold :foreground ,fg-special-mild)))
   `(rcirc-other-nick ((,class :inherit bold :foreground ,fg-special-cold)))
   `(rcirc-prompt ((,class :inherit bold :foreground ,cyan-alt-other)))
   `(rcirc-server ((,class :foreground ,fg-unfocused)))
   `(rcirc-timestamp ((,class :foreground ,blue-nuanced)))
   `(rcirc-url ((,class :foreground ,blue :underline t)))
;;;;; regexp-builder (re-builder)
   `(reb-match-0 ((,class :inherit modus-theme-intense-blue)))
   `(reb-match-1 ((,class :inherit modus-theme-intense-magenta)))
   `(reb-match-2 ((,class :inherit modus-theme-intense-green)))
   `(reb-match-3 ((,class :inherit modus-theme-intense-red)))
   `(reb-regexp-grouping-backslash ((,class :inherit bold :foreground ,fg-escape-char-backslash)))
   `(reb-regexp-grouping-construct ((,class :inherit bold :foreground ,fg-escape-char-construct)))
;;;;; rg (rg.el)
   `(rg-column-number-face ((,class :foreground ,magenta-alt-other)))
   `(rg-context-face ((,class :foreground ,fg-unfocused)))
   `(rg-error-face ((,class :inherit bold :foreground ,red)))
   `(rg-file-tag-face ((,class :foreground ,fg-special-cold)))
   `(rg-filename-face ((,class :inherit bold :foreground ,fg-special-cold)))
   `(rg-line-number-face ((,class :foreground ,fg-special-warm)))
   `(rg-literal-face ((,class :foreground ,blue-alt)))
   `(rg-match-face ((,class :inherit modus-theme-special-calm)))
   `(rg-regexp-face ((,class :foreground ,magenta-active)))
   `(rg-toggle-off-face ((,class :inherit bold :foreground ,fg-inactive)))
   `(rg-toggle-on-face ((,class :inherit bold :foreground ,cyan-active)))
   `(rg-warning-face ((,class :inherit bold :foreground ,yellow)))
;;;;; ripgrep
   `(ripgrep-context-face ((,class :foreground ,fg-unfocused)))
   `(ripgrep-error-face ((,class :inherit bold :foreground ,red)))
   `(ripgrep-hit-face ((,class :foreground ,cyan)))
   `(ripgrep-match-face ((,class :inherit modus-theme-special-calm)))
;;;;; rmail
   `(rmail-header-name ((,class :foreground ,cyan-alt-other)))
   `(rmail-highlight ((,class :inherit bold :foreground ,magenta-alt)))
;;;;; ruler-mode
   `(ruler-mode-column-number ((,class :inherit (ruler-mode-default bold) :foreground ,fg-main)))
   `(ruler-mode-comment-column ((,class :inherit ruler-mode-default :foreground ,red-active)))
   `(ruler-mode-current-column ((,class :inherit ruler-mode-default :foreground ,cyan-active :box t)))
   `(ruler-mode-default ((,class :background ,bg-inactive :foreground ,fg-inactive)))
   `(ruler-mode-fill-column ((,class :inherit ruler-mode-default :foreground ,green-active)))
   `(ruler-mode-fringes ((,class :inherit ruler-mode-default :foreground ,blue-active)))
   `(ruler-mode-goal-column ((,class :inherit ruler-mode-default :foreground ,magenta-active)))
   `(ruler-mode-margins ((,class :inherit ruler-mode-default :foreground ,bg-main)))
   `(ruler-mode-pad ((,class :background ,bg-active :foreground ,fg-inactive)))
   `(ruler-mode-tab-stop ((,class :inherit ruler-mode-default :foreground ,yellow-active)))
;;;;; sallet
   `(sallet-buffer-compressed ((,class :inherit italic :foreground ,yellow-nuanced)))
   `(sallet-buffer-default-directory ((,class :foreground ,cyan-nuanced)))
   `(sallet-buffer-directory ((,class :foreground ,blue-nuanced)))
   `(sallet-buffer-help ((,class :foreground ,fg-special-cold)))
   `(sallet-buffer-modified ((,class :inherit italic :foreground ,yellow-alt-other)))
   `(sallet-buffer-ordinary ((,class :foreground ,fg-main)))
   `(sallet-buffer-read-only ((,class :foreground ,yellow-alt)))
   `(sallet-buffer-size ((,class :foreground ,fg-special-calm)))
   `(sallet-buffer-special ((,class :foreground ,magenta-alt-other)))
   `(sallet-flx-match ((,class ,@(modus-operandi-theme-extra-completions
                                  'modus-theme-subtle-cyan
                                  'modus-theme-refine-cyan
                                  'modus-theme-nuanced-cyan
                                  cyan-alt-other))))
   `(sallet-recentf-buffer-name ((,class :foreground ,blue-nuanced)))
   `(sallet-recentf-file-path ((,class :foreground ,fg-special-mild)))
   `(sallet-regexp-match ((,class ,@(modus-operandi-theme-extra-completions
                                     'modus-theme-subtle-magenta
                                     'modus-theme-refine-magenta
                                     'modus-theme-nuanced-magenta
                                     magenta-alt-other))))
   `(sallet-source-header ((,class :inherit bold :foreground ,red-alt
                                   ,@(modus-operandi-theme-scale modus-operandi-theme-scale-4))))
   `(sallet-substring-match ((,class ,@(modus-operandi-theme-extra-completions
                                        'modus-theme-subtle-blue
                                        'modus-theme-refine-blue
                                        'modus-theme-nuanced-blue
                                        blue-alt-other))))
;;;;; selectrum
   `(selectrum-current-candidate
     ((,class :inherit bold :foreground ,fg-main :underline ,fg-main
              :background ,@(pcase modus-operandi-theme-completions
                              ('opinionated (list bg-active))
                              (_ (list bg-inactive))))))
   `(selectrum-primary-highlight ((,class :inherit bold
                                          ,@(modus-operandi-theme-standard-completions
                                             magenta-alt magenta-nuanced-bg
                                             magenta-refine-bg magenta-refine-fg))))
   `(selectrum-secondary-highlight ((,class :inherit bold
                                            ,@(modus-operandi-theme-standard-completions
                                               cyan-alt-other cyan-nuanced-bg
                                               cyan-refine-bg cyan-refine-fg))))
;;;;; semantic
   `(semantic-complete-inline-face ((,class :foreground ,fg-special-warm :underline t)))
   `(semantic-decoration-on-private-members-face ((,class :inherit modus-theme-refine-cyan)))
   `(semantic-decoration-on-protected-members-face ((,class :background ,bg-dim)))
   `(semantic-highlight-edits-face ((,class :background ,bg-alt)))
   `(semantic-highlight-func-current-tag-face ((,class :background ,bg-alt)))
   `(semantic-idle-symbol-highlight ((,class :inherit modus-theme-special-mild)))
   `(semantic-tag-boundary-face ((,class :overline ,blue-intense)))
   `(semantic-unmatched-syntax-face ((,class :underline ,fg-lang-error)))
;;;;; sesman
   `(sesman-browser-button-face ((,class :foreground ,blue-alt-other :underline t)))
   `(sesman-browser-highligh-face ((,class :inherit modus-theme-subtle-blue)))
   `(sesman-buffer-face ((,class :foreground ,magenta)))
   `(sesman-directory-face ((,class :inherit bold :foreground ,blue)))
   `(sesman-project-face ((,class :inherit bold :foreground ,magenta-alt-other)))
;;;;; shell-script-mode
   `(sh-heredoc ((,class :foreground ,blue-alt)))
   `(sh-quoted-exec ((,class :inherit modus-theme-bold :foreground ,magenta-alt)))
;;;;; show-paren-mode
   `(show-paren-match ((,class ,@(modus-operandi-theme-paren bg-paren-match
                                                             bg-paren-match-intense)
                               :foreground ,fg-main)))
   `(show-paren-match-expression ((,class :inherit modus-theme-special-calm)))
   `(show-paren-mismatch ((,class :inherit modus-theme-intense-red)))
;;;;; side-notes
   `(side-notes ((,class :background ,bg-dim :foreground ,fg-dim)))
;;;;; skewer-mode
   `(skewer-error-face ((,class :foreground ,red :underline t)))
;;;;; smart-mode-line
   `(sml/charging ((,class :foreground ,green-active)))
   `(sml/discharging ((,class :foreground ,red-active)))
   `(sml/filename ((,class :inherit bold :foreground ,blue-active)))
   `(sml/folder ((,class :foreground ,fg-active)))
   `(sml/git ((,class :inherit bold :foreground ,green-active)))
   `(sml/global ((,class :foreground ,fg-active)))
   `(sml/line-number ((,class :inherit sml/global)))
   `(sml/minor-modes ((,class :inherit sml/global)))
   `(sml/modes ((,class :inherit bold :foreground ,fg-active)))
   `(sml/modified ((,class :inherit bold :foreground ,magenta-active)))
   `(sml/mule-info ((,class :inherit sml/global)))
   `(sml/name-filling ((,class :foreground ,yellow-active)))
   `(sml/not-modified ((,class :inherit sml/global)))
   `(sml/numbers-separator ((,class :inherit sml/global)))
   `(sml/outside-modified ((,class :inherit modus-theme-intense-red)))
   `(sml/position-percentage ((,class :inherit sml/global)))
   `(sml/prefix ((,class :foreground ,green-active)))
   `(sml/process ((,class :inherit sml/prefix)))
   `(sml/projectile ((,class :inherit sml/git)))
   `(sml/read-only ((,class :inherit bold :foreground ,cyan-active)))
   `(sml/remote ((,class :inherit sml/global)))
   `(sml/sudo ((,class :inherit modus-theme-subtle-red)))
   `(sml/time ((,class :inherit sml/global)))
   `(sml/vc ((,class :inherit sml/git)))
   `(sml/vc-edited ((,class :inherit bold :foreground ,yellow-active)))
;;;;; smartparens
   `(sp-pair-overlay-face ((,class :inherit modus-theme-special-warm)))
   `(sp-show-pair-enclosing ((,class :inherit modus-theme-special-mild)))
   `(sp-show-pair-match-face ((,class ,@(modus-operandi-theme-paren bg-paren-match
                                                                    bg-paren-match-intense)
                                      :foreground ,fg-main)))
   `(sp-show-pair-mismatch-face ((,class :inherit modus-theme-intense-red)))
   `(sp-wrap-overlay-closing-pair ((,class :inherit sp-pair-overlay-face)))
   `(sp-wrap-overlay-face ((,class :inherit sp-pair-overlay-face)))
   `(sp-wrap-overlay-opening-pair ((,class :inherit sp-pair-overlay-face)))
   `(sp-wrap-tag-overlay-face ((,class :inherit sp-pair-overlay-face)))
;;;;; smerge
   `(smerge-base ((,class :inherit modus-theme-diff-changed)))
   `(smerge-lower ((,class :inherit modus-theme-diff-added)))
   `(smerge-markers ((,class :background ,bg-diff-neutral-2 :foreground ,fg-diff-neutral-2)))
   `(smerge-refined-added ((,class :inherit modus-theme-diff-refine-added)))
   `(smerge-refined-changed ((,class)))
   `(smerge-refined-removed ((,class :inherit modus-theme-diff-refine-removed)))
   `(smerge-upper ((,class :inherit modus-theme-diff-removed)))
;;;;; spaceline
   `(spaceline-evil-emacs ((,class :inherit modus-theme-active-magenta)))
   `(spaceline-evil-insert ((,class :inherit modus-theme-active-green)))
   `(spaceline-evil-motion ((,class :inherit modus-theme-active-blue)))
   `(spaceline-evil-normal ((,class :background ,fg-alt :foreground ,bg-alt)))
   `(spaceline-evil-replace ((,class :inherit modus-theme-active-red)))
   `(spaceline-evil-visual ((,class :inherit modus-theme-active-cyan)))
   `(spaceline-flycheck-error ((,class :foreground ,red-active)))
   `(spaceline-flycheck-info ((,class :foreground ,cyan-active)))
   `(spaceline-flycheck-warning ((,class :foreground ,yellow-active)))
   `(spaceline-highlight-face ((,class :inherit modus-theme-fringe-blue)))
   `(spaceline-modified ((,class :inherit modus-theme-fringe-magenta)))
   `(spaceline-python-venv ((,class :foreground ,magenta-active)))
   `(spaceline-read-only ((,class :inherit modus-theme-fringe-red)))
   `(spaceline-unmodified ((,class :inherit modus-theme-fringe-cyan)))
;;;;; speedbar
   `(speedbar-button-face ((,class :inherit button)))
   `(speedbar-directory-face ((,class :inherit bold :foreground ,blue)))
   `(speedbar-file-face ((,class :foreground ,fg-main)))
   `(speedbar-highlight-face ((,class :inherit modus-theme-subtle-blue)))
   `(speedbar-selected-face ((,class :inherit bold :foreground ,cyan)))
   `(speedbar-separator-face ((,class :inherit modus-theme-intense-neutral)))
   `(speedbar-tag-face ((,class :foreground ,yellow-alt-other)))
;;;;; spell-fu
   `(spell-fu-incorrect-face
     ((,(append '((supports :underline (:style wave))) class)
       :foreground ,fg-lang-error :underline (:style wave))
      (,class :foreground ,fg-lang-error :underline t)))
;;;;; stripes
   `(stripes ((,class :inherit modus-theme-hl-line)))
;;;;; success
   `(suggest-heading ((,class :inherit bold :foreground ,yellow-alt-other)))
;;;;; switch-window
   `(switch-window-background ((,class :background ,bg-dim)))
   `(switch-window-label ((,class :height 3.0 :foreground ,blue-intense)))
;;;;; swiper
   `(swiper-background-match-face-1 ((,class :inherit modus-theme-subtle-neutral)))
   `(swiper-background-match-face-2 ((,class :inherit modus-theme-subtle-cyan)))
   `(swiper-background-match-face-3 ((,class :inherit modus-theme-subtle-magenta)))
   `(swiper-background-match-face-4 ((,class :inherit modus-theme-subtle-green)))
   `(swiper-line-face ((,class ,@(and (>= emacs-major-version 27) '(:extend t))
                               :inherit modus-theme-special-cold)))
   `(swiper-match-face-1 ((,class :inherit swiper-line-face)))
   `(swiper-match-face-2 ((,class :inherit swiper-line-face)))
   `(swiper-match-face-3 ((,class :inherit swiper-line-face)))
   `(swiper-match-face-4 ((,class :inherit swiper-line-face)))
;;;;; swoop
   `(swoop-face-header-format-line ((,class :inherit bold :foreground ,red-alt
                                            ,@(modus-operandi-theme-scale modus-operandi-theme-scale-3))))
   `(swoop-face-line-buffer-name ((,class :inherit bold :foreground ,blue-alt
                                          ,@(modus-operandi-theme-scale modus-operandi-theme-scale-4))))
   `(swoop-face-line-number ((,class :foreground ,fg-special-warm)))
   `(swoop-face-target-line ((,class :inherit modus-theme-intense-blue
                                     ,@(and (>= emacs-major-version 27) '(:extend t)))))
   `(swoop-face-target-words ((,class :inherit modus-theme-refine-cyan)))
;;;;; sx
   `(sx-inbox-item-type ((,class :foreground ,magenta-alt-other)))
   `(sx-inbox-item-type-unread ((,class :inherit (sx-inbox-item-type bold))))
   `(sx-question-list-answers ((,class :foreground ,green)))
   `(sx-question-list-answers-accepted ((,class :box t :foreground ,green)))
   `(sx-question-list-bounty ((,class :inherit bold :background ,bg-alt :foreground ,yellow)))
   `(sx-question-list-date ((,class :foreground ,fg-special-cold)))
   `(sx-question-list-favorite ((,class :inherit bold :foreground ,fg-special-warm)))
   `(sx-question-list-parent ((,class :foreground ,fg-main)))
   `(sx-question-list-read-question ((,class :foreground ,fg-alt)))
   `(sx-question-list-score ((,class :foreground ,fg-special-mild)))
   `(sx-question-list-score-upvoted ((,class :inherit (sx-question-list-score bold))))
   `(sx-question-list-unread-question ((,class :inherit bold :foreground ,fg-main)))
   `(sx-question-mode-accepted ((,class :inherit bold :height 1.3 :foreground ,green)))
   `(sx-question-mode-closed ((,class :inherit modus-theme-active-yellow :box (:line-width 2 :color nil))))
   `(sx-question-mode-closed-reason ((,class :box (:line-width 2 :color nil) :foreground ,fg-main)))
   `(sx-question-mode-content-face ((,class :background ,bg-dim)))
   `(sx-question-mode-date ((,class :foreground ,blue)))
   `(sx-question-mode-header ((,class :inherit bold :foreground ,cyan)))
   `(sx-question-mode-kbd-tag ((,class :inherit bold :height 0.9 :box (:line-width 3 :color ,fg-main :style released-button) :foreground ,fg-main)))
   `(sx-question-mode-score ((,class :foreground ,fg-dim)))
   `(sx-question-mode-score-downvoted ((,class :foreground ,yellow)))
   `(sx-question-mode-score-upvoted ((,class :inherit bold :foreground ,magenta)))
   `(sx-question-mode-title ((,class :inherit bold :foreground ,fg-main)))
   `(sx-question-mode-title-comments ((,class :inherit bold :foreground ,fg-alt)))
   `(sx-tag ((,class :foreground ,magenta-alt)))
   `(sx-user-name ((,class :foreground ,blue-alt)))
   `(sx-user-reputation ((,class :foreground ,fg-alt)))
;;;;; symbol-overlay
   `(symbol-overlay-default-face ((,class :inherit modus-theme-special-warm)))
   `(symbol-overlay-face-1 ((,class :inherit modus-theme-intense-blue)))
   `(symbol-overlay-face-2 ((,class :inherit modus-theme-refine-magenta)))
   `(symbol-overlay-face-3 ((,class :inherit modus-theme-intense-yellow)))
   `(symbol-overlay-face-4 ((,class :inherit modus-theme-intense-magenta)))
   `(symbol-overlay-face-5 ((,class :inherit modus-theme-intense-red)))
   `(symbol-overlay-face-6 ((,class :inherit modus-theme-refine-red)))
   `(symbol-overlay-face-7 ((,class :inherit modus-theme-intense-cyan)))
   `(symbol-overlay-face-8 ((,class :inherit modus-theme-refine-cyan)))
;;;;; syslog-mode
   `(syslog-debug ((,class :inherit bold :foreground ,cyan-alt-other)))
   `(syslog-error ((,class :inherit bold :foreground ,red)))
   `(syslog-file ((,class :inherit bold :foreground ,fg-special-cold)))
   `(syslog-hide ((,class :background ,bg-main :foreground ,fg-main)))
   `(syslog-hour ((,class :inherit bold :foreground ,magenta-alt-other)))
   `(syslog-info ((,class :inherit bold :foreground ,blue-alt-other)))
   `(syslog-ip ((,class :inherit bold :foreground ,fg-special-mild :underline t)))
   `(syslog-su ((,class :inherit bold :foreground ,red-alt)))
   `(syslog-warn ((,class :inherit bold :foreground ,yellow)))
;;;;; table (built-in table.el)
   `(table-cell ((,class :background ,blue-nuanced-bg)))
;;;;; telephone-line
   `(telephone-line-accent-active ((,class :background ,fg-inactive :foreground ,bg-inactive)))
   `(telephone-line-accent-inactive ((,class :background ,bg-active :foreground ,fg-active)))
   `(telephone-line-error ((,class :inherit bold :foreground ,red-active)))
   `(telephone-line-evil ((,class :foreground ,fg-main)))
   `(telephone-line-evil-emacs ((,class :inherit telephone-line-evil :background ,magenta-intense-bg)))
   `(telephone-line-evil-insert ((,class :inherit telephone-line-evil :background ,green-intense-bg)))
   `(telephone-line-evil-motion ((,class :inherit telephone-line-evil :background ,yellow-intense-bg)))
   `(telephone-line-evil-normal ((,class :inherit telephone-line-evil :background ,bg-alt)))
   `(telephone-line-evil-operator ((,class :inherit telephone-line-evil :background ,yellow-subtle-bg)))
   `(telephone-line-evil-replace ((,class :inherit telephone-line-evil :background ,red-intense-bg)))
   `(telephone-line-evil-visual ((,class :inherit telephone-line-evil :background ,cyan-intense-bg)))
   `(telephone-line-projectile ((,class :foreground ,cyan-active)))
   `(telephone-line-unimportant ((,class :foreground ,fg-inactive)))
   `(telephone-line-warning ((,class :inherit bold :foreground ,yellow-active)))
;;;;; term
   `(term ((,class :background ,bg-main :foreground ,fg-main)))
   `(term-bold ((,class :inherit bold)))
   `(term-color-blue ((,class :background ,blue :foreground ,blue)))
   `(term-color-cyan ((,class :background ,cyan :foreground ,cyan)))
   `(term-color-green ((,class :background ,green :foreground ,green)))
   `(term-color-magenta ((,class :background ,magenta :foreground ,magenta)))
   `(term-color-red ((,class :background ,red :foreground ,red)))
   `(term-color-yellow ((,class :background ,yellow :foreground ,yellow)))
   `(term-underline ((,class :underline t)))
;;;;; tomatinho
   `(tomatinho-ok-face ((,class :foreground ,blue-intense)))
   `(tomatinho-pause-face ((,class :foreground ,yellow-intense)))
   `(tomatinho-reset-face ((,class :foreground ,fg-alt)))
;;;;; transient
   `(transient-active-infix ((,class :inherit modus-theme-special-mild)))
   `(transient-amaranth ((,class :inherit bold :foreground ,yellow)))
   `(transient-argument ((,class :inherit bold :foreground ,red-alt)))
   `(transient-blue ((,class :inherit bold :foreground ,blue)))
   `(transient-disabled-suffix ((,class :inherit modus-theme-intense-red)))
   `(transient-enabled-suffix ((,class :inherit modus-theme-intense-green)))
   `(transient-heading ((,class :inherit bold :foreground ,fg-main)))
   `(transient-inactive-argument ((,class :foreground ,fg-alt)))
   `(transient-inactive-value ((,class :foreground ,fg-alt)))
   `(transient-key ((,class :inherit bold :foreground ,blue)))
   `(transient-mismatched-key ((,class :underline t)))
   `(transient-nonstandard-key ((,class :underline t)))
   `(transient-pink ((,class :inherit bold :foreground ,magenta)))
   `(transient-red ((,class :inherit bold :foreground ,red-intense)))
   `(transient-teal ((,class :inherit bold :foreground ,cyan-alt-other)))
   `(transient-unreachable ((,class :foreground ,fg-unfocused)))
   `(transient-unreachable-key ((,class :foreground ,fg-unfocused)))
   `(transient-value ((,class :inherit bold :foreground ,magenta-alt-other)))
;;;;; trashed
   `(trashed-deleted ((,class :inherit modus-theme-mark-del)))
   `(trashed-directory ((,class :foreground ,blue)))
   `(trashed-mark ((,class :inherit modus-theme-mark-symbol)))
   `(trashed-marked ((,class :inherit modus-theme-mark-alt)))
   `(trashed-restored ((,class :inherit modus-theme-mark-sel)))
   `(trashed-symlink ((,class :inherit button
                              ,@(modus-operandi-theme-link-color
                                 cyan-alt cyan-alt-faint))))
;;;;; treemacs
   `(treemacs-directory-collapsed-face ((,class :foreground ,magenta-alt)))
   `(treemacs-directory-face ((,class :inherit dired-directory)))
   `(treemacs-file-face ((,class :foreground ,fg-main)))
   `(treemacs-fringe-indicator-face ((,class :foreground ,fg-main)))
   `(treemacs-git-added-face ((,class :foreground ,green-intense)))
   `(treemacs-git-conflict-face ((,class :inherit (modus-theme-intense-red bold))))
   `(treemacs-git-ignored-face ((,class :foreground ,fg-alt)))
   `(treemacs-git-modified-face ((,class :foreground ,yellow-alt-other)))
   `(treemacs-git-renamed-face ((,class :foreground ,cyan-alt-other)))
   `(treemacs-git-unmodified-face ((,class :foreground ,fg-main)))
   `(treemacs-git-untracked-face ((,class :foreground ,red-alt-other)))
   `(treemacs-help-column-face ((,class :inherit modus-theme-bold :foreground ,magenta-alt-other :underline t)))
   `(treemacs-help-title-face ((,class :foreground ,blue-alt-other)))
   `(treemacs-on-failure-pulse-face ((,class :inherit modus-theme-intense-red)))
   `(treemacs-on-success-pulse-face ((,class :inherit modus-theme-intense-green)))
   `(treemacs-root-face ((,class :inherit bold :foreground ,blue-alt-other :height 1.2 :underline t)))
   `(treemacs-root-remote-disconnected-face ((,class :inherit treemacs-root-remote-face :foreground ,yellow)))
   `(treemacs-root-remote-face ((,class :inherit treemacs-root-face :foreground ,magenta)))
   `(treemacs-root-remote-unreadable-face ((,class :inherit treemacs-root-unreadable-face)))
   `(treemacs-root-unreadable-face ((,class :inherit treemacs-root-face :strike-through t)))
   `(treemacs-tags-face ((,class :foreground ,blue-alt)))
   `(treemacs-tags-face ((,class :foreground ,magenta-alt)))
;;;;; tty-menu
   `(tty-menu-disabled-face ((,class :background ,bg-alt :foreground ,fg-alt)))
   `(tty-menu-enabled-face ((,class :inherit bold :background ,bg-alt :foreground ,fg-main)))
   `(tty-menu-selected-face ((,class :inherit modus-theme-intense-blue)))
;;;;; tuareg
   `(caml-types-def-face ((,class :inherit modus-theme-subtle-red)))
   `(caml-types-expr-face ((,class :inherit modus-theme-subtle-green)))
   `(caml-types-occ-face ((,class :inherit modus-theme-subtle-green)))
   `(caml-types-scope-face ((,class :inherit modus-theme-subtle-blue)))
   `(caml-types-typed-face ((,class :inherit modus-theme-subtle-magenta)))
   `(tuareg-font-double-semicolon-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                                   red-alt red-alt-faint))))
   `(tuareg-font-lock-attribute-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                                 magenta magenta-faint))))
   `(tuareg-font-lock-constructor-face ((,class :foreground ,fg-main)))
   `(tuareg-font-lock-error-face ((,class :inherit (modus-theme-intense-red bold))))
   `(tuareg-font-lock-extension-node-face ((,class :background ,bg-alt :foreground ,magenta)))
   `(tuareg-font-lock-governing-face ((,class :inherit bold :foreground ,fg-main)))
   `(tuareg-font-lock-infix-extension-node-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                                            magenta magenta-faint))))
   `(tuareg-font-lock-interactive-directive-face ((,class :foreground ,fg-special-cold)))
   `(tuareg-font-lock-interactive-error-face ((,class :inherit bold
                                                      ,@(modus-operandi-theme-syntax-foreground
                                                         red red-faint))))
   `(tuareg-font-lock-interactive-output-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                                          blue-alt-other blue-alt-other-faint))))
   `(tuareg-font-lock-label-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                             cyan-alt-other cyan-alt-other-faint))))
   `(tuareg-font-lock-line-number-face ((,class :foreground ,fg-special-warm)))
   `(tuareg-font-lock-module-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                              magenta-alt magenta-alt-faint))))
   `(tuareg-font-lock-multistage-face ((,class :inherit bold :background ,bg-alt
                                               ,@(modus-operandi-theme-syntax-foreground
                                                  blue blue-faint))))
   `(tuareg-font-lock-operator-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                                red-alt red-alt-faint))))
   `(tuareg-opam-error-face ((,class :inherit bold
                                     ,@(modus-operandi-theme-syntax-foreground
                                        red red-faint))))
   `(tuareg-opam-pkg-variable-name-face ((,class :inherit modus-theme-slant
                                                 ,@(modus-operandi-theme-syntax-foreground
                                                    cyan cyan-faint))))
;;;;; typescript
   `(typescript-jsdoc-tag ((,class :inherit modus-theme-slant :foreground ,fg-special-mild)))
   `(typescript-jsdoc-type ((,class :inherit modus-theme-slant :foreground ,fg-special-calm)))
   `(typescript-jsdoc-value ((,class :inherit modus-theme-slant :foreground ,fg-special-cold)))
;;;;; undo-tree
   `(undo-tree-visualizer-active-branch-face ((,class :inherit bold :foreground ,fg-main)))
   `(undo-tree-visualizer-current-face ((,class :foreground ,blue-intense)))
   `(undo-tree-visualizer-default-face ((,class :foreground ,fg-alt)))
   `(undo-tree-visualizer-register-face ((,class :foreground ,magenta-intense)))
   `(undo-tree-visualizer-unmodified-face ((,class :foreground ,green-intense)))
;;;;; vc (vc-hooks.el)
   `(vc-conflict-state ((,class :inherit modus-theme-slant :foreground ,red-active)))
   `(vc-edited-state ((,class :foreground ,yellow-active)))
   `(vc-locally-added-state ((,class :foreground ,cyan-active)))
   `(vc-locked-state ((,class :foreground ,blue-active)))
   `(vc-missing-state ((,class :inherit modus-theme-slant :foreground ,magenta-active)))
   `(vc-needs-update-state ((,class :inherit modus-theme-slant :foreground ,green-active)))
   `(vc-removed-state ((,class :foreground ,red-active)))
   `(vc-state-base ((,class :foreground ,fg-active)))
   `(vc-up-to-date-state ((,class :foreground ,fg-special-cold)))
;;;;; vdiff
   `(vdiff-addition-face ((,class :inherit modus-theme-diff-added)))
   `(vdiff-change-face ((,class :inherit modus-theme-diff-changed)))
   `(vdiff-closed-fold-face ((,class :background ,bg-diff-neutral-1 :foreground ,fg-diff-neutral-1)))
   `(vdiff-refine-added ((,class :inherit modus-theme-diff-refine-added)))
   `(vdiff-refine-changed ((,class :inherit modus-theme-diff-refine-changed)))
   `(vdiff-subtraction-face ((,class :inherit modus-theme-diff-removed)))
   `(vdiff-target-face ((,class :inherit modus-theme-intense-blue)))
;;;;; vimish-fold
   `(vimish-fold-fringe ((,class :foreground ,cyan-active)))
   `(vimish-fold-mouse-face ((,class :inherit modus-theme-intense-blue)))
   `(vimish-fold-overlay ((,class :background ,bg-alt :foreground ,fg-special-cold)))
;;;;; visible-mark
   `(visible-mark-active ((,class :background ,blue-intense-bg)))
   `(visible-mark-face1 ((,class :background ,cyan-intense-bg)))
   `(visible-mark-face2 ((,class :background ,yellow-intense-bg)))
   `(visible-mark-forward-face1 ((,class :background ,magenta-intense-bg)))
   `(visible-mark-forward-face2 ((,class :background ,green-intense-bg)))
;;;;; visual-regexp
   `(vr/group-0 ((,class :inherit modus-theme-intense-blue)))
   `(vr/group-1 ((,class :inherit modus-theme-intense-magenta)))
   `(vr/group-2 ((,class :inherit modus-theme-intense-green)))
   `(vr/match-0 ((,class :inherit modus-theme-refine-yellow)))
   `(vr/match-1 ((,class :inherit modus-theme-refine-yellow)))
   `(vr/match-separator-face ((,class :inherit (modus-theme-intense-neutral bold))))
;;;;; volatile-highlights
   `(vhl/default-face ((,class ,@(and (>= emacs-major-version 27) '(:extend t))
                               :background ,bg-alt :foreground ,blue-nuanced)))
;;;;; vterm
   `(vterm-color-black ((,class :background "gray35" :foreground "gray35")))
   `(vterm-color-blue ((,class :background ,blue :foreground ,blue)))
   `(vterm-color-cyan ((,class :background ,cyan :foreground ,cyan)))
   `(vterm-color-default ((,class :background ,bg-main :foreground ,fg-main)))
   `(vterm-color-green ((,class :background ,green :foreground ,green)))
   `(vterm-color-inverse-video ((,class :background ,bg-main :inverse-video t)))
   `(vterm-color-magenta ((,class :background ,magenta :foreground ,magenta)))
   `(vterm-color-red ((,class :background ,red :foreground ,red)))
   `(vterm-color-underline ((,class :foreground ,fg-special-warm :underline t)))
   `(vterm-color-white ((,class :background "gray65" :foreground "gray65")))
   `(vterm-color-yellow ((,class :background ,yellow :foreground ,yellow)))
;;;;; wcheck-mode
   `(wcheck-default-face ((,class :foreground ,red :underline t)))
;;;;; web-mode
   `(web-mode-annotation-face ((,class :inherit web-mode-comment-face)))
   `(web-mode-annotation-html-face ((,class :inherit web-mode-comment-face)))
   `(web-mode-annotation-tag-face ((,class :inherit web-mode-comment-face :underline t)))
   `(web-mode-block-attr-name-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                               blue blue-faint))))
   `(web-mode-block-attr-value-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                                cyan-alt-other cyan-alt-other-faint))))
   `(web-mode-block-comment-face ((,class :inherit web-mode-comment-face)))
   `(web-mode-block-control-face ((,class :inherit modus-theme-bold
                                          ,@(modus-operandi-theme-syntax-foreground
                                             magenta-alt magenta-alt-faint))))
   `(web-mode-block-delimiter-face ((,class :foreground ,fg-main)))
   `(web-mode-block-face ((,class :background ,bg-dim)))
   `(web-mode-block-string-face ((,class :inherit web-mode-string-face)))
   `(web-mode-bold-face ((,class :inherit bold)))
   `(web-mode-builtin-face ((,class :inherit modus-theme-bold
                                    ,@(modus-operandi-theme-syntax-foreground
                                       magenta-alt magenta-alt-faint))))
   `(web-mode-comment-face ((,class :inherit font-lock-comment-face)))
   `(web-mode-comment-keyword-face ((,class :inherit bold :background ,bg-dim
                                            ,@(modus-operandi-theme-syntax-foreground
                                               yellow yellow-faint))))
   `(web-mode-constant-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                        blue-alt-other blue-alt-other-faint))))
   `(web-mode-css-at-rule-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                           blue-alt-other blue-alt-other-faint))))
   `(web-mode-css-color-face ((,class :inherit modus-theme-bold
                                      ,@(modus-operandi-theme-syntax-foreground
                                         magenta-alt magenta-alt-faint))))
   `(web-mode-css-comment-face ((,class :inherit web-mode-comment-face)))
   `(web-mode-css-function-face ((,class :inherit modus-theme-bold
                                         ,@(modus-operandi-theme-syntax-foreground
                                            magenta-alt magenta-alt-faint))))
   `(web-mode-css-priority-face ((,class :inherit modus-theme-bold
                                         ,@(modus-operandi-theme-syntax-foreground
                                            yellow-alt yellow-alt-faint))))
   `(web-mode-css-property-name-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                                 cyan cyan-faint))))
   `(web-mode-css-pseudo-class-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                                cyan-alt-other cyan-alt-other-faint))))
   `(web-mode-css-selector-face ((,class :inherit modus-theme-bold
                                         ,@(modus-operandi-theme-syntax-foreground
                                            magenta-alt-other magenta-alt-other-faint))))
   `(web-mode-css-string-face ((,class :inherit web-mode-string-face)))
   `(web-mode-css-variable-face ((,class :foreground ,fg-special-warm)))
   `(web-mode-current-column-highlight-face ((,class :background ,bg-alt)))
   `(web-mode-current-element-highlight-face ((,class :inherit modus-theme-special-mild)))
   `(web-mode-doctype-face ((,class :inherit modus-theme-slant :foreground ,fg-special-cold)))
   `(web-mode-error-face ((,class :inherit modus-theme-intense-red)))
   `(web-mode-filter-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                      magenta magenta-faint))))
   `(web-mode-folded-face ((,class :underline t)))
   `(web-mode-function-call-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                             magenta magenta-faint))))
   `(web-mode-function-name-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                             magenta magenta-faint))))
   `(web-mode-html-attr-custom-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                                cyan cyan-faint))))
   `(web-mode-html-attr-engine-face ((,class :foreground ,fg-main)))
   `(web-mode-html-attr-equal-face ((,class :foreground ,fg-main)))
   `(web-mode-html-attr-name-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                              cyan cyan-faint))))
   `(web-mode-html-attr-value-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                               blue-alt-other blue-alt-other-faint))))
   `(web-mode-html-entity-face ((,class :inherit modus-theme-slant
                                        ,@(modus-operandi-theme-syntax-foreground
                                           yellow-alt-other yellow-alt-other-faint))))
   `(web-mode-html-tag-bracket-face ((,class :foreground ,fg-dim)))
   `(web-mode-html-tag-custom-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                               magenta magenta-faint))))
   `(web-mode-html-tag-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                        magenta magenta-faint))))
   `(web-mode-html-tag-namespaced-face ((,class :inherit modus-theme-bold
                                                ,@(modus-operandi-theme-syntax-foreground
                                                   magenta-alt magenta-alt-faint))))
   `(web-mode-html-tag-unclosed-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                                 red red-faint)
                                              :underline t)))
   `(web-mode-inlay-face ((,class :background ,bg-alt)))
   `(web-mode-italic-face ((,class :inherit italic)))
   `(web-mode-javascript-comment-face ((,class :inherit web-mode-comment-face)))
   `(web-mode-javascript-string-face ((,class :inherit web-mode-string-face)))
   `(web-mode-json-comment-face ((,class :inherit web-mode-comment-face)))
   `(web-mode-json-context-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                            magenta-alt magenta-alt-faint))))
   `(web-mode-json-key-face ((,class :foreground ,blue-nuanced)))
   `(web-mode-json-string-face ((,class :inherit web-mode-string-face)))
   `(web-mode-jsx-depth-1-face ((,class :background ,blue-intense-bg :foreground ,fg-main)))
   `(web-mode-jsx-depth-2-face ((,class :background ,blue-subtle-bg :foreground ,fg-main)))
   `(web-mode-jsx-depth-3-face ((,class :background ,bg-special-cold :foreground ,fg-special-cold)))
   `(web-mode-jsx-depth-4-face ((,class :background ,bg-alt :foreground ,blue-refine-fg)))
   `(web-mode-jsx-depth-5-face ((,class :background ,bg-alt :foreground ,blue-nuanced)))
   `(web-mode-keyword-face ((,class :inherit modus-theme-bold
                                    ,@(modus-operandi-theme-syntax-foreground
                                       magenta-alt-other magenta-alt-other-faint))))
   `(web-mode-param-name-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                          magenta magenta-faint))))
   `(web-mode-part-comment-face ((,class :inherit web-mode-comment-face)))
   `(web-mode-part-face ((,class :inherit web-mode-block-face)))
   `(web-mode-part-string-face ((,class :inherit web-mode-string-face)))
   `(web-mode-preprocessor-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                            red-alt-other red-alt-other-faint))))
   `(web-mode-script-face ((,class :inherit web-mode-part-face)))
   `(web-mode-sql-keyword-face ((,class :inherit bold
                                        ,@(modus-operandi-theme-syntax-foreground
                                           yellow yellow-faint))))
   `(web-mode-string-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                      blue-alt blue-alt-faint))))
   `(web-mode-style-face ((,class :inherit web-mode-part-face)))
   `(web-mode-symbol-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                      blue-alt-other blue-alt-other-faint))))
   `(web-mode-type-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                    magenta-alt magenta-alt-faint))))
   `(web-mode-underline-face ((,class :underline t)))
   `(web-mode-variable-name-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                             cyan cyan-faint))))
   `(web-mode-warning-face ((,class :inherit bold :background ,bg-alt
                                    ,@(modus-operandi-theme-syntax-foreground
                                       yellow-alt-other yellow-alt-other-faint))))
   `(web-mode-whitespace-face ((,class :background ,bg-whitespace :foreground ,fg-whitespace)))
;;;;; wgrep
   `(wgrep-delete-face ((,class :inherit modus-theme-refine-yellow)))
   `(wgrep-done-face ((,class :inherit modus-theme-refine-blue)))
   `(wgrep-face ((,class :inherit modus-theme-refine-green)))
   `(wgrep-file-face ((,class :foreground ,fg-special-warm)))
   `(wgrep-reject-face ((,class :inherit (modus-theme-intense-red bold))))
;;;;; which-function-mode
   `(which-func ((,class :foreground ,magenta-active)))
;;;;; which-key
   `(which-key-command-description-face ((,class :foreground ,cyan)))
   `(which-key-group-description-face ((,class :foreground ,magenta-alt)))
   `(which-key-highlighted-command-face ((,class :foreground ,cyan-alt :underline t)))
   `(which-key-key-face ((,class :inherit bold :foreground ,blue-intense)))
   `(which-key-local-map-description-face ((,class :foreground ,fg-main)))
   `(which-key-note-face ((,class :background ,bg-dim :foreground ,fg-special-mild)))
   `(which-key-separator-face ((,class :foreground ,fg-alt)))
   `(which-key-special-key-face ((,class :inherit bold :foreground ,yellow-intense)))
;;;;; whitespace-mode
   `(whitespace-big-indent ((,class :inherit modus-theme-subtle-red)))
   `(whitespace-empty ((,class :inherit modus-theme-intense-magenta)))
   `(whitespace-hspace ((,class :background ,bg-whitespace :foreground ,fg-whitespace)))
   `(whitespace-indentation ((,class :background ,bg-whitespace :foreground ,fg-whitespace)))
   `(whitespace-line ((,class :inherit modus-theme-special-warm)))
   `(whitespace-newline ((,class :background ,bg-whitespace :foreground ,fg-whitespace)))
   `(whitespace-space ((,class :background ,bg-whitespace :foreground ,fg-whitespace)))
   `(whitespace-space-after-tab ((,class :inherit modus-theme-subtle-magenta)))
   `(whitespace-space-before-tab ((,class :inherit modus-theme-subtle-cyan)))
   `(whitespace-tab ((,class :background ,bg-whitespace :foreground ,fg-whitespace)))
   `(whitespace-trailing ((,class :inherit modus-theme-intense-red)))
;;;;; window-divider-mode
   `(window-divider ((,class :foreground ,fg-window-divider-inner)))
   `(window-divider-first-pixel ((,class :foreground ,fg-window-divider-outer)))
   `(window-divider-last-pixel ((,class :foreground ,fg-window-divider-outer)))
;;;;; winum
   `(winum-face ((,class :inherit modus-theme-bold :foreground ,cyan-active)))
;;;;; writegood-mode
   `(writegood-duplicates-face ((,class :background ,bg-alt :foreground ,red-alt :underline t)))
   `(writegood-passive-voice-face ((,class :foreground ,yellow-nuanced :underline ,fg-lang-warning)))
   `(writegood-weasels-face ((,class :foreground ,red-nuanced :underline ,fg-lang-error)))
;;;;; woman
   `(woman-addition ((,class :foreground ,magenta-alt-other)))
   `(woman-bold ((,class :inherit bold :foreground ,magenta)))
   `(woman-italic ((,class :inherit italic :foreground ,cyan)))
   `(woman-unknown ((,class :inherit italic :foreground ,yellow)))
;;;;; xah-elisp-mode
   `(xah-elisp-at-symbol ((,class :inherit bold
                                  ,@(modus-operandi-theme-syntax-foreground
                                     red-alt red-alt-faint))))
   `(xah-elisp-cap-variable ((,class ,@(modus-operandi-theme-syntax-foreground
                                        red-alt-other red-alt-other-faint))))
   `(xah-elisp-command-face ((,class ,@(modus-operandi-theme-syntax-foreground
                                        cyan-alt-other cyan-alt-other-faint))))
   `(xah-elisp-dollar-symbol ((,class ,@(modus-operandi-theme-syntax-foreground
                                         green green-faint))))
;;;;; xref
   `(xref-file-header ((,class :inherit bold :foreground ,fg-special-cold)))
   `(xref-line-number ((,class :foreground ,fg-alt)))
   `(xref-match ((,class :inherit match)))
;;;;; yaml-mode
   `(yaml-tab-face ((,class :inherit modus-theme-intense-red)))
;;;;; yasnippet
   `(yas-field-highlight-face ((,class :background ,bg-alt :foreground ,fg-main)))
;;;;; ztree
   `(ztreep-arrow-face ((,class :foreground ,fg-inactive)))
   `(ztreep-diff-header-face ((,class :inherit bold :height 1.2 :foreground ,fg-special-cold)))
   `(ztreep-diff-header-small-face ((,class :inherit bold :foreground ,fg-special-mild)))
   `(ztreep-diff-model-add-face ((,class :foreground ,green)))
   `(ztreep-diff-model-diff-face ((,class :foreground ,red)))
   `(ztreep-diff-model-ignored-face ((,class :foreground ,fg-alt :strike-through t)))
   `(ztreep-diff-model-normal-face ((,class :foreground ,fg-alt)))
   `(ztreep-expand-sign-face ((,class :foreground ,blue)))
   `(ztreep-header-face ((,class :inherit bold :height 1.2 :foreground ,fg-special-cold)))
   `(ztreep-leaf-face ((,class :foreground ,cyan)))
   `(ztreep-node-count-children-face ((,class :foreground ,fg-special-warm)))
   `(ztreep-node-face ((,class :foreground ,fg-main))))
;;;; Emacs 27+
  (when (>= emacs-major-version 27)
    (custom-theme-set-faces
     'modus-operandi
;;;;; line numbers (`display-line-numbers-mode' and global variant)
     ;; NOTE that this is specifically for the faces that were
     ;; introduced in Emacs 27, as the other faces are already
     ;; supported.
     `(line-number-major-tick ((,class :inherit (bold default)
                                       :background ,yellow-nuanced-bg
                                       :foreground ,yellow-nuanced)))
     `(line-number-minor-tick ((,class :inherit (bold default)
                                       :background ,bg-inactive
                                       :foreground ,fg-inactive)))
;;;;; tab-bar-mode
     `(tab-bar ((,class :background ,bg-tab-bar :foreground ,fg-main)))
     `(tab-bar-tab ((,class :inherit bold :box (:line-width 2 :color ,bg-tab-active)
                            :background ,bg-tab-active :foreground ,fg-main)))
     `(tab-bar-tab-inactive ((,class :box (:line-width 2 :color ,bg-tab-inactive)
                                     :background ,bg-tab-inactive :foreground ,fg-dim)))
;;;;; tab-line-mode
     `(tab-line ((,class :height 0.95 :background ,bg-tab-bar :foreground ,fg-main)))
     `(tab-line-close-highlight ((,class :foreground ,red)))
     `(tab-line-highlight ((,class :background ,blue-subtle-bg :foreground ,fg-dim)))
     `(tab-line-tab ((,class :inherit bold :box (:line-width 2 :color ,bg-tab-active)
                             :background ,bg-tab-active :foreground ,fg-main)))
     `(tab-line-tab-current ((,class :inherit tab-line-tab)))
     `(tab-line-tab-inactive ((,class :box (:line-width 2 :color ,bg-tab-inactive)
                                      :background ,bg-tab-inactive :foreground ,fg-dim)))))
;;;; Emacs 28+
  (when (>= emacs-major-version 28)
    (custom-theme-set-faces
     'modus-operandi
;;;;; isearch regexp groups
     `(isearch-group-1 ((,class :inherit modus-theme-intense-blue)))
     `(isearch-group-2 ((,class :inherit modus-theme-intense-magenta)))))
;;; variables
  (custom-theme-set-variables
   'modus-operandi
;;;; ansi-colors
   `(ansi-color-faces-vector [default bold shadow italic underline success warning error])
   `(ansi-color-names-vector [,fg-main ,red ,green ,yellow ,blue ,magenta ,cyan ,bg-main])
;;;; awesome-tray
   `(awesome-tray-mode-line-active-color ,blue)
   `(awesome-tray-mode-line-inactive-color ,bg-active)
;;;; flymake fringe indicators
   `(flymake-error-bitmap '(flymake-double-exclamation-mark modus-theme-fringe-red))
   `(flymake-warning-bitmap '(exclamation-mark modus-theme-fringe-yellow))
   `(flymake-note-bitmap '(exclamation-mark modus-theme-fringe-cyan))
;;;; ibuffer
   `(ibuffer-deletion-face 'modus-theme-mark-del)
   `(ibuffer-filter-group-name-face 'modus-theme-mark-symbol)
   `(ibuffer-marked-face 'modus-theme-mark-sel)
   `(ibuffer-title-face 'modus-theme-pseudo-header)
;;;; highlight-tail
   `(highlight-tail-colors
     '((,green-subtle-bg . 0)
       (,cyan-subtle-bg . 20)))
;;;; hl-todo
   `(hl-todo-keyword-faces
     '(("HOLD" . ,yellow-alt)
       ("TODO" . ,magenta)
       ("NEXT" . ,magenta-alt-other)
       ("THEM" . ,magenta-alt)
       ("PROG" . ,cyan)
       ("OKAY" . ,cyan-alt)
       ("DONT" . ,green-alt)
       ("FAIL" . ,red)
       ("BUG" . ,red)
       ("DONE" . ,green)
       ("NOTE" . ,yellow-alt-other)
       ("KLUDGE" . ,yellow)
       ("HACK" . ,yellow)
       ("TEMP" . ,red-nuanced)
       ("FIXME" . ,red-alt-other)
       ("XXX+" . ,red-alt)
       ("REVIEW" . ,cyan-alt-other)
       ("DEPRECATED" . ,blue-nuanced)))
;;;; vc-annotate (C-x v g)
   `(vc-annotate-background nil)
   `(vc-annotate-background-mode nil)
   `(vc-annotate-color-map
     '((20 . ,red)
       (40 . ,magenta)
       (60 . ,magenta-alt)
       (80 . ,red-alt)
       (100 . ,yellow)
       (120 . ,yellow-alt)
       (140 . ,fg-special-warm)
       (160 . ,fg-special-mild)
       (180 . ,green)
       (200 . ,green-alt)
       (220 . ,cyan-alt-other)
       (240 . ,cyan-alt)
       (260 . ,cyan)
       (280 . ,fg-special-cold)
       (300 . ,blue)
       (320 . ,blue-alt)
       (340 . ,blue-alt-other)
       (360 . ,magenta-alt-other)))
   `(vc-annotate-very-old-color nil)
;;;; xterm-color
   `(xterm-color-names [,fg-main ,red ,green ,yellow ,blue ,magenta ,cyan ,bg-alt])
   `(xterm-color-names-bright [,fg-alt ,red-alt ,green-alt ,yellow-alt ,blue-alt ,magenta-alt ,cyan-alt ,bg-main]))
;;; Conditional theme variables
;;;; org-src-block-faces
  ;; this is a user option to add a color-coded background to source
  ;; blocks for various programming languages
  (when (eq modus-operandi-theme-org-blocks 'rainbow)
    (custom-theme-set-variables
     'modus-operandi
     `(org-src-block-faces              ; TODO this list should be expanded
       `(("emacs-lisp" modus-theme-nuanced-magenta)
         ("elisp" modus-theme-nuanced-magenta)
         ("clojure" modus-theme-nuanced-magenta)
         ("clojurescript" modus-theme-nuanced-magenta)
         ("c" modus-theme-nuanced-blue)
         ("c++" modus-theme-nuanced-blue)
         ("sh" modus-theme-nuanced-green)
         ("shell" modus-theme-nuanced-green)
         ("html" modus-theme-nuanced-yellow)
         ("xml" modus-theme-nuanced-yellow)
         ("css" modus-theme-nuanced-red)
         ("scss" modus-theme-nuanced-red)
         ("python" modus-theme-nuanced-green)
         ("ipython" modus-theme-nuanced-magenta)
         ("r" modus-theme-nuanced-cyan)
         ("yaml" modus-theme-nuanced-cyan)
         ("conf" modus-theme-nuanced-cyan)
         ("docker" modus-theme-nuanced-cyan)
         ("json" modus-theme-nuanced-cyan))))))

;;; library provides
;;;###autoload
(when load-file-name
  (add-to-list 'custom-theme-load-path
               (file-name-as-directory (file-name-directory load-file-name))))

(provide-theme 'modus-operandi)

(provide 'modus-operandi-theme)

;;; modus-operandi-theme.el ends here