From 3a1e839da5928c430ac5a38b22e671fcd35035a9 Mon Sep 17 00:00:00 2001 Message-Id: <3a1e839da5928c430ac5a38b22e671fcd35035a9.1614924124.git.info@protesilaos.com> From: Protesilaos Stavrou Date: Thu, 4 Mar 2021 16:20:15 +0200 Subject: [PATCH] Update Modus themes to their version 1.2.0 * doc/misc/modus-themes.org: Add new version of the manual, with changes to markup and references to the latest state of the project. * etc/themes/modus-vivendi-theme.el: * etc/themes/modus-operandi-theme.el: Provide updated version of each theme, which expands the contents of 'modus-themes.el'. * etc/themes/modus-themes.el: Add new supportive file. This is where theme data, functions, and face definitions are defined. --- doc/misc/modus-themes.org | 3267 +++++++++----- etc/themes/modus-operandi-theme.el | 4672 +------------------- etc/themes/modus-themes.el | 6436 ++++++++++++++++++++++++++++ etc/themes/modus-vivendi-theme.el | 4672 +------------------- 4 files changed, 8812 insertions(+), 10235 deletions(-) create mode 100644 etc/themes/modus-themes.el diff --git a/doc/misc/modus-themes.org b/doc/misc/modus-themes.org index 4a6150cf9d..20d7767053 100644 --- a/doc/misc/modus-themes.org +++ b/doc/misc/modus-themes.org @@ -1,30 +1,52 @@ -#+TITLE: Modus themes for GNU Emacs -#+AUTHOR: Protesilaos Stavrou -#+EMAIL: info@protesilaos.com -#+TEXINFO_DIR_CATEGORY: Emacs misc features -#+TEXINFO_DIR_TITLE: Modus Themes: (modus-themes) -#+TEXINFO_DIR_DESC: Highly accessible themes (WCAG AAA) -#+OPTIONS: ':t toc:nil author:t email:t -#+MACRO: version-tag 0.13.0 -#+MACRO: release-date 2020-10-08 +#+title: Modus themes for GNU Emacs +#+author: Protesilaos Stavrou +#+email: info@protesilaos.com +#+language: en +#+options: ':t toc:nil author:t email:t + +#+macro: stable-version 1.2.0 +#+macro: release-date 2021-03-04 +#+macro: development-version 1.3.0-dev +#+macro: export-date (eval (format-time-string "%F %R %z" (current-time))) +#+macro: file @@texinfo:@file{@@$1@@texinfo:}@@ +#+macro: space @@texinfo:@: @@ +# The "kbd" macro turns KBD into @kbd{KBD}. Additionally, it +# encloses case-sensitive special keys (SPC, RET...) within @key{...}. +# I got this from the Org source code. +#+macro: kbd (eval (let ((case-fold-search nil) (regexp (regexp-opt '("SPC" "RET" "LFD" "TAB" "BS" "ESC" "DELETE" "SHIFT" "Ctrl" "Meta" "Alt" "Cmd" "Super" "UP" "LEFT" "RIGHT" "DOWN") 'words))) (format "@@texinfo:@kbd{@@%s@@texinfo:}@@" (replace-regexp-in-string regexp "@@texinfo:@key{@@\\&@@texinfo:}@@" $1 t)))) + +#+texinfo_filename: modus-themes.info +#+texinfo_dir_category: Emacs misc features +#+texinfo_dir_title: Modus Themes: (modus-themes) +#+texinfo_dir_desc: Highly accessible themes (WCAG AAA) +#+texinfo_header: @set MAINTAINERSITE @uref{https://protesilaos.com,maintainer webpage} +#+texinfo_header: @set MAINTAINER Protesilaos Stavrou +#+texinfo_header: @set MAINTAINEREMAIL @email{info@protesilaos.com} +#+texinfo_header: @set MAINTAINERCONTACT @uref{mailto:info@protesilaos.com,contact the maintainer} #+texinfo: @insertcopying This manual, written by Protesilaos Stavrou, describes the customization -options for the =modus-operandi= and =modus-vivendi= themes, and provides +options for the ~modus-operandi~ and ~modus-vivendi~ themes, and provides every other piece of information pertinent to them. -The documentation furnished herein corresponds to version {{{version-tag}}}, -released on {{{release-date}}}. Any reference to a newer feature which does -not yet form part of the latest tagged commit, is explicitly marked as -such. +The documentation furnished herein corresponds to stable version +{{{stable-version}}}, released on {{{release-date}}}. Any reference to a newer +feature which does not yet form part of the latest tagged commit, is +explicitly marked as such. -* Copying -:PROPERTIES: -:copying: t -:END: +# Current development target is {{{development-version}}}. This manual was +# built on {{{export-date}}}. -Copyright (C) 2020--2021 Free Software Foundation, Inc. +#+toc: headlines 8 insert TOC here, with eight headline levels + +* COPYING +:properties: +:copying: t +:custom_id: h:b14c3fcb-13dd-4144-9d92-2c58b3ed16d3 +:end: + +Copyright (C) 2020-2021 Free Software Foundation, Inc. #+begin_quote Permission is granted to copy, distribute and/or modify this @@ -34,12 +56,10 @@ * Copying and with no Back-Cover Texts. #+end_quote -#+TOC: headlines 8 insert TOC here, with eight headline levels - * Overview -:PROPERTIES: -:CUSTOM_ID: h:f0f3dbcb-602d-40cf-b918-8f929c441baf -:END: +:properties: +:custom_id: h:f0f3dbcb-602d-40cf-b918-8f929c441baf +:end: The Modus themes are designed for accessible readability. They conform with the highest standard for color contrast between any given @@ -47,9 +67,9 @@ * Overview the WCAG AAA standard, which specifies a minimum rate of distance in relative luminance of 7:1. -Modus Operandi (=modus-operandi=) is a light theme, while Modus Vivendi -(=modus-vivendi=) is dark. Each theme's color palette is designed to -meet the needs of the numerous interfaces that are possible in the Emacs +Modus Operandi (~modus-operandi~) is a light theme, while Modus Vivendi +(~modus-vivendi~) is dark. Each theme's color palette is designed to meet +the needs of the numerous interfaces that are possible in the Emacs computing environment. The overarching objective of this project is to always offer accessible @@ -59,15 +79,16 @@ * Overview To ensure that users have a consistently accessible experience, the themes strive to achieve as close to full face coverage as possible -(see [[#h:a9c8f29d-7f72-4b54-b74b-ddefe15d6a19][Face coverage]]). +([[#h:a9c8f29d-7f72-4b54-b74b-ddefe15d6a19][Face coverage]]). Starting with version 0.12.0 and onwards, the themes are built into GNU -Emacs (current version is {{{version-tag}}}). +Emacs. ** How do the themes look like -:PROPERTIES: -:CUSTOM_ID: h:69b92089-069c-4ba1-9d94-cc3415fc4f87 -:END: +:properties: +:custom_id: h:69b92089-069c-4ba1-9d94-cc3415fc4f87 +:end: +#+cindex: Screenshots Check the web page with [[https://protesilaos.com/modus-themes-pictures/][the screen shots]]. There are lots of scenarios on display that draw attention to details and important aspects in the @@ -77,596 +98,562 @@ ** How do the themes look like [[#h:bf1c82f2-46c7-4eb2-ad00-dd11fdd8b53f][Customization options]]. ** Learn about the latest changes -:PROPERTIES: -:CUSTOM_ID: h:2cc37c36-6c1a-48b2-a010-1050b270ee18 -:END: +:properties: +:custom_id: h:2cc37c36-6c1a-48b2-a010-1050b270ee18 +:end: +#+cindex: Changelog Please refer to the [[https://protesilaos.com/modus-themes-changelog][web page with the change log]]. It is comprehensive and covers everything that goes into every tagged release of the themes. * Installation -:PROPERTIES: -:CUSTOM_ID: h:1af85373-7f81-4c35-af25-afcef490c111 -:END: +:properties: +:custom_id: h:1af85373-7f81-4c35-af25-afcef490c111 +:end: The Modus themes are distributed with Emacs starting with version 28.1. On older versions of Emacs, they can be installed using Emacs' package -manager or manually from their code repository. +manager or manually from their code repository. There also exist +packages for distributions of GNU/Linux. + +** Install manually from source +:properties: +:custom_id: h:da3414b7-1426-46b8-8e76-47b845b76fd0 +:end: + +In the following example, we are assuming that your Emacs files are +stored in =~/.emacs.d= and that you want to place the Modus themes in +=~/.emacs.d/modus-themes=. + +1. Get the source and store it in the desired path by running the + following in the command line shell: + +: $ git clone https://gitlab.com/protesilaos/modus-themes.git ~/.emacs.d/modus-themes + +2. Add that path to your known Elisp libraries' list, by placing this + snippet of Emacs Lisp in your init file (e.g. {{{file(init.el)}}}): + +#+begin_src emacs-lisp +(add-to-list 'load-path "~/.emacs.d/modus-themes") +#+end_src -Modus Operandi (light theme) and Modus Vivendi (dark) are normally -distributed as standalone packages in Emacs-specific archives. There -also exist packages for GNU/Linux distributions. +The themes are now ready to be used: [[#h:3f3c3728-1b34-437d-9d0c-b110f5b161a9][Enable and load]]. ** Install from the archives -:PROPERTIES: -:CUSTOM_ID: h:c4b10085-149f-43e2-bd4d-347f33aee054 -:END: +:properties: +:custom_id: h:c4b10085-149f-43e2-bd4d-347f33aee054 +:end: -=modus-operandi-theme= and =modus-vivendi-theme= are available from GNU the -ELPA archive, which is configured by default. +The =modus-themes= package is available from the GNU ELPA archive, which +is configured by default. Prior to querying any package archive, make sure to have updated the -index, with =M-x package-refresh-contents=. Then all you need to do is -type =M-x package-install= and specify the theme of your choice. +index, with {{{kbd(M-x package-refresh-contents)}}}. Then all you need to do +is type {{{kbd(M-x package-install)}}} and specify the ~modus-themes~. + +Note that older versions of the themes used to be distributed as +standalone packages. This practice has been discontinued starting with +version 1.0.0 of this project. + +Once installed, the themes are ready to be used: [[#h:3f3c3728-1b34-437d-9d0c-b110f5b161a9][Enable and load]]. ** Install on GNU/Linux -:PROPERTIES: -:CUSTOM_ID: h:da640eb1-95dd-4e86-bb4e-1027b27885f0 -:END: +:properties: +:custom_id: h:da640eb1-95dd-4e86-bb4e-1027b27885f0 +:end: -The themes are also available from the archives of some GNU/Linux -distributions. These should correspond to a tagged release rather than +The themes are also available from the archives of some distributions of +GNU/Linux. These should correspond to a tagged release rather than building directly from the latest Git commit. It all depends on the distro's packaging policies. *** Debian 11 Bullseye -:PROPERTIES: -:CUSTOM_ID: h:7e570360-9ee6-4bc5-8c04-9dc11418a3e4 -:END: - -The two themes are distributed as a single package for Debian and its -derivatives. Currently in the unstable and testing suites and should be -available in time for Debian 11 Bullseye (next stable). +:properties: +:custom_id: h:7e570360-9ee6-4bc5-8c04-9dc11418a3e4 +:end: -Get them with: +The themes are part of Debian 11 Bullseye. Get them with: #+begin_src sh sudo apt install elpa-modus-themes #+end_src +They are now ready to be used: [[#h:3f3c3728-1b34-437d-9d0c-b110f5b161a9][Enable and load]]. + *** GNU Guix -:PROPERTIES: -:CUSTOM_ID: h:a4ca52cd-869f-46a5-9e16-4d9665f5b88e -:END: +:properties: +:custom_id: h:a4ca52cd-869f-46a5-9e16-4d9665f5b88e +:end: -Users of either the Guix System (the distro) or just Guix (the package -manager) can get each theme as a standalone package. +Users of Guix can get the themes with this command: #+begin_src sh -guix package -i emacs-modus-operandi-theme +guix package -i emacs-modus-themes #+end_src -And/or: - -#+begin_src sh -guix package -i emacs-modus-vivendi-theme -#+end_src +They are now ready to be used: [[#h:3f3c3728-1b34-437d-9d0c-b110f5b161a9][Enable and load]]. * Enable and load -:PROPERTIES: -:CUSTOM_ID: h:3f3c3728-1b34-437d-9d0c-b110f5b161a9 -:END: - -This section documents how to load the theme of your choice and how to -further control its initialization. It also includes some sample code -snippets that could help you in the task, especially if you intend to -use both Modus Operandi and Modus Vivendi. +:properties: +:custom_id: h:3f3c3728-1b34-437d-9d0c-b110f5b161a9 +:end: +#+findex: modus-themes-load-themes +#+findex: modus-themes-toggle +#+findex: modus-themes-load-operandi +#+findex: modus-themes-load-vivendi +#+cindex: Essential configuration +#+vindex: modus-themes-after-load-theme-hook + +Users of the built-in themes can load and automatically enable the theme +of their preference by adding either form to their init file: -** Load automatically -:PROPERTIES: -:CUSTOM_ID: h:1777c247-1b56-46b7-a4ce-54e720b33d06 -:END: +#+begin_src emacs-lisp +(load-theme 'modus-operandi) ; Light theme +(load-theme 'modus-vivendi) ; Dark theme +#+end_src -A simple way to load the theme from your Emacs initialization file is to -include either of the following expressions: +This is all one needs. -#+BEGIN_SRC emacs-lisp -(load-theme 'modus-operandi t) ; Light theme -(load-theme 'modus-vivendi t) ; Dark theme -#+END_SRC +Users of packaged variants of the themes must add a few more lines to +ensure that everything works as intended. First, one has to require the +main library before loading either theme: -Make sure to remove any other theme that is being loaded, otherwise you -might run into unexpected issues. +#+begin_src emacs-lisp +(require 'modus-themes) +#+end_src -Note that you can always =M-x disable-theme= and specify an item. The -command does exactly what its name suggests. To deactivate all enabled -themes at once, in case you have multiple of them enabled, you may -evaluate the expression: +Then it is recommended to load the individual theme files with the +helper function ~modus-themes-load-themes~: #+begin_src emacs-lisp -(mapc #'disable-theme custom-enabled-themes) +;; Load the theme files before enabling a theme (else you get an error). +(modus-themes-load-themes) #+end_src -** Load at a given time or at sunset/sunrise -:PROPERTIES: -:CUSTOM_ID: h:4e936e31-e9eb-4b50-8fdd-45d827a03cca -:END: - -It is possible to schedule a time during the day at or after which a -given theme will be loaded.[fn:: Contributed on Reddit by user =b3n=, -https://www.reddit.com/r/emacs/comments/gdtqov/weekly_tipstricketc_thread/fq9186h/.] +Once the libraries that define the themes are enabled, one can activate +a theme with either of the following expressions: #+begin_src emacs-lisp -;; Light for the day -(load-theme 'modus-operandi t t) -(run-at-time "05:00" (* 60 60 24) - (lambda () - (enable-theme 'modus-operandi))) - -;; Dark for the night -(load-theme 'modus-vivendi t t) -(run-at-time "21:00" (* 60 60 24) - (lambda () - (enable-theme 'modus-vivendi))) +(modus-themes-load-operandi) ; Light theme +;; OR +(modus-themes-load-vivendi) ; Dark theme #+end_src -A modified version of the above technique is to use the sunrise and -sunset as references, instead of specifying a fixed hour value.[fn:: -Contributed directly by André Alexandre Gomes https://gitlab.com/aadcg.] -If you set =calendar-latitude= and =calendar-longitude= (defined in the -built-in =solar.el= library---read it with =M-x find-library=), you can -automatically switch between both themes at the appropriate time-of-day. -Note that /those calendar variables need to be set before loading the -themes/. +Changes to the available customization options must always be evaluated +before loading a theme ([[#h:bf1c82f2-46c7-4eb2-ad00-dd11fdd8b53f][Customization Options]]). This is how a basic +setup could look like: #+begin_src emacs-lisp -;; Define coordinates -(setq calendar-latitude 35.17 - calendar-longitude 33.36) +(require 'modus-themes) -;; Light at sunrise -(load-theme 'modus-operandi t t) -(run-at-time (nth 1 (split-string (sunrise-sunset))) - (* 60 60 24) - (lambda () - (enable-theme 'modus-operandi))) +;; Your customisations here. For example: +(setq modus-themes-bold-constructs t + modus-themes-mode-line '3d) -;; Dark at sunset -(load-theme 'modus-vivendi t t) -(run-at-time (nth 4 (split-string (sunrise-sunset))) - (* 60 60 24) - (lambda () - (enable-theme 'modus-vivendi))) -#+end_src +;; Load the theme files before enabling a theme (else you get an error). +(modus-themes-load-themes) -For the sake of completeness, the =load-theme= call in these snippets is -slightly different than the one shown in [[#h:1777c247-1b56-46b7-a4ce-54e720b33d06][Load automatically]], because it -does not enable the theme directly: the subsequent =enable-theme= does -that when needed. +;; Enable the theme of your preference: +(modus-themes-load-operandi) -** Toggle between the themes on demand -:PROPERTIES: -:CUSTOM_ID: h:2a0895a6-3281-4e55-8aa1-8a737555821e -:END: +;; Optionally add a key binding for the toggle between the themes: +(define-key global-map (kbd "") #'modus-themes-toggle) +#+end_src -With both themes available, it is possible to design a simple command to -switch between them on demand. +[[#h:e979734c-a9e1-4373-9365-0f2cd36107b8][Sample configuration for use-package]]. -#+begin_src emacs-lisp -(defun modus-themes-toggle () - "Toggle between `modus-operandi' and `modus-vivendi' themes." - (interactive) - (if (eq (car custom-enabled-themes) 'modus-operandi) - (progn - (disable-theme 'modus-operandi) - (load-theme 'modus-vivendi t)) - (disable-theme 'modus-vivendi) - (load-theme 'modus-operandi t))) -#+end_src +With those granted, bear in mind a couple of technical points on +~modus-themes-load-operandi~ and ~modus-themes-load-vivendi~, as well as +~modus-themes-toggle~ which relies on them: -You could use =(mapc #'disable-theme custom-enabled-themes)= instead of -disabling a single target, but you get the idea. +1. Those functions call ~load-theme~. Some users prefer to opt for + ~enable-theme~ instead ([[#h:e68560b3-7fb0-42bc-a151-e015948f8a35][Differences between loading and enabling]]). -** Configure options prior to loading -:PROPERTIES: -:CUSTOM_ID: h:a897b302-8e10-4a26-beab-3caaee1e1193 -:END: +2. The functions will run the ~modus-themes-after-load-theme-hook~ as + their final step. This can be employed for bespoke configurations + ([[#h:f4651d55-8c07-46aa-b52b-bed1e53463bb][Advanced customization (do-it-yourself)]]). Experienced users may not + wish to rely on such a hook and the functions that run it: they may + prefer a custom solution ([[#h:86f6906b-f090-46cc-9816-1fe8aeb38776][A theme-agnostic hook for theme loading]]). -If you plan to use both themes and wish to apply styles consistently -(see [[#h:bf1c82f2-46c7-4eb2-ad00-dd11fdd8b53f][Customization Options]]), you could define wrapper functions around -the standard =load-theme= command. These extend the simple function we -presented in [[#h:2a0895a6-3281-4e55-8aa1-8a737555821e][Toggle between the themes on demand]]. +** Sample configuration for use-package +:properties: +:custom_id: h:e979734c-a9e1-4373-9365-0f2cd36107b8 +:end: +#+cindex: use-package configuration -Here is a comprehensive setup (the values assigned to the variables are -just for the sake of this demonstration):[fn:: The =defmacro= and =dolist= -method were contributed on Reddit by user =b3n= -https://www.reddit.com/r/emacs/comments/gqsz8u/weekly_tipstricketc_thread/fsfakhg/.] +It is common for Emacs users to rely on ~use-package~ for declaring +package configurations in their setup. We use this as an example: #+begin_src emacs-lisp -(defmacro modus-themes-format-sexp (sexp &rest objects) - `(eval (read (format ,(format "%S" sexp) ,@objects)))) - -(dolist (theme '("operandi" "vivendi")) - (modus-themes-format-sexp - (defun modus-%1$s-theme-load () - (setq modus-%1$s-theme-slanted-constructs t - modus-%1$s-theme-bold-constructs t - modus-%1$s-theme-fringes 'subtle ; {nil,'subtle,'intense} - modus-%1$s-theme-mode-line '3d ; {nil,'3d,'moody} - modus-%1$s-theme-syntax 'alt-syntax ; {nil,faint,'yellow-comments,'green-strings,'yellow-comments-green-strings,'alt-syntax,'alt-syntax-yellow-comments} - modus-%1$s-theme-intense-hl-line nil - modus-%1$s-theme-intense-paren-match nil - modus-%1$s-theme-links 'faint ; {nil,'faint,'neutral-underline,'faint-neutral-underline,'no-underline} - modus-%1$s-theme-no-mixed-fonts nil - modus-%1$s-theme-prompts nil ; {nil,'subtle,'intense} - modus-%1$s-theme-completions 'moderate ; {nil,'moderate,'opinionated} - modus-%1$s-theme-diffs nil ; {nil,'desaturated,'fg-only} - modus-%1$s-theme-org-blocks 'grayscale ; {nil,'grayscale,'rainbow} - modus-%1$s-theme-headings ; Read further below in the manual for this one - '((1 . section) - (2 . line) - (t . rainbow-line-no-bold)) - modus-%1$s-theme-variable-pitch-headings nil - modus-%1$s-theme-scale-headings t - modus-%1$s-theme-scale-1 1.1 - modus-%1$s-theme-scale-2 1.15 - modus-%1$s-theme-scale-3 1.21 - modus-%1$s-theme-scale-4 1.27 - modus-%1$s-theme-scale-5 1.33) - (load-theme 'modus-%1$s t)) - theme)) - -(defun modus-themes-toggle () - "Toggle between `modus-operandi' and `modus-vivendi' themes." - (interactive) - (if (eq (car custom-enabled-themes) 'modus-operandi) - (progn - (disable-theme 'modus-operandi) - (modus-vivendi-theme-load)) - (disable-theme 'modus-vivendi) - (modus-operandi-theme-load))) +(use-package modus-themes + :ensure ; omit this to use the built-in themes + :init + ;; Add all your customizations prior to loading the themes + (setq modus-themes-slanted-constructs t + modus-themes-bold-constructs nil) + + ;; Load the theme files before enabling a theme (else you get an error). + (modus-themes-load-themes) + :config + ;; Load the theme of your choice: + (modus-themes-load-operandi) ;; OR (modus-themes-load-vivendi) + :bind ("" . modus-themes-toggle)) #+end_src -* Customization Options -:PROPERTIES: -:CUSTOM_ID: h:bf1c82f2-46c7-4eb2-ad00-dd11fdd8b53f -:END: - -The Modus themes are highly configurable, though they should work well -without any further tweaks. - -By default, all customization options are set to =nil=. - -All customization options need to be evaluated before loading their -theme (see [[#h:3f3c3728-1b34-437d-9d0c-b110f5b161a9][Enable and load]]). +[[#h:e68560b3-7fb0-42bc-a151-e015948f8a35][Differences between loading and enabling]]. + +Note: make sure not to customize the variable ~custom-theme-load-path~ +or ~custom-theme-directory~ after the themes' package declaration. That +will lead to failures in loading the files. If either or both of those +variables need to be changed, their values should be defined before the +package declaration of the themes. + +** Differences between loading and enabling +:properties: +:custom_id: h:e68560b3-7fb0-42bc-a151-e015948f8a35 +:end: +#+cindex: load-theme VS enable-theme + +The reason we recommend ~load-theme~ instead of the other option of +~enable-theme~ is that the former does a kind of "reset" on the face +specs. It quite literally loads (or re-loads) the theme. Whereas the +latter simply puts an already loaded theme at the top of the list of +enabled items, re-using whatever state was last loaded. + +As such, ~load-theme~ reads all customizations that may happen during +any given Emacs session: even after the initial setup of a theme. +Examples are calls to ~custom-set-faces~, as well as new values assigned +to the options the Modus themes provide ([[#h:bf1c82f2-46c7-4eb2-ad00-dd11fdd8b53f][Customization Options]]). + +Our tests show that ~enable-theme~ does not read such variables anew, so +it might appear to the unsuspecting user that the themes are somehow +broken whenever they try to assign a new value to a customization option +or some face. + +This "reset" that ~load-theme~ conducts does, however, come at the cost +of being somewhat slower than ~enable-theme~. Users who have a stable +setup and who seldom update their variables during a given Emacs +session, are better off using something like this: -** Option for more bold constructs -:PROPERTIES: -:ALT_TITLE: Bold constructs -:DESCRIPTION: Toggle bold constructs in code -:CUSTOM_ID: h:b25714f6-0fbe-41f6-89b5-6912d304091e -:END: - -Symbol names: - -+ =modus-operandi-theme-bold-constructs= -+ =modus-vivendi-theme-bold-constructs= +#+begin_src emacs-lisp +(require 'modus-themes) +(load-theme 'modus-operandi t t) +(load-theme 'modus-vivendi t t) -Possible values: +(enable-theme 'modus-operandi) ;; OR (enable-theme 'modus-vivendi) +#+end_src -1. =nil= (default) -2. =t= +[[#h:e979734c-a9e1-4373-9365-0f2cd36107b8][Sample configuration for use-package]]. -Display several constructs in bold weight. This concerns keywords and -other important aspects of code syntax. It also affects certain mode -line indicators and command-line prompts. +With the above granted, other sections of the manual discuss how to +configure custom faces, where ~load-theme~ is expected, though +~enable-theme~ could still apply in stable setups: -The default is to only use a bold weight when it is required. +[[#h:1487c631-f4fe-490d-8d58-d72ffa3bd474][Case-by-case face specs using the themes' palette]]. -Additionally, and while not necessary, to define the precise weight for -bold constructs, you can change the typographic intensity of the =bold= -face. The standard is a bold weight. It requires no further -intervention. Assuming though that your typeface of choice supports a -"semibold" weight, adding the following snippet to your init file should -suffice. +[[#h:51ba3547-b8c8-40d6-ba5a-4586477fd4ae][Face specs at scale using the themes' palette]]. -#+begin_src emacs-lisp -(set-face-attribute 'bold nil :weight 'semibold) -#+end_src +* Customization Options +:properties: +:custom_id: h:bf1c82f2-46c7-4eb2-ad00-dd11fdd8b53f +:end: -Note that if you are switching themes, you need to re-evaluate this -expression after the new theme is loaded. +The Modus themes are highly configurable, though they should work well +without any further tweaks. By default, all customization options are +set to nil. -** Option for more slanted constructs -:PROPERTIES: -:ALT_TITLE: Slanted constructs -:DESCRIPTION: Toggle slanted constructs (italics) in code -:CUSTOM_ID: h:977c900d-0d6d-4dbb-82d9-c2aae69543d6 -:END: +Remember that all customization options must be evaluated before loading +a theme ([[#h:3f3c3728-1b34-437d-9d0c-b110f5b161a9][Enable and load]]). -Symbol names: +** Option for more bold constructs +:properties: +:alt_title: Bold constructs +:description: Toggle bold constructs in code +:custom_id: h:b25714f6-0fbe-41f6-89b5-6912d304091e +:end: +#+vindex: modus-themes-bold-constructs -+ =modus-operandi-theme-slanted-constructs= -+ =modus-vivendi-theme-slanted-constructs= +Symbol: ~modus-themes-bold-constructs~ Possible values: 1. =nil= (default) 2. =t= -Choose to render more faces in slanted text (italics). This typically -affects documentation strings and code comments. - -The default is to not use italics unless it is absolutely necessary. +The default is to use a bold typographic weight only when it is +required. -** Option for faint code syntax highlighting (deprecated for ~0.14.0~) -:PROPERTIES: -:ALT_TITLE: Faint syntax -:DESCRIPTION: Toggle subtle coloration in code (deprecated for 0.14.0) -:CUSTOM_ID: h:741379fe-7203-4dad-a7f8-ab71f61b43e6 -:END: +With a non-nil value (=t=) display several syntactic constructs in bold +weight. This concerns keywords and other important aspects of code +syntax. It also affects certain mode line indicators and command-line +prompts. -Symbol names: +** Option for more slanted constructs +:properties: +:alt_title: Slanted constructs +:description: Toggle slanted constructs (italics) in code +:custom_id: h:977c900d-0d6d-4dbb-82d9-c2aae69543d6 +:end: +#+vindex: modus-themes-slanted-constructs -+ =modus-operandi-theme-faint-syntax= -+ =modus-vivendi-theme-faint-syntax= +Symbol: ~modus-themes-slanted-constructs~ Possible values: 1. =nil= (default) 2. =t= -Use less saturated colors in programming modes for highlighting code -syntax. The default is to use saturated colors. +The default is to not use slanted text (italics) unless it is absolutely +necessary. -This option essentially affects the font-lock faces, so it may also have -implications in other places that are hard-wired to rely directly on -them instead of specifying their own faces (which could inherit from -font-lock if that is the intent). The author is aware of =vc-dir= as a -case in point. +With a non-nil value (=t=) choose to render more faces in slanted text. +This typically affects documentation strings and code comments. ** Option for syntax highlighting -:PROPERTIES: -:ALT_TITLE: Syntax styles -:DESCRIPTION: Choose the overall aesthetic of code syntax -:CUSTOM_ID: h:c119d7b2-fcd4-4e44-890e-5e25733d5e52 -:END: - -This option supersedes the "faint syntax" one ahead of version =0.14.0= -([[#h:741379fe-7203-4dad-a7f8-ab71f61b43e6][Option for faint code syntax highlighting]]). +:properties: +:alt_title: Syntax styles +:description: Choose the overall aesthetic of code syntax +:custom_id: h:c119d7b2-fcd4-4e44-890e-5e25733d5e52 +:end: +#+vindex: modus-themes-syntax -Symbol names: - -+ =modus-operandi-theme-syntax= -+ =modus-vivendi-theme-syntax= +Symbol: ~modus-themes-syntax~ Possible values: 1. =nil= (default) -2. =faint= -3. =yellow-comments= -4. =green-strings= -5. =yellow-comments-green-strings= -6. =alt-syntax= -7. =alt-syntax-yellow-comments= +2. ~faint~ +3. ~yellow-comments~ +4. ~green-strings~ +5. ~yellow-comments-green-strings~ +6. ~alt-syntax~ +7. ~alt-syntax-yellow-comments~ +8. ~faint-yellow-comments~ The default style (nil) for code syntax highlighting is a balanced combination of colors on the cyan-blue-magenta side of the spectrum. There is little to no use of greens, yellows, or reds, except when it is necessary. -Option =faint= is like the default in terms of the choice of palette but +Option ~faint~ is like the default in terms of the choice of palette but applies desaturated color values. -Option =yellow-comments= applies a yellow tint to comments. The rest of -the syntax is the same as the default. +Option ~yellow-comments~ adds a yellow tint to comments. The rest of the +syntax is the same as the default. -Option =green-strings= replaces the blue/cyan/cold color variants in +Option ~green-strings~ replaces the blue/cyan/cold color variants in strings with greener alternatives. The rest of the syntax remains the same. -Option =yellow-comments-green-strings= combines yellow comments with green +Option ~yellow-comments-green-strings~ combines yellow comments with green strings and the rest of the default syntax highlighting style. -Option =alt-syntax= expands the color palette and applies new color -combinations. Strings are green. Doc strings are magenta tinted. -Comments are gray. +Option ~alt-syntax~ expands the active spectrum by applying color +combinations with more contrasting hues between them. Expect to find +red and green variants in addition to cyan, blue, magenta. -Option =alt-syntax-yellow-comments= combines =alt-syntax= with -=yellow-comments=. +Option ~alt-syntax-yellow-comments~ combines ~alt-syntax~ with +~yellow-comments~. -** Option for no font mixing -:PROPERTIES: -:ALT_TITLE: No mixed fonts -:DESCRIPTION: Toggle mixing of font families -:CUSTOM_ID: h:115e6c23-ee35-4a16-8cef-e2fcbb08e28b -:END: +Option ~faint-yellow-comments~ combines the ~faint~ style with +~yellow-comments~. -Symbol names: +** Option for no font mixing +:properties: +:alt_title: No mixed fonts +:description: Toggle mixing of font families +:custom_id: h:115e6c23-ee35-4a16-8cef-e2fcbb08e28b +:end: +#+vindex: modus-themes-no-mixed-fonts -+ =modus-operandi-theme-no-mixed-fonts= -+ =modus-vivendi-theme-no-mixed-fonts= +Symbol: ~modus-themes-no-mixed-fonts~ Possible values: 1. =nil= (default) 2. =t= -By default, the themes configure some spacing-sensitive faces, such as -Org tables and code blocks, to always inherit from the =fixed-pitch= face. -This is to ensure that those constructs remain monospaced when users opt -for something like the built-in =M-x variable-pitch-mode=. Otherwise the -layout would appear broken. To disable this behaviour, set the option -to =t=. +By default, the themes configure some spacing-sensitive faces like Org +tables and code blocks to always inherit from the ~fixed-pitch~ face. +This is to ensure that those constructs remain monospaced even when +users opt for a mode that remaps typeface families, such as the built-in +{{{kbd(M-x variable-pitch-mode)}}}. Otherwise the layout would appear +broken, due to how spacing is done. To disable this behaviour, set the +option to =t=. Users may prefer to use another package for handling mixed typeface configurations, rather than letting the theme do it, perhaps because a purpose-specific package has extra functionality. Two possible options -are =org-variable-pitch= and =mixed-pitch=. - -** Option for no link underline (deprecated for ~0.14.0~) -:PROPERTIES: -:ALT_TITLE: Link underline -:DESCRIPTION: Toggle underlined text in links (deprecated for 0.14.0) -:CUSTOM_ID: h:a1a639e9-d247-414c-a0ad-08adadcbc6c1 -:END: - -Note: deprecated ahead of version =0.14.0= ([[#h:c119d7b2-fcd4-4e44-890e-5e25733d5e52][Option for links]]). - -Symbol names: - -+ =modus-operandi-theme-no-link-underline= -+ =modus-vivendi-theme-no-link-underline= - -Possible values: - -1. =nil= (default) -2. =t= +are ~org-variable-pitch~ and ~mixed-pitch~. -Remove the underline effect from links, symbolic links, and buttons. -The default is to apply an underline. +[[#h:defcf4fc-8fa8-4c29-b12e-7119582cc929][Font configurations for Org (and others)]]. ** Option for links -:PROPERTIES: -:ALT_TITLE: Link styles -:DESCRIPTION: Choose color intensity or no underline for links -:CUSTOM_ID: h:c119d7b2-fcd4-4e44-890e-5e25733d5e52 -:END: - -This option supersedes the "no link underline" one ahead of version -=0.14.0= ([[#h:a1a639e9-d247-414c-a0ad-08adadcbc6c1][Option for no link underline]]). - -Symbol names: +:properties: +:alt_title: Link styles +:description: Choose among several styles, with or without underline +:custom_id: h:c119d7b2-fcd4-4e44-890e-5e25733d5e52 +:end: +#+vindex: modus-themes-links -+ =modus-operandi-theme-links= -+ =modus-vivendi-theme-links= +Symbol: ~modus-themes-links~ Possible values: 1. =nil= (default) -2. =faint= -3. =neutral-underline= -4. =faint-neutral-underline= -5. =no-underline= +2. ~faint~ +3. ~neutral-underline~ +4. ~faint-neutral-underline~ +5. ~no-underline~ +6. ~underline-only~ +7. ~neutral-underline-only~ The default style (nil) for links is to apply an underline and a -saturated color to the affected text. The color of the two is the -same, which makes the link fairly prominent. +saturated color to the affected text. The color of the two is the same, +which makes the link fairly prominent. -Option =faint= follows the same approach as the default, but uses less +Option ~faint~ follows the same approach as the default, but uses less intense colors. -Option =neutral-underline= changes the underline's color to a subtle -gray, while retaining the default text color. +Option ~neutral-underline~ changes the underline's color to a subtle gray, +while retaining the default text color. -Option =faint-neutral-underline= combines a desaturated text color with a +Option ~faint-neutral-underline~ combines a desaturated text color with a subtle gray underline. -Option =no-underline= removes link underlines altogether, while keeping -their text color the same as the default. +Option ~no-underline~ removes link underlines altogether, while retaining +their original fairly vivid color. -** Option for command prompt styles -:PROPERTIES: -:ALT_TITLE: Command prompts -:DESCRIPTION: Choose among plain, subtle, or intense prompts -:CUSTOM_ID: h:db5a9a7c-2928-4a28-b0f0-6f2b9bd52ba1 -:END: +Option ~underline-only~ applies a prominent underline while making the +affected text colorless (it uses the same foreground as the theme's +default). + +Option ~neutral-underline-only~ makes the text colorless while using a +subtle gray underline below it. -Symbol names: +NOTE: The placement of the underline, i.e. its proximity to the affected +text, is controlled by the built-in ~x-underline-at-descent-line~, +~x-use-underline-position-properties~, ~underline-minimum-offset~. Please +refer to their documentation strings. -+ =modus-operandi-theme-prompts= -+ =modus-vivendi-theme-prompts= +** Option for command prompt styles +:properties: +:alt_title: Command prompts +:description: Choose among plain, subtle, or intense prompts +:custom_id: h:db5a9a7c-2928-4a28-b0f0-6f2b9bd52ba1 +:end: +#+vindex: modus-themes-prompts + +Symbol: ~modus-themes-prompts~ Possible values: 1. =nil= (default) -2. =subtle= -3. =intense= +2. ~subtle-accented~ (~subtle~ exists for backward compatibility) +3. ~intense-accented~ (~intense~ exists for backward compatibility) +4. ~subtle-gray~ +5. ~intense-gray~ -The symbols "subtle" and "intense" will apply a combination of accented -background and foreground to the minibuffer and other REPL prompts (like -=M-x shell= and =M-x eshell=). The difference between the two is that the -latter has a more pronounced/noticeable effect than the former. +The default does not use any background for minibuffer and command line +prompts. It relies exclusively on an accented foreground color. -The default does not use any background for such prompts, while relying -exclusively on an accented foreground color. +Options ~subtle-accented~ and ~intense-accented~ will change both the +background and the foreground values to use accented color combinations +that follow the hue of the default styles' foreground (e.g. the default +minibuffer prompt is cyan text, so these combinations will involved a +cyan background and an appropriate cyan foreground). The difference +between the two is that the latter has a more pronounced/noticeable +effect than the former. -** Option for mode line presentation -:PROPERTIES: -:ALT_TITLE: Mode line -:DESCRIPTION: Choose among plain, three-dimension, or moody-compliant styles -:CUSTOM_ID: h:27943af6-d950-42d0-bc23-106e43f50a24 -:END: +Options ~subtle-gray~, ~intense-gray~ are like their accented counterparts, +except they use grayscale values. -Symbol names: +** Option for mode line presentation +:properties: +:alt_title: Mode line +:description: Choose among several styles, with or without borders +:custom_id: h:27943af6-d950-42d0-bc23-106e43f50a24 +:end: +#+vindex: modus-themes-mode-line -+ =modus-operandi-theme-mode-line= -+ =modus-vivendi-theme-mode-line= +Symbol: ~modus-themes-mode-line~ Possible values: 1. =nil= (default) -2. =3d= -3. =moody= - -The default value (=nil=) produces a two-dimensional effect both for the -active and inactive modelines. The differences between the two are -limited to distinct shades of grayscale values, with the active being -more intense than the inactive. - -A =3d= symbol will make the active modeline look like a three-dimensional +2. ~3d~ +3. ~moody~ +4. ~borderless~ +5. ~borderless-3d~ +6. ~borderless-moody~ + +The default produces a two-dimensional effect both for the active and +inactive modelines. The differences between the two are limited to +distinct shades of grayscale values, with the active being more intense +than the inactive. + +Option ~3d~ will make the active modeline look like a three-dimensional rectangle. Inactive modelines remain 2D, though they are slightly toned -down relative to the default. This aesthetic is the same as what you -get when you run Emacs without any customizations (=emacs -Q= on the -command line). +down relative to the default. This aesthetic is virtually the same as +what you get when you run Emacs without any customizations (=emacs -Q= on +the command line). -While =moody= removes all box effects from the modelines and applies +While ~moody~ removes all box effects from the modelines and applies underline and overline properties instead. It also tones down a bit the inactive modelines. This is meant to optimize things for use with the [[https://github.com/tarsius/moody][moody package]] (hereinafter referred to as "Moody"), though it can work fine even without it. +The ~borderless~ option uses the same colors as the default (nil value), +but removes the border effect. This is done by making the box property +use the same color as the background, effectively blending the two and +creating some padding. + +The ~borderless-3d~ and ~borderless-moody~ approximate the ~3d~ and ~moody~ +options respectively, while removing the borders. However, to ensure +that the inactive modelines remain visible, they apply a slightly more +prominent background to them than what their counterparts do (same +inactive background as with the default). + Note that Moody does not expose any faces that the themes could style directly. Instead it re-purposes existing ones to render its tabs and ribbons. As such, there may be cases where the contrast ratio falls below the 7:1 target that the themes conform with (WCAG AAA). To hedge -against this, we configure a fallback foreground for the =moody= option, +against this, we configure a fallback foreground for the ~moody~ option, which will come into effect when the background of the modeline changes to something less accessible, such as Moody ribbons (read the doc string -of =set-face-attribute=, specifically =:distant-foreground=). This fallback -comes into effect when Emacs determines that the background and -foreground of the given construct are too close to each other in terms -of color distance. In effect, users would need to experiment with the -variable =face-near-same-color-threshold= to trigger the fallback color. -We find that a value of =45000= would suffice, contrary to the default -=30000=. Do not set the value too high, because that would have the -adverse effect of always overriding the default color (which has been -carefully designed to be highly accessible). +of ~set-face-attribute~, specifically ~:distant-foreground~). This fallback +is activated when Emacs determines that the background and foreground of +the given construct are too close to each other in terms of color +distance. In effect, users would need to experiment with the variable +~face-near-same-color-threshold~ to trigger the effect. We find that a +value of =45000= will suffice, contrary to the default =30000=. Do not set +the value too high, because that would have the adverse effect of always +overriding the default color (which has been carefully designed to be +highly accessible). Furthermore, because Moody expects an underline and overline instead of -a box style, it is recommended you also include this in your setup: +a box style, it is advised you include this in your setup: #+begin_src emacs-lisp (setq x-underline-at-descent-line t) #+end_src ** Option for completion framework aesthetics -:PROPERTIES: -:ALT_TITLE: Completion UIs -:DESCRIPTION: Choose among standard, moderate, or opinionated looks -:CUSTOM_ID: h:f1c20c02-7b34-4c35-9c65-99170efb2882 -:END: - -Symbol names: +:properties: +:alt_title: Completion UIs +:description: Choose among standard, moderate, or opinionated looks +:custom_id: h:f1c20c02-7b34-4c35-9c65-99170efb2882 +:end: +#+vindex: modus-themes-completions -+ =modus-operandi-theme-completions= -+ =modus-vivendi-theme-completions= +Symbol: ~modus-themes-completions~ Possible values: 1. =nil= (default) -2. =moderate= -3. =opinionated= +2. ~moderate~ +3. ~opinionated~ This is a special option that has different effects depending on the completion UI. The interfaces can be grouped in two categories, based @@ -679,512 +666,1008 @@ ** Option for completion framework aesthetics A value of =nil= will respect the metaphors of each completion framework. -The symbol =moderate= will apply a combination of background and -foreground that is fairly subtle. For Icomplete and friends this -constitutes a departure from their default aesthetics, however the -difference is small. While Helm et al will appear slightly different -than their original looks, as they are toned down a bit. +Option ~moderate~ applies a combination of background and foreground that +is fairly subtle. For Icomplete and friends this constitutes a +departure from their default aesthetics, however the difference is +small. While Helm, Ivy et al appear slightly different than their +original looks, as they are toned down a bit. -The symbol =opinionated= will apply color combinations that refashion the -completion UI. For the Icomplete camp this means that intense -background and foreground combinations are used: in effect their looks -emulate those of Ivy and co. in their original style. Whereas the other -group of packages will revert to an even more nuanced aesthetic with -some additional changes to the choice of hues. +Option ~opinionated~ uses color combinations that refashion the completion +UI. For the Icomplete camp this means that intense background and +foreground combinations are used: in effect their looks emulate those of +Helm, Ivy and co. in their original style. Whereas the other group of +packages will revert to an even more nuanced aesthetic with some +additional changes to the choice of hues. To appreciate the scope of this customization option, you should spend -some time with every one of the =nil= (default), =moderate=, and =opinionated= +some time with every one of the =nil= (default), ~moderate~, and ~opinionated~ possibilities. ** Option for fringe visibility -:PROPERTIES: -:ALT_TITLE: Fringes -:DESCRIPTION: Choose among plain, subtle, or intense fringe visibility -:CUSTOM_ID: h:1983c3fc-74f6-44f3-b917-967c403bebae -:END: +:properties: +:alt_title: Fringes +:description: Choose among invisible, subtle, or intense fringe styles +:custom_id: h:1983c3fc-74f6-44f3-b917-967c403bebae +:end: +#+vindex: modus-themes-fringes -Symbol names: - -+ =modus-operandi-theme-fringes= -+ =modus-vivendi-theme-fringes= +Symbol: ~modus-themes-fringes~ Possible values: 1. =nil= (default) -2. =subtle= -3. =intense= - -The "subtle" symbol will apply a grayscale background that is visible, -yet close enough to the main background color. While the "intense" -symbol will use a more noticeable grayscale background. +2. ~subtle~ +3. ~intense~ The default is to use the same color as that of the main background, meaning that the fringes are not obvious though they still occupy the -space given to them by =fringe-mode=. +space given to them by ~fringe-mode~. -** Option for line highlighting (hl-line-mode) -:PROPERTIES: -:ALT_TITLE: Line highlighting -:DESCRIPTION: Toggle intense style for current line highlighting -:CUSTOM_ID: h:1dba1cfe-d079-4c13-a810-f768e8789177 -:END: +Options ~subtle~ and ~intense~ apply a gray background, making the fringes +visible. The difference between the two is one of degree, as their +names imply. -Symbol names: +** Option for language checkers +:properties: +:alt_title: Language checkers +:description: Control the style of language checkers/linters +:custom_id: h:4b13743a-8ebf-4d2c-a043-cceba10b1eb4 +:end: +#+vindex: modus-themes-lang-checkers -+ =modus-operandi-theme-intense-hl-line= -+ =modus-vivendi-theme-intense-hl-line= +Symbol: ~modus-themes-lang-checkers~ + +Possible values: + +1. =nil= (default) +2. ~subtle-foreground~ +3. ~intense-foreground~ +4. ~straight-underline~ +5. ~subtle-foreground-straight-underline~ +6. ~intense-foreground-straight-underline~ +7. ~colored-background~ + +Nil (the default) applies a color-coded underline to the affected text, +while it leaves the original foreground in tact. If the display spec +where Emacs runs in has support for it (e.g. Emacs GUI), the underline's +style is that of a wave, otherwise it is a straight line. + +Options ~subtle-foreground~ and ~intense-foreground~ follow the same +color-coding pattern and wavy underline of the default, while extending +it with a corresponding foreground value for the affected text. The +difference between the two options is one of degree, as their names +suggest. + +Option ~straight-underline~ is like the default but always applies a +straight line under the affected text. Same principle for +~subtle-foreground-straight-underline~ and its counterpart +~intense-foreground-straight-underline~. + +Option ~colored-background~ uses a straight underline, a tinted +background, and a suitable foreground. All are color-coded. This is +the most intense combination of face properties. + +The present variable affects packages and/or face groups such as those +of =flyspell=, =flymake=, =flycheck=, ~artbollocks-mode~, and ~writegood-mode~. + +NOTE: The placement of the straight underline, though not the wave +style, is controlled by the built-in ~x-underline-at-descent-line~, +~x-use-underline-position-properties~, ~underline-minimum-offset~. Please +refer to their documentation strings. + +** Option for line highlighting (hl-line-mode) +:properties: +:alt_title: Line highlighting +:description: Toggle intense style for current line highlighting +:custom_id: h:1dba1cfe-d079-4c13-a810-f768e8789177 +:end: +#+vindex: modus-themes-intense-hl-line + +Symbol: ~modus-themes-intense-hl-line~ Possible values: 1. =nil= (default) 2. =t= -Draw the current line of =hl-line-mode= or its global equivalent in a more -prominent background color. This would also affect several packages -that enable =hl-line-mode=, such as =elfeed= and =mu4e=. +The default is to use a subtle gray background for ~hl-line-mode~ and its +global equivalent. -The default is to use a more subtle gray. +With a non-nil value (=t=) use a more prominent background color instead. + +This affects several packages that enable ~hl-line-mode~, such as =elfeed= +and =mu4e=. + +** Option for line numbers (display-line-numbers-mode) +:properties: +:alt_title: Line numbers +:description: Toggle subtle style for line numbers +:custom_id: h:8c4a6230-2e43-4aa2-a631-3b7179392e09 +:end: +#+vindex: modus-themes-subtle-line-numbers + +Symbol: ~modus-themes-subtle-line-numbers~ + +Possible value: + +1. =nil= (default) +2. =t= + +The default style for ~display-line-numbers-mode~ and its global variant +is to apply a subtle gray background to the line numbers. The current +line has a more pronounced background and foreground combination to +bring more attention to itself. + +Similarly, the faces for ~display-line-numbers-major-tick~ and its +counterpart ~display-line-numbers-minor-tick~ use appropriate styles that +involve a bespoke background and foreground combination. + +With a non-nil value (=t=), line numbers have no background of their own. +Instead they retain the primary background of the theme, blending with +the rest of the buffer. Foreground values for all relevant faces are +updated to accommodate this aesthetic. ** Option for parenthesis matching (show-paren-mode) -:PROPERTIES: -:ALT_TITLE: Matching parentheses -:DESCRIPTION: Toggle intense style for matching delimiters/parentheses -:CUSTOM_ID: h:e66a7e4d-a512-4bc7-9f86-fbbb5923bf37 -:END: +:properties: +:alt_title: Matching parentheses +:description: Choose between various styles for matching delimiters/parentheses +:custom_id: h:e66a7e4d-a512-4bc7-9f86-fbbb5923bf37 +:end: +#+vindex: modus-themes-paren-match + +Symbol: ~modus-themes-paren-match~ + +Possible values: + +1. =nil= (default) +2. ~subtle-bold~ +3. ~intense~ +4. ~intense-bold~ -Symbol names: +Nil means to use a subtle tinted background color for the matching +delimiters. -+ =modus-operandi-theme-intense-paren-match= -+ =modus-vivendi-theme-intense-paren-match= +Option ~intense~ applies a saturated background color. + +Option ~subtle-bold~ is the same as the default, but also makes use of +bold typographic weight (inherits the ~bold~ face). + +Option ~intense-bold~ is the same as ~intense~, while it also uses a bold +weight. + +This customization variable affects tools such as the built-in +~show-paren-mode~ and the =smartparens= package. + +** Option for active region +:properties: +:alt_title: Active region +:description: Choose between various styles for the active region +:custom_id: h:60798063-b4ad-45ea-b9a7-ff7b5c0ab74c +:end: +#+vindex: modus-themes-region + +Symbol: ~modus-themes-region~ Possible values: 1. =nil= (default) -2. =t= +2. ~no-extend~ +3. ~bg-only~ +4. ~bg-only-no-extend~ -Apply a more intense background to the matching parentheses (or -delimiters). This affects tools such as the built-in =show-paren-mode=. -The default is to use a subtle warm color for the background of those -overlays. +Nil means to only use a prominent gray background with a neutral +foreground. The foreground overrides all syntax highlighting. The +region extends to the edge of the window. -** Option for diff buffer looks -:PROPERTIES: -:ALT_TITLE: Diffs -:DESCRIPTION: Choose among intense, desaturated, or text-only diffs -:CUSTOM_ID: h:ea7ac54f-5827-49bd-b09f-62424b3b6427 -:END: +Option ~no-extend~ preserves the default aesthetic but prevents the region +from extending to the edge of the window. + +Option ~bg-only~ applies a faint tinted background that is distinct from +all others used in the theme, while it does not override any existing +colors. It extends to the edge of the window. + +Option ~bg-only-no-extend~ is a combination of the ~bg-only~ and ~no-extend~ +options. -Symbol names: +** Option for diff buffer looks +:properties: +:alt_title: Diffs +:description: Choose among intense, desaturated, or text-only diffs +:custom_id: h:ea7ac54f-5827-49bd-b09f-62424b3b6427 +:end: +#+vindex: modus-themes-diffs -+ =modus-operandi-theme-diffs= -+ =modus-vivendi-theme-diffs= +Symbol: ~modus-themes-diffs~ Possible values: 1. =nil= (default) -2. =desaturated= -2. =fg-only= - -By default the themes will apply richly colored backgrounds to the -output of diffs, such as those of =diff-mode=, =ediff=, =smerge-mode=, and -=magit=. These are color combinations of an accented background and -foreground so that, for example, added lines have a pronounced green -background with an appropriate shade of green for the affected text. -Word-wise or "refined" changes follow this pattern but use different -shades of those colors to remain distinct. - -A =desaturated= value tones down all relevant color values. It still +2. ~desaturated~ +3. ~fg-only~ +4. ~bg-only~ +5. ~deuteranopia~ + +By default the themes apply rich coloration to the output of diffs, such +as those of ~diff-mode~, ~ediff~, ~smerge-mode~, and Magit. These are +color combinations of an accented background and foreground so that, for +example, added lines have a pronounced green background with an +appropriate shade of green for the affected text. Word-wise or +"refined" changes follow this pattern but use different shades of those +colors to remain distinct. + +Option ~desaturated~ tones down all relevant color values. It still combines an accented background with an appropriate foreground, yet its -overall impression is very subtle. Refined changes are a bit more +overall impression is fairly subtle. Refined changes are a bit more intense to fulfil their intended function, though still less saturated than default. -While =fg-only= will remove all accented backgrounds and instead rely on -color-coded text to denote changes. For instance, added lines use an -intense green foreground, while their background is the same as the rest -of the buffer. Word-wise highlights still use a background value which -is, nonetheless, more subtle than its default equivalent. - -Concerning =magit=, an extra set of tweaks are introduced for the effect -of highlighting the current diff hunk, so as to remain consistent with -the overall experience of that mode. Expect changes that are consistent -with the overall intent of the aforementioned. +Option ~fg-only~ will remove most accented backgrounds and instead rely +on color-coded text to denote changes. For instance, added lines use a +green foreground, while their background is the same as the rest of the +buffer. Word-wise highlights still use a background value which is, +nonetheless, more subtle than its default equivalent. + +Option ~bg-only~ applies color-coded backgrounds but does not override +any syntax highlighting that may be present. This makes it suitable for +use with a non-nil value for ~diff-font-lock-syntax~ (which is the +default for ~diff-mode~ buffers in Emacs 27 or higher). + +Option ~deuteranopia~ optimizes for red-green color deficiency. It +replaces all instances of green with blue variants. This is to ensure +that indicators for "removed" and "added" states are not mistaken for +each other. + +Concerning Magit, an extra set of tweaks are introduced for the effect +of highlighting the current diff hunk, so as to remain aligned with the +overall experience of that mode. Expect changes that are consistent +with the overall intent of the aforementioned. Note, however, that the +~bg-only~ option will not deliver the intended results in Magit diffs +because no syntax highlighting is used there (last checked with Magit +version 20201116.1057, though upstream has a plan to eventually support +such a feature---this entry shall be updated accordingly). ** Option for org-mode block styles -:PROPERTIES: -:ALT_TITLE: Org mode blocks -:DESCRIPTION: Choose among plain, grayscale, or rainbow styles -:CUSTOM_ID: h:b7e328c0-3034-4db7-9cdf-d5ba12081ca2 -:END: - -Symbol names: +:properties: +:alt_title: Org mode blocks +:description: Choose among plain, grayscale, or rainbow styles +:custom_id: h:b7e328c0-3034-4db7-9cdf-d5ba12081ca2 +:end: +#+vindex: modus-themes-org-blocks -+ =modus-operandi-theme-org-blocks= -+ =modus-vivendi-theme-org-blocks= +Symbol: ~modus-themes-org-blocks~ Possible values: 1. =nil= (default) -2. =grayscale= -3. =rainbow= +2. ~grayscale~ +3. ~rainbow~ The default is to use the same background as the rest of the buffer for the contents of the block. -A value of =grayscale= will apply a subtle neutral gray background to the -block's contents. It will also extend to the edge of the window the -background of the "begin" and "end" block delimiter lines (only relevant -for Emacs versions >= 27 where the 'extend' keyword is recognised by -=set-face-attribute=). +Option ~grayscale~ applies a subtle neutral gray background to the block's +contents. It will also extend to the edge of the window the background +of the "begin" and "end" block delimiter lines (only relevant for Emacs +versions >= 27 where the 'extend' keyword is part of the face +specifications). -While =rainbow= will instead 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). This is most -suitable for users who work on literate programming documents that mix -and match several languages. +Option ~rainbow~ uses 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. This is most suitable +for users who work on literate programming documents that mix and match +several languages. Note that the "rainbow" blocks may require you to also reload the -major-mode so that the colors are applied properly: use =M-x org-mode= or -=M-x org-mode-restart= to refresh the buffer. Or start typing in each -code block (inefficient at scale, but it still works). +major-mode so that the colors are applied consistently throughout: use +{{{kbd(M-x org-mode)}}} or {{{kbd(M-x org-mode-restart)}}} to refresh the buffer. +Or start typing in each code block (inefficient at scale, but it still +works). -** Option for headings' overall style -:PROPERTIES: -:ALT_TITLE: Heading styles -:DESCRIPTION: Choose among several styles, also per heading level -:CUSTOM_ID: h:271eff19-97aa-4090-9415-a6463c2f9ae1 -:END: +** Option for org-habit graph styles +:properties: +:alt_title: Org agenda habits +:description: Choose among standard, simplified, or traffic light styles +:custom_id: h:b7e328c0-3034-4db7-9cdf-d5ba12081ca2 +:end: +#+vindex: modus-themes-org-habit + +Symbol: ~modus-themes-org-habit~ + +Possible values: + +1. =nil= (default) +2. ~simplified~ +3. ~traffic-light~ + +The default is meant to conform with the original aesthetic of +=org-habit=. It employs all four color codes that correspond to the +org-habit states---clear, ready, alert, and overdue---while +distinguishing between their present and future variants. This results +in a total of eight colors in use: red, yellow, green, blue, in tinted +and shaded versions. They cover the full set of information provided by +the =org-habit= consistency graph. + +Option ~simplified~ is like the default except that it removes the +dichotomy between current and future variants by applying uniform +color-coded values. It applies a total of four colors: red, yellow, +green, blue. They produce a simplified consistency graph that is more +legible (or less "busy") than the default. The intent is to shift focus +towards the distinction between the four states of a habit task, rather +than each state's present/future outlook. + +Option ~traffic-light~ further reduces the available colors to red, +yellow, and green. As in ~simplified~, present and future variants appear +uniformly, but differently from it, the 'clear' state is rendered in a +green hue, instead of the original blue. This is meant to capture the +use-case where a habit task being "too early" is less important than it +being "too late". The difference between ready and clear states is +attenuated by painting both of them using shades of green. This option +thus highlights the alert and overdue states. + +** Option for the headings' overall style +:properties: +:alt_title: Heading styles +:description: Choose among several styles, also per heading level +:custom_id: h:271eff19-97aa-4090-9415-a6463c2f9ae1 +:end: +#+vindex: modus-themes-headings This is defined as an alist and, therefore, uses a different approach than other customization options documented in this manual. -Symbol names: - -+ =modus-operandi-theme-headings= -+ =modus-vivendi-theme-headings= +Symbol: ~modus-themes-headings~ Possible values, which can be specified for each heading level (examples further below): + nil (default fallback option---covers all heading levels) + =t= (default style for a single heading, when the fallback differs) -+ =no-bold= -+ =line= -+ =line-no-bold= -+ =rainbow= -+ =rainbow-line= -+ =rainbow-line-no-bold= -+ =highlight= -+ =highlight-no-bold= -+ =rainbow-highlight= -+ =rainbow-highlight-no-bold= -+ =section= -+ =section-no-bold= -+ =rainbow-section= -+ =rainbow-section-no-bold= - -To control faces per level from 1-8, use something like this (same for -=modus-vivendi-theme-headings=): ++ ~no-bold~ ++ ~line~ ++ ~line-no-bold~ ++ ~rainbow~ ++ ~rainbow-line~ ++ ~rainbow-line-no-bold~ ++ ~highlight~ ++ ~highlight-no-bold~ ++ ~rainbow-highlight~ ++ ~rainbow-highlight-no-bold~ ++ ~section~ ++ ~section-no-bold~ ++ ~rainbow-section~ ++ ~rainbow-section-no-bold~ ++ ~no-color~ ++ ~no-color-no-bold~ + +To control faces per level from 1-8, use something like this: #+begin_src emacs-lisp -(setq modus-operandi-theme-headings +(setq modus-themes-headings '((1 . section) - (2 . line) - (3 . highlight) - (t . rainbow-no-bold))) + (2 . section-no-bold) + (3 . rainbow-line) + (t . rainbow-line-no-bold))) #+end_src -The above uses the =section= value for heading levels 1, the =line= for -headings 2, =highlight= for 3. All other levels fall back to -=rainbow-line-no-bold=. +The above uses the ~section~ value for heading levels 1, ~section-no-bold~ +for headings 2, ~rainbow-line~ for 3. All other levels fall back to +~rainbow-line-no-bold~. To set a uniform value for all heading levels, use this pattern: #+begin_src emacs-lisp ;; A given style for every heading -(setq modus-operandi-theme-headings - '((t . rainbow-line-no-bold))) +(setq modus-themes-headings + '((t . section))) ;; Default aesthetic for every heading -(setq modus-operandi-theme-headings - '((t . nil))) +(setq modus-themes-headings + '()) #+end_src The default style for headings 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: +value in combination with 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: #+begin_src emacs-lisp -(setq modus-operandi-theme-headings +(setq modus-themes-headings '((1 . t) (2 . line) (t . rainbow-line-no-bold))) #+end_src -A description of all other possible styles: +A description of all other possible styles beyond the default: -+ =no-bold= retains the default text color while removing the typographic - weight. ++ ~no-bold~ retains the default text color while removing the bold + typographic weight. -+ =line= is the same as the default plus an overline over the heading. ++ ~line~ is the same as the default plus an overline across the + heading's length. -+ =line-no-bold= is the same as =line= without bold weight. ++ ~line-no-bold~ is the same as ~line~ without bold weight. -+ =rainbow= uses a more colorful foreground in combination with bold - weight. ++ ~rainbow~ uses a more colorful foreground in combination with bold + typographic weight. -+ =rainbow-line= is the same as =rainbow= plus an overline. ++ ~rainbow-line~ is the same as ~rainbow~ plus an overline. -+ =rainbow-line-no-bold= is the same as =rainbow-line= without the bold ++ ~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 adds to it a subtle accented - background. ++ ~highlight~ retains the default style of a fairly desaturated + foreground combined with a bold weight and adds to it a subtle + accented background. -+ =highlight-no-bold= is the same as =highlight= without a bold weight. ++ ~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~ 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. ++ ~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 ++ ~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. + of the ~line~ and ~highlight~ values. -+ =section-no-bold= is the same as =section= without a bold weight. ++ ~section-no-bold~ is the same as ~section~ without a bold weight. -+ =rainbow-section= is the same as =section= but with a more colorful ++ ~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." ++ ~rainbow-section-no-bold~ is the same as ~rainbow-section~ without a + bold weight. + ++ ~no-color~ does not apply any color to the heading, meaning that it + uses the foreground of the ~default~ face. It still renders the text + with a bold typographic weight. -** Option for scaled headings -:PROPERTIES: -:ALT_TITLE: Scaled headings -:DESCRIPTION: Toggle scaling of headings -:CUSTOM_ID: h:075eb022-37a6-41a4-a040-cc189f6bfa1f -:END: ++ ~no-color-no-bold~ is like ~no-color~ but without the bold weight. -Symbol names: +** Option for scaled headings +:properties: +:alt_title: Scaled headings +:description: Toggle scaling of headings +:custom_id: h:075eb022-37a6-41a4-a040-cc189f6bfa1f +:end: +#+vindex: modus-themes-scale-headings -+ =modus-operandi-theme-scale-headings= -+ =modus-vivendi-theme-scale-headings= +Symbol: ~modus-themes-scale-headings~ Possible values: 1. =nil= (default) 2. =t= -Make headings larger in height relative to the main text. This is -noticeable in modes like Org. The default is to use the same size for -headings and body copy. +The default is to use the same size for headings and paragraph text. + +With a non-nil value (=t=) make headings larger in height relative to the +main text. This is noticeable in modes like Org, Markdown, and Info. *** Control the scale of headings -:PROPERTIES: -:ALT_TITLE: Scaled heading sizes -:DESCRIPTION: Specify rate of increase for scaled headings -:CUSTOM_ID: h:6868baa1-beba-45ed-baa5-5fd68322ccb3 -:END: +:properties: +:alt_title: Scaled heading sizes +:description: Specify rate of increase for scaled headings +:custom_id: h:6868baa1-beba-45ed-baa5-5fd68322ccb3 +:end: -In addition to toggles for enabling scaled headings, users can also +In addition to the toggle for enabling scaled headings, users can also specify a number of their own. + If it is a floating point, say, =1.5=, it is interpreted as a multiple - of the base font size. This is the recommended method. - -+ If it is an integer, it is read as an absolute font height. The - number is basically the point size multiplied by ten. So if you want - it to be =18pt= you must pass =180=. Please understand that setting an - absolute value is discouraged, as it will break the layout when you - try to change font sizes with the built-in =text-scale-adjust= command - (see [[#h:defcf4fc-8fa8-4c29-b12e-7119582cc929][Font configurations]]). + of the base font size. This is the recommended method, because it + will always adapt to changes in the base font size, such as while + using the ~text-scale-adjust~ command. + ++ If it is an integer, it is read as an absolute font height that is + 1/10 of the typographic point size. Thus a value of =18pt= must be + expressed as =180=. Setting an absolute value is discouraged, as it + will break the layout in cases where the base font size must change, + such as with the ~text-scale-adjust~ command ([[#h:defcf4fc-8fa8-4c29-b12e-7119582cc929][Font configurations]]). + While we discourage using absolute values, we still provide for this + option for users who do not need to perform text-scaling operations or + who are content with whatever discrepancies in height. Below are the variables in their default values, using the floating -point paradigm. The numbers are very conservative, but you are free to -change them to your liking, such as =1.2=, =1.4=, =1.6=, =1.8=, =2.0=---or use a +point paradigm. The numbers are very conservative, but one is free to +change them to their liking, such as =1.2=, =1.4=, =1.6=, =1.8=, =2.0=---or use a resource for finding a consistent scale: #+begin_src emacs-lisp -(setq 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) - -(setq modus-vivendi-theme-scale-1 1.05 - modus-vivendi-theme-scale-2 1.1 - modus-vivendi-theme-scale-3 1.15 - modus-vivendi-theme-scale-4 1.2 - modus-vivendi-theme-scale-5 1.3) +(setq modus-themes-scale-1 1.05 + modus-themes-scale-2 1.1 + modus-themes-scale-3 1.15 + modus-themes-scale-4 1.2 + modus-themes-scale-5 1.3) #+end_src +As for the application of that scale, the variables that range from +~modus-themes-scale-1~ up to ~modus-themes-scale-4~ apply to regular +headings within the context of the given major mode. The former is the +smallest, while the latter is the largest. "Regular headings" are those +that have a standard syntax for their scale, such as Org mode's eight +levels of asterisks or Markdown's six columns. + +Whereas ~modus-themes-scale-5~ is applied to special headings that do not +conform with the aforementioned syntax, yet which are expected to be +larger than the largest value on that implied scale. Put concretely, +Org's =#+title= meta datum is not part of the eight levels of headings in +an Org file, yet is supposed to signify the primary header. Similarly, +the Org Agenda's structure headings are not part of a recognisable scale +and so they also get ~modus-themes-scale-5~. + +Users who wish to maintain scaled headings for the normal syntax while +preventing special headings from standing out, can assign a value of =1.0= +to ~modus-themes-scale-5~ to make it the same as body text (or whatever +value would render it indistinguishable from the desired point of +reference). + Note that in earlier versions of Org, scaling would only increase the size of the heading, but not of keywords that were added to it, like "TODO". The issue has been fixed upstream: . -** Option for variable-pitch font in headings -:PROPERTIES: -:ALT_TITLE: Headings' font -:DESCRIPTION: Toggle proportionately spaced fonts in headings -:CUSTOM_ID: h:97caca76-fa13-456c-aef1-a2aa165ea274 -:END: +** Option for variable-pitch font in UI elements +:properties: +:alt_title: UI typeface +:description: Toggle the use of variable-pitch across the User Interface +:custom_id: h:16cf666c-5e65-424c-a855-7ea8a4a1fcac +:end: +#+vindex: modus-themes-variable-pitch-ui + +Symbol: ~modus-themes-variable-pitch-ui~ + +Possible values: + +1. =nil= (default) +2. =t= + +This option concerns User Interface elements that are under the direct +control of Emacs. In particular: the mode line, header line, tab bar, +and tab line. + +The default is to use the same font as the rest of Emacs, which usually +is a monospaced family. -Symbol names: +With a non-nil value (=t=) apply a proportionately spaced typeface. This +is done by assigning the ~variable-pitch~ face to the relevant items. -+ =modus-operandi-theme-variable-pitch-headings= -+ =modus-vivendi-theme-variable-pitch-headings= +[[#h:defcf4fc-8fa8-4c29-b12e-7119582cc929][Font configurations for Org and others]]. + +** Option for variable-pitch font in headings +:properties: +:alt_title: Headings' typeface +:description: Toggle the use of variable-pitch in headings +:custom_id: h:97caca76-fa13-456c-aef1-a2aa165ea274 +:end: +#+vindex: modus-themes-variable-pitch-headings + +Symbol: ~modus-themes-variable-pitch-headings~ Possible values: 1. =nil= (default) 2. =t= -Choose to apply a proportionately spaced, else "variable-pitch", -typeface to headings (such as in Org mode). The default is to use the -main font family. +The default is to use the main font family, which typically is +monospaced. -[[#h:defcf4fc-8fa8-4c29-b12e-7119582cc929][Font configurations for Org (and others)]]. +With a non-nil value (=t=) apply a proportionately spaced typeface, else +"variable-pitch", to headings (such as in Org mode). + +[[#h:defcf4fc-8fa8-4c29-b12e-7119582cc929][Font configurations for Org and others]]. * Advanced customization (do-it-yourself) -:PROPERTIES: -:INDEX: cp -:CUSTOM_ID: h:f4651d55-8c07-46aa-b52b-bed1e53463bb -:END: +:properties: +:custom_id: h:f4651d55-8c07-46aa-b52b-bed1e53463bb +:end: -Unlike the predefined customization options which follow a -straightforward pattern of allowing the user to quickly specify their -preference, the themes also provide a more flexible, albeit difficult, -mechanism to control things with precision (see [[#h:bf1c82f2-46c7-4eb2-ad00-dd11fdd8b53f][Customization Options]]). +Unlike the predefined customization options which follow a clear pattern +of allowing the user to quickly specify their preference, the themes +also provide a more flexible, albeit difficult, mechanism to control +things with precision ([[#h:bf1c82f2-46c7-4eb2-ad00-dd11fdd8b53f][Customization Options]]). This section is of interest only to users who are prepared to maintain their own local tweaks and who are willing to deal with any possible incompatibilities between versioned releases of the themes. As such, they are labelled as "do-it-yourself" or "DIY". -** Full access to the themes' palette -:PROPERTIES: -:ALT_TITLE: Tweak colors (DIY) -:DESCRIPTION: Declare your own palette overrides -:CUSTOM_ID: h:1487c631-f4fe-490d-8d58-d72ffa3bd474 -:END: +** Per-theme customization settings (DIY) +:properties: +:custom_id: h:a897b302-8e10-4a26-beab-3caaee1e1193 +:end: + +If you prefer to maintain different customization options between the +two themes, it is best you write your own functions that first set those +options and then load the relevant theme. The following code does +exactly that by simply differentiating the two themes on the choice of +bold constructs in code syntax (enabled for one, disabled for the +other). + +#+begin_src emacs-lisp +(defun my-demo-modus-operandi () + (interactive) + (setq modus-themes-bold-constructs t) ; ENABLE bold + (modus-themes-load-operandi)) + +(defun my-demo-modus-vivendi () + (interactive) + (setq modus-themes-bold-constructs nil) ; DISABLE bold + (modus-themes-load-vivendi)) + +(defun my-demo-modus-themes-toggle () + (if (eq (car custom-enabled-themes) 'modus-operandi) + (my-demo-modus-vivendi) + (my-demo-modus-operandi))) +#+end_src + +Then assign ~my-demo-modus-themes-toggle~ to a key instead of the +equivalent the themes provide. + +For a more elaborate design, it is better to inspect the source code of +~modus-themes-toggle~ and relevant functions. + +** Case-by-case face specs using the themes' palette (DIY) +:properties: +:custom_id: h:1487c631-f4fe-490d-8d58-d72ffa3bd474 +:end: +#+findex: modus-themes-color +#+findex: modus-themes-color-alts +#+cindex: Extracting individual colors + +This section is about tweaking individual faces. If you plan to do +things at scale, consult the next section: [[#h:51ba3547-b8c8-40d6-ba5a-4586477fd4ae][Set multiple faces]]. + +We already covered in previous sections how to toggle between the themes +and how to configure options prior to loading. We also explained that +some of the functions made available to users will fire up a hook that +can be used to pass tweaks in the post-theme-load phase. + +Now assume you wish to change a single face, say, the ~cursor~. And you +would like to get the standard "blue" color value of the active Modus +theme, whether it is Modus Operandi or Modus Vivendi. To do that, you +can use the ~modus-themes-color~ function. It accepts a symbol that is +associated with a color in ~modus-themes-operandi-colors~ and +~modus-themes-vivendi-colors~. Like this: + +#+begin_src emacs-lisp +(modus-themes-color 'blue) +#+end_src + +The function always extracts the color value of the active Modus theme. + +#+begin_src emacs-lisp +(progn + (load-theme 'modus-operandi t) + (modus-themes-color 'blue)) ; "#0031a9" for `modus-operandi' + +(progn + (load-theme 'modus-vivendi t) + (modus-themes-color 'blue)) ; "#2fafff" for `modus-vivendi' +#+end_src + +Do {{{kbd(C-h v)}}} on the aforementioned variables to check all the available +symbols that can be passed to this function. + +With that granted, let us expand the example to actually change the +~cursor~ face's background property. We employ the built-in function of +~set-face-attribute~: + +#+begin_src emacs-lisp +(set-face-attribute 'cursor nil :background (modus-themes-color 'blue)) +#+end_src + +If you evaluate this form, your cursor will become blue. But if you +change themes, such as with ~modus-themes-toggle~, your edits will be +lost, because the newly loaded theme will override the =:background= +attribute you had assigned to that face. -The variables are: +For such changes to persist, we need to make them after loading the +theme. So we rely on ~modus-themes-after-load-theme-hook~, which gets +called from ~modus-themes-load-operandi~, ~modus-themes-load-vivendi~, as +well as the command ~modus-themes-toggle~. Here is a sample function that +tweaks two faces and then gets added to the hook: -+ =modus-operandi-theme-override-colors-alist= -+ =modus-vivendi-theme-override-colors-alist= +#+begin_src emacs-lisp +(defun my-modus-themes-custom-faces () + (set-face-attribute 'cursor nil :background (modus-themes-color 'blue)) + (set-face-attribute 'font-lock-type-face nil :foreground (modus-themes-color 'magenta-alt))) + +(add-hook 'modus-themes-after-load-theme-hook #'my-modus-themes-custom-faces) +#+end_src -Users can specify an association list that maps the names of color -variables to hexadecimal RGB values (in the form of =#RRGGBB=). This -means that it is possible to override the entire palette or subsets -thereof (see the source code for the actual names and values). +[[#h:86f6906b-f090-46cc-9816-1fe8aeb38776][A theme-agnostic hook for theme loading]]. -Example: +Using this principle, it is possible to override the styles of faces +without having to find color values for each case. + +Another application is to control the precise weight for bold +constructs. This is particularly useful if your typeface has several +variants such as "heavy", "extrabold", "semibold". All you have to do +is edit the ~bold~ face. For example: #+begin_src emacs-lisp -;; Redefine the values of those three variables for the given theme -(setq modus-vivendi-theme-override-colors-alist - '(("magenta" . "#ffaabb") - ("magenta-alt" . "#ee88ff") - ("magenta-alt-other" . "#bbaaff"))) +(set-face-attribute 'bold nil :weight 'semibold) #+end_src -If you want to be creative, you can define a minor mode that refashions -the themes on demand. The following is a minor mode that gets activated -on demand. We combine it with the function to switch between Modus -Operandi and Modus Vivendi (see [[#h:2a0895a6-3281-4e55-8aa1-8a737555821e][Toggle between the themes on demand]] for -a basic command, and/or [[*Configure options prior to loading][Configure options prior to loading]] for a more -comprehensive setup). +Remember to use the custom function and hook combo we demonstrated +above. Because the themes do not hard-wire a specific weight, this +simple form is enough to change the weight of all bold constructs +throughout the interface. + +Finally, there are cases where you want to tweak colors though wish to +apply different ones to each theme, say, a blue hue for Modus Operandi +and a shade of red for Modus Vivendi. To this end, we provide +~modus-themes-color-alts~ as a convenience function to save you from the +trouble of writing separate wrappers for each theme. It still returns a +single value by querying either of ~modus-themes-operandi-colors~ and +~modus-themes-vivendi-colors~, only here you pass the two keys you want, +first for ~modus-operandi~ then ~modus-vivendi~. + +Take the previous example with the ~cursor~ face: #+begin_src emacs-lisp -(define-minor-mode modus-themes-alt-mode - "Override Modus themes' palette variables with custom values. +;; Blue for `modus-operandi' and red for `modus-vivendi' +(set-face-attribute 'cursor nil :background (modus-themes-color-alts 'blue 'red)) +#+end_src -This is intended as a proof-of-concept. It is, nonetheless, a -perfectly accessible alternative, conforming with the design -principles of the Modus themes. It still is not as good as the -default colors." +** Face specs at scale using the themes' palette (DIY) +:properties: +:custom_id: h:51ba3547-b8c8-40d6-ba5a-4586477fd4ae +:end: +#+findex: modus-themes-with-colors +#+cindex: Extracting colors en masse + +The examples here are for large scale operations. For simple, one-off +tweaks, you may prefer the approach documented in the previous section +([[#h:1487c631-f4fe-490d-8d58-d72ffa3bd474][Case-by-case face specs using the themes' palette]]). + +The ~modus-themes-with-colors~ macro lets you retrieve multiple color +values by employing the backquote/backtick and comma notation. The +values are stored in the alists ~modus-themes-operandi-colors~ and +~modus-themes-vivendi-colors~, while the macro always queries that of the +active Modus theme. + +Here is an abstract example that just returns a list of color values +while ~modus-operandi~ is enabled: + +#+begin_src emacs-lisp +(modus-themes-with-colors + (list fg-main + blue-faint + magenta + magenta-alt-other + cyan-alt-other + fg-special-cold + blue-alt + magenta-faint + cyan + fg-main + green-faint + red-alt-faint + blue-alt-faint + fg-special-warm + cyan-alt + blue)) +;; => +;; ("#000000" "#002f88" "#721045" "#5317ac" +;; "#005a5f" "#093060" "#2544bb" "#752f50" +;; "#00538b" "#000000" "#104410" "#702f00" +;; "#003f78" "#5d3026" "#30517f" "#0031a9") +#+end_src + +Getting a list of colors may have its applications, though what you are +most likely interested in is how to use those variables to configure +several faces at once. To do so we can rely on the built-in +~custom-set-faces~ function, which sets face specifications for the +special =user= theme. That "theme" gets applied on top of regular themes +like ~modus-operandi~ and ~modus-vivendi~. + +This is how it works: + +#+begin_src emacs-lisp +(modus-themes-with-colors + (custom-set-faces + `(cursor ((,class :background ,blue))) + `(mode-line ((,class :background ,yellow-nuanced-bg + :foreground ,yellow-nuanced-fg))) + `(mode-line-inactive ((,class :background ,blue-nuanced-bg + :foreground ,blue-nuanced-fg))))) +#+end_src + +The above snippet will immediately refashion the faces it names once it +is evaluated. However, if you switch between the Modus themes, say, +from ~modus-operandi~ to ~modus-vivendi~, the colors will not get updated to +match those of the new theme. To make things work across the themes, we +need to employ the same technique we discussed in the previous section, +namely, to pass our changes at the post-theme-load phase via a hook. + +The themes provide the ~modus-themes-after-load-theme-hook~, which gets +called from ~modus-themes-load-operandi~, ~modus-themes-load-vivendi~, as +well as the command ~modus-themes-toggle~. With this knowledge, you can +wrap the macro in a function and then assign that function to the hook. +Thus: + +#+begin_src emacs-lisp +(defun my-modus-themes-custom-faces () + (modus-themes-with-colors + (custom-set-faces + `(cursor ((,class :background ,blue))) + `(mode-line ((,class :background ,yellow-nuanced-bg + :foreground ,yellow-nuanced-fg))) + `(mode-line-inactive ((,class :background ,blue-nuanced-bg + :foreground ,blue-nuanced-fg)))))) + +(add-hook 'modus-themes-after-load-theme-hook #'my-modus-themes-custom-faces) +#+end_src + +[[#h:86f6906b-f090-46cc-9816-1fe8aeb38776][A theme-agnostic hook for theme loading]]. + +To discover the faces defined by all loaded libraries, you may do +{{{kbd(M-x list-faces-display)}}}. Be warned that when you =:inherit= a face +you are introducing an implicit dependency, so try to avoid doing so for +libraries other than the built-in {{{file(faces.el)}}} (or at least understand +that things may break if you inherit from a yet-to-be-loaded face). + +Also bear in mind that these examples are meant to work with the Modus +themes. If you are cycling between multiple themes you may encounter +unforeseen issues, such as the colors of the Modus themes being applied +to a non-Modus item. + +Finally, note that you can still use other functions where those make +sense. For example, the ~modus-themes-color-alts~ that was discussed in +the previous section. Adapt the above example like this: + +#+begin_src emacs-lisp +... +(modus-themes-with-colors + (custom-set-faces + `(cursor ((,class :background ,(modus-themes-color-alts 'blue 'green)))) + ...)) +#+end_src + +** Override colors (DIY) +:properties: +:custom_id: h:307d95dd-8dbd-4ece-a543-10ae86f155a6 +:end: +#+vindex: modus-themes-operandi-color-overrides +#+vindex: modus-themes-vivendi-color-overrides +#+cindex: Change a theme's colors + +The themes provide a mechanism for overriding their color values. This +is controlled by the variables ~modus-themes-operandi-color-overrides~ and +~modus-themes-vivendi-color-overrides~, which are alists that should +mirror a subset of the associations in ~modus-themes-operandi-colors~ and +~modus-themes-vivendi-colors~ respectively. As with all customisations, +overriding must be done before loading the affected theme. + +Let us approach the present topic one step at a time. Here is a +simplified excerpt of the default palette for Modus Operandi with some +basic background values that apply to buffers and the mode line +(remember to inspect the actual value to find out all the associations +that can be overridden): + +#+begin_src emacs-lisp +(defconst modus-themes-colors-operandi + '((bg-main . "#ffffff") + (bg-dim . "#f8f8f8") + (bg-alt . "#f0f0f0") + (bg-active . "#d7d7d7") + (bg-inactive . "#efefef"))) +#+end_src + +As one can tell, we bind a key to a hexadecimal RGB color value. Now +say we wish to override those specific values and have our changes +propagate to all faces that use those keys. We could write something +like this, which adds a subtle ochre tint: + +#+begin_src emacs-lisp +(setq modus-themes-operandi-color-overrides + '((bg-main . "#fefcf4") + (bg-dim . "#faf6ef") + (bg-alt . "#f7efe5") + (bg-active . "#e8dfd1") + (bg-inactive . "#f6ece5"))) +#+end_src + +Once this is evaluated, any subsequent loading of ~modus-operandi~ will +use those values instead of the defaults. No further intervention is +required. + +To reset the changes, we apply this and reload the theme: + +#+begin_src emacs-lisp +(setq modus-themes-operandi-color-overrides nil) +#+end_src + +Users who wish to leverage such a mechanism can opt to implement it +on-demand by means of a global minor mode. The following snippet covers +both themes and expands to some more assosiations in the palette: + +#+begin_src emacs-lisp +(define-minor-mode my-modus-themes-tinted + "Tweak some Modus themes colors." :init-value nil :global t - (if modus-themes-alt-mode - (setq modus-operandi-theme-override-colors-alist - '(("bg-main" . "#fefcf4") - ("bg-dim" . "#faf6ef") - ("bg-alt" . "#f7efe5") - ("bg-hl-line" . "#f4f0e3") - ("bg-active" . "#e8dfd1") - ("bg-inactive" . "#f6ece5") - ("bg-region" . "#c6bab1") - ("bg-header" . "#ede3e0") - ("bg-tab-bar" . "#dcd3d3") - ("bg-tab-active" . "#fdf6eb") - ("bg-tab-inactive" . "#c8bab8") - ("fg-unfocused" . "#55556f")) - modus-vivendi-theme-override-colors-alist - '(("bg-main" . "#100b17") - ("bg-dim" . "#161129") - ("bg-alt" . "#181732") - ("bg-hl-line" . "#191628") - ("bg-active" . "#282e46") - ("bg-inactive" . "#1a1e39") - ("bg-region" . "#393a53") - ("bg-header" . "#202037") - ("bg-tab-bar" . "#262b41") - ("bg-tab-active" . "#120f18") - ("bg-tab-inactive" . "#3a3a5a") - ("fg-unfocused" . "#9a9aab"))) - (setq modus-operandi-theme-override-colors-alist nil - modus-vivendi-theme-override-colors-alist nil))) - -(defun modus-themes-toggle (&optional arg) - "Toggle between `modus-operandi' and `modus-vivendi' themes. - -With optional \\[universal-argument] prefix, enable -`modus-themes-alt-mode' for the loaded theme." - (interactive "P") - (if arg - (modus-themes-alt-mode 1) - (modus-themes-alt-mode -1)) - (if (eq (car custom-enabled-themes) 'modus-operandi) - (progn - (disable-theme 'modus-operandi) - (load-theme 'modus-vivendi t)) - (disable-theme 'modus-vivendi) - (load-theme 'modus-operandi t))) + (if my-modus-themes-tinted + (setq modus-themes-operandi-color-overrides + '((bg-main . "#fefcf4") + (bg-dim . "#faf6ef") + (bg-alt . "#f7efe5") + (bg-hl-line . "#f4f0e3") + (bg-active . "#e8dfd1") + (bg-inactive . "#f6ece5") + (bg-region . "#c6bab1") + (bg-header . "#ede3e0") + (bg-tab-bar . "#dcd3d3") + (bg-tab-active . "#fdf6eb") + (bg-tab-inactive . "#c8bab8") + (fg-unfocused . "#55556f")) + modus-themes-vivendi-color-overrides + '((bg-main . "#100b17") + (bg-dim . "#161129") + (bg-alt . "#181732") + (bg-hl-line . "#191628") + (bg-active . "#282e46") + (bg-inactive . "#1a1e39") + (bg-region . "#393a53") + (bg-header . "#202037") + (bg-tab-bar . "#262b41") + (bg-tab-active . "#120f18") + (bg-tab-inactive . "#3a3a5a") + (fg-unfocused . "#9a9aab"))) + (setq modus-themes-operandi-color-overrides nil + modus-themes-vivendi-color-overrides nil))) #+end_src -** Font configurations for Org (and others) -:PROPERTIES: -:ALT_TITLE: Font configs (DIY) -:DESCRIPTION: Optimise for mixed typeface buffers -:CUSTOM_ID: h:defcf4fc-8fa8-4c29-b12e-7119582cc929 -:END: +With this in place, one can invoke {{{kbd(M-x my-modus-themes-tinted)}}} and +then load the Modus theme of their choice. The new palette subset will +come into effect: subtle ochre tints for Modus Operandi and night sky +shades for Modus Vivendi. Switching between the two themes, such as +with {{{kbd(M-x modus-themes-toggle)}}} will also use the overrides. + +Given that this is a user-level customisation, one is free to implement +whatever color values they desire, even if the possible combinations +fall below the minimum 7:1 contrast ratio that governs the design of the +themes (the WCAG AAA legibility standard). Preferences aside, it is +advised to inspect the source code of ~modus-themes-operandi-colors~ and +~modus-themes-vivendi-colors~ to read the inline commentary: it explains +what the intended use of each palette subset is. -The themes are designed to cope well with mixed font settings ([[#h:115e6c23-ee35-4a16-8cef-e2fcbb08e28b][Option -for no font mixing]]). Currently this applies to =org-mode= and -=markdown-mode=. +Furthermore, users may benefit from the ~modus-themes-contrast~ function +that we provide: [[#h:02e25930-e71a-493d-828a-8907fc80f874][test color combinations]]. It measures the contrast +ratio between two color values, so it can help in overriding the palette +(or a subset thereof) without making the end result inaccessible. + +** Font configurations for Org and others (DIY) +:properties: +:custom_id: h:defcf4fc-8fa8-4c29-b12e-7119582cc929 +:end: +#+cindex: Font configurations + +The themes are designed to cope well with mixed font configurations. + +[[#h:115e6c23-ee35-4a16-8cef-e2fcbb08e28b][Option for no font mixing]]. + +This mostly concerns ~org-mode~ and ~markdown-mode~, though expect to find +it elsewhere like in ~Info-mode~. In practice it means that the user can safely opt for a more prose-friendly proportionately spaced typeface as their default, while letting spacing-sensitive elements like tables and inline code always -use a monospaced font, by inheriting from the =fixed-pitch= face. +use a monospaced font, by inheriting from the ~fixed-pitch~ face. -Users can try the built-in =M-x variable-pitch-mode= to see the effect in -action. +Users can try the built-in {{{kbd(M-x variable-pitch-mode)}}} to see the +effect in action. To make everything use your desired font families, you need to configure -the =variable-pitch= (proportional spacing) and =fixed-pitch= (monospaced) +the ~variable-pitch~ (proportional spacing) and ~fixed-pitch~ (monospaced) faces respectively. It may also be convenient to set your main typeface -by configuring the =default= face the same way. +by configuring the ~default~ face the same way. -Put something like this in your initialization file (make sure to read -the documentation of =set-face-attribute=, with =M-x describe-function=): +Put something like this in your initialization file (also consider +reading the doc string of ~set-face-attribute~): #+begin_src emacs-lisp ;; Main typeface @@ -1199,50 +1682,35 @@ ** Font configurations for Org (and others) Note the differences in the =:height= property. The =default= face must specify an absolute value, which is the point size × 10. So if you want -to use a font at point size =11=, you set the height at =110=.[fn:: =:height= +to use a font at point size =11=, you set the height to =110=.[fn:: =:height= values do not need to be rounded to multiples of ten: the likes of =115= are perfectly valid—some typefaces will change to account for those finer increments.] Whereas every other face must have a value that is relative to the default, represented as a floating point (if you use an -integer, say, =15= then that means an absolute height). This is of -paramount importance: it ensures that all fonts can scale gracefully -when using something like the =text-scale-adjust= command which only -operates on the base font size (i.e. the =default= face's absolute -height). - -An alternative syntax for the =default= face, is to pass all typeface -parameters directly to a =font= property.[fn:: Has the benefit of -accepting =fontconfig= parameters (GNU/Linux), such as ="DejaVu Sans -Mono-11:hintstyle=hintslight:autohint=false"=. -https://www.freedesktop.org/software/fontconfig/fontconfig-user.html] -Note that here we use a standard point size: - -#+begin_src emacs-lisp -(set-face-attribute 'default nil :font "DejaVu Sans Mono-11") -#+end_src - -Again, remember to only ever specify an absolute height for the =default=. - -** Org user faces (DIY) -:PROPERTIES: -:DESCRIPTION: Extend styles for org-mode keywords and priorities -:CUSTOM_ID: h:89f0678d-c5c3-4a57-a526-668b2bb2d7ad -:END: - -Users of =org-mode= have the option to configure various keywords and +integer, then that means an absolute height). This is of paramount +importance: it ensures that all fonts can scale gracefully when using +something like the ~text-scale-adjust~ command which only operates on the +base font size (i.e. the ~default~ face's absolute height). + +** Custom Org user faces (DIY) +:properties: +:custom_id: h:89f0678d-c5c3-4a57-a526-668b2bb2d7ad +:end: +#+cindex: Org extra faces + +Users of ~org-mode~ have the option to configure various keywords and priority cookies to better match their workflow. User options are -=org-todo-keyword-faces= and =org-priority-faces=. +~org-todo-keyword-faces~ and ~org-priority-faces~. -As those are meant to be custom faces, it would be futile to have the -themes try to guess what each user would want to use, which keywords to -target, and so on. Instead, we can provide guidelines on how to -customize things to one's liking with the intent of retaining the -overall aesthetics of the theme. +As those are meant to be custom faces, it is futile to have the themes +guess what each user wants to use, which keywords to target, and so on. +Instead, we can provide guidelines on how to customize things to one's +liking with the intent of retaining the overall aesthetic of the themes. Please bear in mind that the end result of those is not controlled by -the active theme but by how Org maps faces to its constructs. Editing -those while =org-mode= is active requires =M-x org-mode-restart= for changes -to take effect. +the active Modus theme but by how Org maps faces to its constructs. +Editing those while ~org-mode~ is active requires re-initialization of the +mode with {{{kbd(M-x org-mode-restart)}}} for changes to take effect. Let us assume you wish to visually differentiate your keywords. You have something like this: @@ -1257,7 +1725,7 @@ ** Org user faces (DIY) You could then use a variant of the following to inherit from a face that uses the styles you want and also to preserve the properties -applied by the =org-todo= face: +applied by the ~org-todo~ face: #+begin_src emacs-lisp (setq org-todo-keyword-faces @@ -1267,10 +1735,10 @@ ** Org user faces (DIY) #+end_src This will refashion the keywords you specify, while letting the other -items in =org-todo-keywords= use their original styles (which are defined -in the =org-todo= and =org-done= faces). +items in ~org-todo-keywords~ use their original styles (which are defined +in the ~org-todo~ and ~org-done~ faces). -If you want back the defaults, try specifying just the =org-todo= face: +If you want back the defaults, try specifying just the ~org-todo~ face: #+begin_src emacs-lisp (setq org-todo-keyword-faces @@ -1282,7 +1750,7 @@ ** Org user faces (DIY) When you inherit from multiple faces, you need to quote the list as shown further above. The order is important: the last item is applied over the previous ones. If you do not want to blend multiple faces, you -do not need a quoted list. A pattern of =keyword . face= would suffice. +do not need a quoted list. A pattern of =keyword . face= will suffice. Both approaches can be used simultaneously, as illustrated in this configuration of the priority cookies: @@ -1295,29 +1763,182 @@ ** Org user faces (DIY) #+end_src To find all the faces that are loaded in your current Emacs session, use -=M-x list-faces-display=. Also try =M-x describe-variable= and then specify -the name of each of those Org variables demonstrated above. Their -documentation strings will offer you further guidance. +{{{kbd(M-x list-faces-display)}}}. Try {{{kbd(M-x describe-variable)}}} as well and +then specify the name of each of those Org variables demonstrated above. +Their documentation strings will offer you further guidance. + +Recall that the themes let you retrieve a color from their palette. Do +it if you plan to control face attributes. + +[[#h:1487c631-f4fe-490d-8d58-d72ffa3bd474][Custom face specs using the themes' palette]]. + +[[#h:02e25930-e71a-493d-828a-8907fc80f874][Check color combinations]]. + +** Measure color contrast (DIY) +:properties: +:custom_id: h:02e25930-e71a-493d-828a-8907fc80f874 +:end: +#+findex: modus-themes-contrast +#+findex: modus-themes-wcag-formula +#+cindex: Color contrast + +The themes provide the functions ~modus-themes-wcag-formula~ and +~modus-themes-contrast~. The former is a direct implementation of the +WCAG formula: . It +calculates the relative luminance of a color value that is expressed in +hexadecimal RGB notation. While the latter function is just a +convenient wrapper for comparing the relative luminance between two +colors. + +In practice, one needs to work only with ~modus-themes-contrast~. It +accepts two color values and returns their contrast ratio. Values range +from 1 to 21 (lowest to highest). The themes are designed to always be +equal or higher than 7 for each combination of background and foreground +that they use (this is the WCAG AAA standard---the most demanding of its +kind). + +A couple of examples (rounded numbers): -Furthermore, consider reading the "Notes for aspiring Emacs theme -developers", published on 2020-08-28 by me (Protesilaos Stavrou): -https://protesilaos.com/codelog/2020-08-28-notes-emacs-theme-devs/. +#+begin_src emacs-lisp +;; Pure white with pure green +(modus-themes-contrast "#ffffff" "#00ff00") +;; => 1.37 +;; That is an outright inaccessible combo + +;; Pure black with pure green +(modus-themes-contrast "#000000" "#00ff00") +;; => 15.3 +;; That is is a highly accessible combo +#+end_src + +It does not matter which color value comes first. The ratio is always +the same. + +If one does not wish to read all the decimal points, it is possible to +try something like this: + +#+begin_src emacs-lisp +(format "%0.2f" (modus-themes-contrast "#000000" "#00ff00")) +#+end_src + +While it is fine to perform such calculations on a case-by-case basis, +it is preferable to implement formulas and tables for more demanding +tasks. Such instruments are provided by ~org-mode~ or ~orgtbl-mode~, both +of which are built into Emacs. Below is such a table that derives the +contrast ratio of all colors in the first column (pure red, green, blue) +relative to the color specified in the first row of the second column +(pure white) and rounds the results: + +#+begin_example +| | #ffffff | +|---------+---------| +| #ff0000 | 4.00 | +| #00ff00 | 1.37 | +| #0000ff | 8.59 | +#+tblfm: $2='(modus-themes-contrast $1 @1$2);%0.2f +#+end_example + +To measure color contrast one needs to start from a known value. This +typically is the background. The Modus themes define an expanded +palette in large part because certain colors are only meant to be used +in combination with some others. Consult the source code for the +minutia and relevant commentary. + +Such knowledge may prove valuable while attempting to override some of +the themes' colors: [[#h:307d95dd-8dbd-4ece-a543-10ae86f155a6][Override colors]]. + +** Load theme depending on time of day +:properties: +:custom_id: h:1d1ef4b4-8600-4a09-993c-6de3af0ddd26 +:end: + +While we do provide ~modus-themes-toggle~ to manually switch between the +themes, users may also set up their system to perform such a task +automatically at sunrise and sunset. + +This can be accomplished by specifying the coordinates of one's location +using the built-in {{{file(solar.el)}}} and then configuring the =circadian= +package: + +#+begin_src emacs-lisp +(use-package solar ; built-in + :config + (setq calendar-latitude 35.17 + calendar-longitude 33.36)) + +(use-package circadian ; you need to install this + :ensure + :after solar + (setq circadian-themes '((:sunrise . modus-operandi) + (:sunset . modus-vivendi))) + (circadian-setup)) +#+end_src + +** A theme-agnostic hook for theme loading (DIY) +:properties: +:custom_id: h:86f6906b-f090-46cc-9816-1fe8aeb38776 +:end: + +The themes are designed with the intent to be useful to Emacs users of +varying skill levels, from beginners to experts. This means that we try +to make things easier by not expecting anyone reading this document to +be proficient in Emacs Lisp or programming in general. + +Such a case is with the use of the ~modus-themes-after-load-theme-hook~, +which runs after ~modus-themes-toggle~, ~modus-themes-load-operandi~, or +~modus-themes-load-vivendi~ is evaluated. We recommend using that hook +for advanced customizations, because (1) we know for sure that it is +available once the themes are loaded, and (2) anyone consulting this +manual, especially the sections on enabling and loading the themes, will +be in a good position to benefit from that hook. + +Advanced users who have a need to switch between the Modus themes and +other items will find that such a hook does not meet their requirements: +it only works with the Modus themes and only with the aforementioned +functions. + +A theme-agnostic setup can be configured thus: + +#+begin_src emacs-lisp +(defvar after-enable-theme-hook nil + "Normal hook run after enabling a theme.") + +(defun run-after-enable-theme-hook (&rest _args) + "Run `after-enable-theme-hook'." + (run-hooks 'after-enable-theme-hook)) + +(advice-add 'enable-theme :after #'run-after-enable-theme-hook) +#+end_src + +This creates the ~after-enable-theme-hook~ and makes it run after each +call to ~enable-theme~, which means that it will work for all themes and +also has the benefit that it does not depend on functions such as +~modus-themes-toggle~ and the others mentioned above. ~enable-theme~ is +called internally by ~load-theme~, so the hook works everywhere. + +Now this specific piece of Elisp may be simple for experienced users, +but it is not easy to read for newcomers, including the author of the +Modus themes for the first several months of their time as an Emacs +user. Hence our hesitation to recommend it as part of the standard +setup of the Modus themes (it is generally a good idea to understand +what the implications are of advising a function). * Face coverage -:PROPERTIES: -:CUSTOM_ID: h:a9c8f29d-7f72-4b54-b74b-ddefe15d6a19 -:END: +:properties: +:custom_id: h:a9c8f29d-7f72-4b54-b74b-ddefe15d6a19 +:end: -Modus Operandi and Modus Vivendi try to provide as close to full face -coverage as possible. This is necessary to ensure a consistently -accessible reading experience across all possible interfaces. +The Modus themes try to provide as close to full face coverage as +possible. This is necessary to ensure a consistently accessible reading +experience across all available interfaces. ** Full support for packages or face groups -:PROPERTIES: -:ALT_TITLE: Supported packages -:DESCRIPTION: Full list of covered face groups -:CUSTOM_ID: h:60ed4275-60d6-49f8-9287-9a64e54bea0e -:END: +:properties: +:alt_title: Supported packages +:description: Full list of covered face groups +:custom_id: h:60ed4275-60d6-49f8-9287-9a64e54bea0e +:end: +#+cindex: Explicitly supported packages This list will always be updated to reflect the current state of the project. The idea is to offer an overview of the known status of all @@ -1337,16 +1958,18 @@ ** Full support for packages or face groups + auto-dim-other-buffers + avy + awesome-tray ++ bbdb + binder + bm + bongo + boon -+ breakpoint (provided by the built-in =gdb-mi.el= library) ++ breakpoint (provided by the built-in {{{file(gdb-mi.el)}}} library) + buffer-expose + calendar and diary + calfw + centaur-tabs -+ change-log and log-view (such as =vc-print-log= and =vc-print-root-log=) ++ cfrs ++ change-log and log-view (such as ~vc-print-log~, ~vc-print-root-log~) + cider + circe + color-rg @@ -1355,6 +1978,7 @@ ** Full support for packages or face groups + company-posframe + compilation-mode + completions ++ consult + counsel* + counsel-css + counsel-notmuch @@ -1363,7 +1987,7 @@ ** Full support for packages or face groups + cperl-mode + csv-mode + ctrlf -+ custom (=M-x customize=) ++ custom (what you get with {{{kbd(M-x customize)}}}) + dap-mode + dashboard (emacs-dashboard) + deadgrep @@ -1381,8 +2005,11 @@ ** Full support for packages or face groups + dired-git-info + dired-narrow + dired-subtree ++ diredc + diredfl ++ diredp (dired+) + disk-usage ++ display-fill-column-indicator-mode + doom-modeline + dynamic-ruler + easy-jekyll @@ -1408,8 +2035,10 @@ ** Full support for packages or face groups + eshell-syntax-highlighting + evil* (evil-mode) + evil-goggles ++ evil-snipe + evil-visual-mark-mode + eww ++ exwm + eyebrowse + fancy-dabbrev + flycheck @@ -1443,7 +2072,7 @@ ** Full support for packages or face groups + helpful + highlight-blocks + highlight-defined -+ highlight-escape-sequences (=hes-mode=) ++ highlight-escape-sequences (~hes-mode~) + highlight-indentation + highlight-numbers + highlight-symbol @@ -1468,6 +2097,7 @@ ** Full support for packages or face groups + interaction-log + ioccur + isearch, occur, etc. ++ isl (isearch-light) + ivy* + ivy-posframe + jira (org-jira) @@ -1477,19 +2107,22 @@ ** Full support for packages or face groups + jupyter + kaocha-runner + keycast -+ line numbers (=display-line-numbers-mode= and global variant) ++ line numbers (~display-line-numbers-mode~ and global variant) + lsp-mode + lsp-ui ++ macrostep + magit + magit-imerge + make-mode + man ++ marginalia + markdown-mode -+ markup-faces (=adoc-mode=) ++ markup-faces (~adoc-mode~) + mentor + messages + minibuffer-line + minimap ++ mmm-mode + modeline + mood-line + moody @@ -1512,11 +2145,12 @@ ** Full support for packages or face groups + org-roam + org-superstar + org-table-sticky-header ++ org-tree-slide + org-treescope + origami + outline-mode + outline-minor-faces -+ package (=M-x list-packages=) ++ package (what you get with {{{kbd(M-x list-packages)}}}) + page-break-lines + paradox + paren-face @@ -1532,23 +2166,28 @@ ** Full support for packages or face groups + popup + powerline + powerline-evil ++ prism ([[#h:a94272e0-99da-4149-9e80-11a7e67a2cf2][Note for prism.el]]) + proced + prodigy ++ quick-peek + racket-mode + rainbow-blocks + rainbow-identifiers + rainbow-delimiters + rcirc -+ regexp-builder (also known as =re-builder=) ++ recursion-indicator ++ regexp-builder (also known as ~re-builder~) + rg (rg.el) + ripgrep + rmail + ruler-mode + sallet + selectrum ++ selectrum-prescient + semantic + sesman + shell-script-mode ++ shortdoc + show-paren-mode + shr + side-notes @@ -1557,9 +2196,11 @@ ** Full support for packages or face groups + smart-mode-line + smartparens + smerge ++ solaire + spaceline + speedbar + spell-fu ++ spray + stripes + suggest + switch-window @@ -1570,6 +2211,7 @@ ** Full support for packages or face groups + syslog-mode + table (built-in table.el) + telephone-line ++ terraform-mode + term + tomatinho + transient (pop-up windows such as Magit's) @@ -1580,7 +2222,7 @@ ** Full support for packages or face groups + typescript + undo-tree + vc (built-in mode line status for version control) -+ vc-annotate (=C-x v g=) ++ vc-annotate (the out put of {{{kbd(C-x v g)}}}) + vdiff + vimish-fold + visible-mark @@ -1608,67 +2250,234 @@ ** Full support for packages or face groups GNU Emacs distribution. ** Indirectly covered packages -:PROPERTIES: -:CUSTOM_ID: h:2cb359c7-3a84-4262-bab3-dcdc1d0034d7 -:END: +:properties: +:custom_id: h:2cb359c7-3a84-4262-bab3-dcdc1d0034d7 +:end: +#+cindex: Implicitly supported packages These do not require any extra styles because they are configured to inherit from some basic faces. Please confirm. + edit-indirect + evil-owl ++ fortran-mode ++ goggles + i3wm-config-mode + perl-mode + php-mode + rjsx-mode + swift-mode - -** Will NOT be supported -:PROPERTIES: -:CUSTOM_ID: h:6c6e8d94-6782-47fc-9eef-ad78671e9eea -:END: - -I have thus far identified a single package that does fit into the -overarching objective of this project: [[https://github.com/hlissner/emacs-solaire-mode][solaire]]. It basically tries to -cast a less intense background on the main file-visiting buffers, so -that secondary elements like sidebars can have the default (pure -white/black) background. - -I will only cover this package if it ever supports the inverse effect: -less intense colors (but still accessible) for ancillary interfaces -and the intended styles for the content you are actually working on. ++ tab-bar-echo-area * Notes for individual packages -:PROPERTIES: -:CUSTOM_ID: h:4c4d901a-84d7-4f20-bd99-0808c2b06eba -:END: +:properties: +:custom_id: h:4c4d901a-84d7-4f20-bd99-0808c2b06eba +:end: This section covers information that may be of interest to users of individual packages. +** Note for display-fill-column-indicator-mode +:properties: +:custom_id: h:2a602816-bc1b-45bf-9675-4cbbd7bf6cab +:end: + +While designing the style for ~display-fill-column-indicator-mode~, we +stayed close to the mode's defaults: to apply a subtle foreground color +to the ~fill-column-indicator~ face, which blends well with the rest of +theme and is consistent with the role of that mode. This is to not +upset the expectations of users. + +Nevertheless, ~display-fill-column-indicator-mode~ has some known +limitations pertaining to its choice of using typographic characters to +draw its indicator. What should be a continuous vertical line might +appear as a series of dashes in certain contexts or under specific +conditions: a non-default value for ~line-spacing~, scaled and/or +variable-pitch headings have been observed to cause this effect. + +Given that we cannot control such factors, it may be better for affected +users to deviate from the default style of the ~fill-column-indicator~ +face. Instead of setting a foreground color, one could use a background +and have the foreground be indistinguishable from it. For example: + +#+begin_src emacs-lisp +(modus-themes-with-colors + (custom-set-faces + `(fill-column-indicator ((,class :background ,bg-inactive + :foreground ,bg-inactive))))) +#+end_src + +[[#h:51ba3547-b8c8-40d6-ba5a-4586477fd4ae][Face specs at scale using the themes' palette]]. + +** Note for mmm-mode.el background colors +:properties: +:custom_id: h:99cf0d6c-e478-4e26-9932-3bf3427d13f6 +:end: + +The faces used by {{{file(mmm-mode.el)}}} are expected to have a colorful +background, while they should not touch any foreground value. The idea +is that they must not interfere with existing fontification. Those +background colors need to be distinct from each other, such as an +unambiguous red juxtaposed with a clear blue. + +While this design may be internally consistent with the raison d'être of +that library, it inevitably produces inaccessible color combinations. + +There are two competing goals at play: + +1. Legibility of the text, understood as the contrast ratio between the + background and the foreground. + +2. Semantic precision of each face which entails faithfulness to + color-coding of the underlying background. + +As the Modus themes are designed with the express purpose of conforming +with the first point, we have to forgo the apparent color-coding of the +background elements. Instead we use subtle colors that do not undermine +the legibility of the affected text while they still offer a sense of +added context. + +Users who might prefer to fall below the minimum 7:1 contrast ratio in +relative luminance (the accessibility target we conform with), can opt +to configure the relevant faces on their own. + +[[#h:51ba3547-b8c8-40d6-ba5a-4586477fd4ae][Face specs at scale using the themes' palette]]. + +This example uses more vivid background colors, though it comes at the +very high cost of degraded legibility. + +#+begin_src emacs-lisp +(modus-themes-with-colors + (custom-set-faces + `(mmm-cleanup-submode-face ((,class :background ,yellow-refine-bg))) + `(mmm-code-submode-face ((,class :background ,bg-active))) + `(mmm-comment-submode-face ((,class :background ,blue-refine-bg))) + `(mmm-declaration-submode-face ((,class :background ,cyan-refine-bg))) + `(mmm-default-submode-face ((,class :background ,bg-alt))) + `(mmm-init-submode-face ((,class :background ,magenta-refine-bg))) + `(mmm-output-submode-face ((,class :background ,red-refine-bg))) + `(mmm-special-submode-face ((,class :background ,green-refine-bg))))) +#+end_src + +** Note for prism.el +:properties: +:alt_title: Note for prism +:custom_id: h:a94272e0-99da-4149-9e80-11a7e67a2cf2 +:end: + +This package by Adam Porter, aka "alphapapa" or "github-alphapapa", +implements an alternative to the typical coloration of code. Instead of +highlighting the syntactic constructs, it applies color to different +levels of depth in the code structure. + +As {{{file(prism.el)}}} offers a broad range of customisations, we cannot +style it directly at the theme level: that would run contrary to the +spirit of the package. Instead, we may offer preset color schemes. +Those should offer a starting point for users to adapt to their needs. + +In the following code snippets, we employ the ~modus-themes-with-colors~ +macro: [[#h:51ba3547-b8c8-40d6-ba5a-4586477fd4ae][Face specs at scale using the themes' palette]]. + +These are the minimum recommended settings with 16 colors: + +#+begin_src emacs-lisp +(setq prism-num-faces 16) + +(prism-set-colors + :desaturations '(0) ; do not change---may lower the contrast ratio + :lightens '(0) ; same + :colors (modus-themes-with-colors + (list fg-main + magenta + cyan-alt-other + magenta-alt-other + blue + magenta-alt + cyan-alt + red-alt-other + green + fg-main + cyan + yellow + blue-alt + red-alt + green-alt-other + fg-special-warm))) +#+end_src + +With 8 colors: + +#+begin_src emacs-lisp +(setq prism-num-faces 8) + +(prism-set-colors + :desaturations '(0) ; do not change---may lower the contrast ratio + :lightens '(0) ; same + :colors (modus-themes-with-colors + (list fg-special-cold + magenta + magenta-alt-other + cyan-alt-other + fg-main + blue-alt + red-alt-other + cyan))) +#+end_src + +And this is with 4 colors, which produces results that are the closest +to the themes' default aesthetic: + +#+begin_src emacs-lisp +(setq prism-num-faces 4) + +(prism-set-colors + :desaturations '(0) ; do not change---may lower the contrast ratio + :lightens '(0) ; same + :colors (modus-themes-with-colors + (list fg-main + cyan-alt-other + magenta-alt-other + magenta))) +#+end_src + +If you need to apply desaturation and lightening, you can use what the +{{{file(prism.el)}}} documentation recommends, like this (adapting to the +examples with the 4, 8, 16 colors): + +#+begin_src emacs-lisp +(prism-set-colors + :desaturations (cl-loop for i from 0 below 16 collect (* i 2.5)) + :lightens (cl-loop for i from 0 below 16 collect (* i 2.5)) + :colors (modus-themes-with-colors + (list fg-main + cyan-alt-other + magenta-alt-other + magenta))) +#+end_src + ** Note on company-mode overlay pop-up -:PROPERTIES: -:CUSTOM_ID: h:20cef8c4-d11f-4053-8b2c-2872925780b1 -:END: +:properties: +:custom_id: h:20cef8c4-d11f-4053-8b2c-2872925780b1 +:end: -By default, the =company-mode= pop-up that lists completion candidates is +By default, the ~company-mode~ pop-up that lists completion candidates is drawn using an overlay. This creates alignment issues every time it is placed above a piece of text that has a different height than the default. The solution recommended by the project's maintainer is to use an -alternative front-end for drawing the pop-up which uses child frames +alternative front-end for drawing the pop-up which draws child frames instead of overlays.[fn:: https://github.com/company-mode/company-mode/issues/1010][fn:: https://github.com/tumashu/company-posframe/] ** Note for ERC escaped color sequences -:PROPERTIES: -:CUSTOM_ID: h:98bdf319-1e32-4469-8a01-771200fba65c -:END: +:properties: +:custom_id: h:98bdf319-1e32-4469-8a01-771200fba65c +:end: -The built-in IRC client =erc= has the ability to colorise any text using -escape sequences that start with =^C= (inserted with =C-q C-c=) and are +The built-in IRC client ~erc~ has the ability to colorise any text using +escape sequences that start with =^C= (inserted with {{{kbd(C-q C-c)}}}) and are followed by a number for the foreground and background.[fn:: This page explains the basics, though it is not specific to Emacs: https://www.mirc.com/colors.html] Possible numbers are 0-15, with the @@ -1681,13 +2490,13 @@ ** Note for ERC escaped color sequences erc-interpret-mirc-color t) #+end_src -As this allows users to make arbitrary combinations, it is impossible to -guarantee a consistently high contrast ratio. All we can we do is -provide guidance on the combinations that satisfy the accessibility -standard of the themes: +As this allows users the chance to make arbitrary combinations, it is +impossible to guarantee a consistently high contrast ratio. All we can +we do is provide guidance on the combinations that satisfy the +accessibility standard of the themes: + Modus Operandi :: Use foreground color 1 for all backgrounds from - 2-15. Like so: =C-q C-c1,N= where =N= is the background. + 2-15. Like so: {{{kbd(C-q C-c1,N)}}} where =N= is the background. + Modus Vivendi :: Use foreground color 0 for all backgrounds from 2-13. Use foreground =1= for backgrounds 14, 15. @@ -1696,35 +2505,38 @@ ** Note for ERC escaped color sequences together, if you must. ** Note for powerline or spaceline -:PROPERTIES: -:CUSTOM_ID: h:9130a8ba-d8e3-41be-a58b-3cb1eb7b6d17 -:END: +:properties: +:custom_id: h:9130a8ba-d8e3-41be-a58b-3cb1eb7b6d17 +:end: Both Powerline and Spaceline package users will likely need to use the -command =powerline-reset= whenever they make changes to their themes +command ~powerline-reset~ whenever they make changes to their themes and/or modeline setup. -** Note on shr colors -:PROPERTIES: -:CUSTOM_ID: h:4cc767dc-ffef-4c5c-9f10-82eb7b8921bf -:END: +** Note on SHR colors +:properties: +:custom_id: h:4cc767dc-ffef-4c5c-9f10-82eb7b8921bf +:end: -Emacs' HTML rendering mechanism (=shr=) may need explicit configuration to -respect the theme's colors instead of whatever specifications the -webpage provides. Consult =C-h v shr-use-colors=. +Emacs' HTML rendering library ({{{file(shr.el)}}}) may need explicit +configuration to respect the theme's colors instead of whatever +specifications the webpage provides. + +Consult {{{kbd(C-h v shr-use-colors)}}}. ** Note for Helm grep -:PROPERTIES: -:CUSTOM_ID: h:d28879a2-8e4b-4525-986e-14c0f873d229 -:END: +:properties: +:custom_id: h:d28879a2-8e4b-4525-986e-14c0f873d229 +:end: There is one face from the Helm package that is meant to highlight the matches of a grep or grep-like command (=ag= or =ripgrep=). It is -=helm-grep-match=. However, this face can only apply when the user does +~helm-grep-match~. However, this face can only apply when the user does not pass =--color=always= as a command-line option for their command. Here is the docstring for that face, which is defined in the -=helm-grep.el= library (view a library with =M-x find-library=). +{{{file(helm-grep.el)}}} library (you can always visit the source code with +{{{kbd(M-x find-library)}}}). #+begin_quote Face used to highlight grep matches. Have no effect when grep backend @@ -1734,23 +2546,23 @@ ** Note for Helm grep The user must either remove =--color= from the flags passed to the grep function, or explicitly use =--color=never= (or equivalent). Helm provides user-facing customization options for controlling the grep -function's parameters, such as =helm-grep-default-command= and -=helm-grep-git-grep-command=. +function's parameters, such as ~helm-grep-default-command~ and +~helm-grep-git-grep-command~. When =--color=always= is in effect, the grep output will use red text in bold letter forms to present the matching part in the list of candidates. That style still meets the contrast ratio target of >= 7:1 (accessibility standard WCAG AAA), because it draws the reference to ANSI color number 1 (red) from the already-supported array of -=ansi-color-names-vector=. +~ansi-color-names-vector~. ** Note on vc-annotate-background-mode -:PROPERTIES: -:CUSTOM_ID: h:5095cbd1-e17a-419c-93e8-951c186362a3 -:END: +:properties: +:custom_id: h:5095cbd1-e17a-419c-93e8-951c186362a3 +:end: -Due to the unique way =vc-annotate= (=C-x v g=) applies colors, support for -its background mode (=vc-annotate-background-mode=) is disabled at the +Due to the unique way ~vc-annotate~ ({{{kbd(C-x v g)}}}) applies colors, support +for its background mode (~vc-annotate-background-mode~) is disabled at the theme level. Normally, such a drastic measure should not belong in a theme: assuming @@ -1760,35 +2572,87 @@ ** Note on vc-annotate-background-mode If there actually is a way to avoid such a course of action, without prejudice to the accessibility standard of this project, then please -report as much or send patches (see [[#h:9c3cd842-14b7-44d7-84b2-a5c8bc3fc3b1][Contributing]]). +report as much or send patches ([[#h:9c3cd842-14b7-44d7-84b2-a5c8bc3fc3b1][Contributing]]). + +** Note on pdf-tools link hints +:properties: +:custom_id: h:2659d13e-b1a5-416c-9a89-7c3ce3a76574 +:end: + +Hints are drawn by [[https://imagemagick.org/][ImageMagick]], not Emacs, i.e., ImageMagick doesn't +know about the hint face unless you tell ImageMagick about it. By +default, only the foreground and background color attributes are +passed. The below snippet adds to those the various font attributes. As +it queries various faces, specifically ~pdf-links-read-link~ and the faces +it inherits, it needs to be added to your initialization file after +you've customized any faces. + +#+begin_src emacs-lisp +(use-package pdf-links + :config + (let ((spec + (apply #'append + (mapcar + (lambda (name) + (list name + (face-attribute 'pdf-links-read-link + name nil 'default))) + '(:family :width :weight :slant))))) + (setq pdf-links-read-link-convert-commands + `("-density" "96" + "-family" ,(plist-get spec :family) + "-stretch" ,(let* ((width (plist-get spec :width)) + (name (symbol-name width))) + (replace-regexp-in-string "-" "" + (capitalize name))) + "-weight" ,(pcase (plist-get spec :weight) + ('ultra-light "Thin") + ('extra-light "ExtraLight") + ('light "Light") + ('semi-bold "SemiBold") + ('bold "Bold") + ('extra-bold "ExtraBold") + ('ultra-bold "Black") + (_weight "Normal")) + "-style" ,(pcase (plist-get spec :slant) + ('italic "Italic") + ('oblique "Oblique") + (_slant "Normal")) + "-pointsize" "%P" + "-undercolor" "%f" + "-fill" "%b" + "-draw" "text %X,%Y '%c'")))) +#+end_src * Contributing -:PROPERTIES: -:CUSTOM_ID: h:9c3cd842-14b7-44d7-84b2-a5c8bc3fc3b1 -:END: +:properties: +:custom_id: h:9c3cd842-14b7-44d7-84b2-a5c8bc3fc3b1 +:end: This section documents the canonical sources of the themes and the ways in which you can contribute to their ongoing development. ** Sources of the themes -:PROPERTIES: -:CUSTOM_ID: h:89504f1c-c9a1-4bd9-ab39-78fd0eddb47c -:END: +:properties: +:custom_id: h:89504f1c-c9a1-4bd9-ab39-78fd0eddb47c +:end: +#+cindex: Sources of the themes -The =modus-operandi= and =modus-vivendi= themes are built into Emacs. -Currently they are in the project's =master= branch, which is tracking the -next development release target. +The ~modus-operandi~ and ~modus-vivendi~ themes are built into Emacs. +Currently they are in Emacs' git main branch (trunk), which is tracking +the next development release target. The source code of the themes is [[https://gitlab.com/protesilaos/modus-themes/][available on Gitlab]], for the time being. A [[https://github.com/protesilaos/modus-themes/][mirror on Github]] is also on offer. -An HTML version of this manual is available as an extension to the +An HTML version of this manual is provided as an extension of the [[https://protesilaos.com/modus-themes/][author's personal website]] (does not rely on any non-free code). ** Issues you can help with -:PROPERTIES: -:CUSTOM_ID: h:6536c8d5-3f98-43ab-a787-b94120e735e8 -:END: +:properties: +:custom_id: h:6536c8d5-3f98-43ab-a787-b94120e735e8 +:end: +#+cindex: Contributing A few tasks you can help with: @@ -1802,8 +2666,8 @@ ** Issues you can help with [[#h:111773e2-f26f-4b68-8c4f-9794ca6b9633][Patches require copyright assignment to the FSF]]. -It would be great if your feedback also includes some screenshots, GIFs, -or short videos, as well as further instructions to reproduce a given +It is preferable that your feedback includes some screenshots, GIFs, or +short videos, as well as further instructions to reproduce a given setup. Though this is not a requirement. Whatever you do, bear in mind the overarching objective of the Modus @@ -1813,11 +2677,9 @@ ** Issues you can help with interest of the latter. ** Patches require copyright assignment to the FSF -:PROPERTIES: -:ALT_TITLE: Merge requests -:DESCRIPTION: Legal considerations for code patches -:CUSTOM_ID: h:111773e2-f26f-4b68-8c4f-9794ca6b9633 -:END: +:properties: +:custom_id: h:111773e2-f26f-4b68-8c4f-9794ca6b9633 +:end: Code contributions are most welcome. For any major edit (more than 15 lines, or so, in aggregate per person), you need to make a copyright @@ -1875,48 +2737,58 @@ ** Patches require copyright assignment to the FSF [Which files have you changed so far, and which new files have you written so far?] -Changed a couple of themes that are part of the Emacs source code: - -./etc/themes/modus-operandi-theme.el -./etc/themes/modus-vivendi-theme.el #+end_example * Acknowledgements -:PROPERTIES: -:CUSTOM_ID: h:95c3da23-217f-404e-b5f3-56c75760ebcf -:END: +:properties: +:custom_id: h:95c3da23-217f-404e-b5f3-56c75760ebcf +:end: +#+cindex: Contributors -The Modus themes are a collective effort. Every contribution counts. +The Modus themes are a collective effort. Every bit of work matters. + Author/maintainer :: Protesilaos Stavrou. + Contributions to code or documentation :: Anders Johansson, Basil - L. Contovounesios, Eli Zaretskii, Madhavan Krishnan, Markus Beppler, - Matthew Stevenson, Shreyas Ragavan, Stefan Kangas, Vincent Murphy. - -+ Ideas and user feedback :: Aaron Jensen, Adam Spiers, Alex Griffin, - Alex Peitsinis, Alexey Shmalko, Anders Johansson, André Alexandre - Gomes, Arif Rezai, Basil L. Contovounesios, Damien Cassou, Dario - Gjorgjevski, David Edmondson, Davor Rotim, Divan Santana, Gerry - Agbobada, Gianluca Recchia, Ilja Kocken, Iris Garcia, Len Trigg, - Manuel Uberti, Mark Burton, Markus Beppler, Michael Goldenberg, Murilo - Pereira, Nicolas De Jaeghere, Paul Poloskov, Pierre Téchoueyres, Roman - Rudakov, Ryan Phillips, Shreyas Ragavan, Simon Pugnet, Tassilo Horn, - Thibaut Verron, Trey Merkley, Togan Muftuoglu, Uri Sharf, Utkarsh - Singh, Vincent Foley. As well as users: Ben, Eugene, Fourchaux, - Fredrik, Moesasji, Nick, TheBlob42, bepolymathe, dinko, doolio, - jixiuf, okamsn, tycho garen. - -+ Packaging :: Dhavan Vaidya (Debian), Stefan Kangas (core Emacs), - Stefan Monnier (GNU Elpa). + L.{{{space()}}} Contovounesios, Carlo Zancanaro, Eli Zaretskii, Kostadin + Ninev, Madhavan Krishnan, Markus Beppler, Matthew Stevenson, Nicolas + De Jaeghere, Shreyas Ragavan, Stefan Kangas, Vincent Murphy, Xinglu + Chen. + ++ Ideas and user feedback :: Aaron Jensen, Adam Spiers, Adrian Manea, + Alex Griffin, Alex Peitsinis, Alexey Shmalko, Alok Singh, Anders + Johansson, André Alexandre Gomes, Arif Rezai, Basil L.{{{space()}}} + Contovounesios, Burgess Chang, Christian Tietze, Christopher Dimech, + Damien Cassou, Daniel Mendler, Dario Gjorgjevski, David Edmondson, + Davor Rotim, Divan Santana, Gerry Agbobada, Gianluca Recchia, Gustavo + Barros, Hörmetjan Yiltiz, Ilja Kocken, Iris Garcia, Jeremy Friesen, + John Haman, Joshua O'Connor, Kevin Fleming, Kostadin Ninev, Len Trigg, + Manuel Uberti, Mark Burton, Markus Beppler, Michael Goldenberg, Morgan + Smith, Murilo Pereira, Nicolas De Jaeghere, Paul Poloskov, Pete + Kazmier, Peter Wu, Philip K., Pierre Téchoueyres, Roman Rudakov, Ryan + Phillips, Sam Kleinman, Shreyas Ragavan, Simon Pugnet, Tassilo Horn, + Thibaut Verron, Trey Merkley, Togan Muftuoglu, Toon Claes, Uri Sharf, + Utkarsh Singh, Vincent Foley. As well as users: Ben, CsBigDataHub1, + Emacs Contrib, Eugene, Fourchaux, Fredrik, Moesasji, Nick, TheBlob42, + bepolymathe, doolio, fleimgruber, iSeeU, jixiuf, okamsn. + ++ Packaging :: Basil L.{{{space()}}} Contovounesios, Eli Zaretskii, Glenn + Morris, Mauro Aranda, Richard Stallman, Stefan Kangas (core Emacs), + Stefan Monnier (GNU Elpa), André Alexandre Gomes, Dimakakos Dimos, + Morgan Smith, Nicolas Goaziou (Guix), Dhavan Vaidya (Debian). + Inspiration for certain features :: Bozhidar Batsov (zenburn-theme), Fabrice Niessen (leuven-theme). +Special thanks, in no particular order, to Manuel Uberti and Omar +Antolín Camarena for their long time contributions and insightful +commentary. + * Meta -:PROPERTIES: -:CUSTOM_ID: h:13752581-4378-478c-af17-165b6e76bc1b -:END: +:properties: +:custom_id: h:13752581-4378-478c-af17-165b6e76bc1b +:end: +#+cindex: Development notes If you are curious about the principles that govern the development of this project read the essay [[https://protesilaos.com/codelog/2020-03-17-design-modus-themes-emacs/][On the design of the Modus themes]] @@ -1931,32 +2803,501 @@ * Meta + [[https://protesilaos.com/codelog/2020-07-04-modus-themes-faint-colours/][Modus themes: new "faint syntax" option]] (2020-07-04) + [[https://protesilaos.com/codelog/2020-07-08-modus-themes-nuanced-colours/][Modus themes: major review of "nuanced" colours]] (2020-07-08) + [[https://protesilaos.com/codelog/2020-09-14-modus-themes-review-blues/][Modus themes: review of blue colours]] (2020-09-14) ++ [[https://protesilaos.com/codelog/2020-12-27-modus-themes-review-rainbow-delimiters/][Modus themes: review rainbow-delimiters faces]] (2020-12-27) ++ [[https://protesilaos.com/codelog/2021-01-11-modus-themes-review-select-faint-colours/][Modus themes: review of select "faint" colours]] (2021-01-11) ++ [[https://protesilaos.com/codelog/2021-02-25-modus-themes-diffs-deuteranopia/][The Modus themes now cover deuteranopia in diffs]] (2021-02-25) -And here are the canonical sources for this project's documentation: +And here are the canonical sources of this project's documentation: + Manual :: + Change Log :: + Screenshots :: -* External projects (ports) -:PROPERTIES: -:CUSTOM_ID: h:21adb7c8-2208-41e8-803c-052e42e2c05d -:END: - -The present section documents projects that extend the scope of the -Modus themes. The following list will be updated whenever relevant -information is brought to my attention. If you already have or intend -to produce such a port, feel welcome [[https://protesilaos.com/contact][to contact me]]. - -+ Modus exporter :: This is [[https://github.com/polaris64/modus-exporter][an Elisp library written by Simon Pugnet]]. - Licensed under the terms of the GNU General Public License. It is - meant to capture the color values of the active Modus theme (Operandi - or Vivendi) and output it as a valid theme for some other application. - * GNU Free Documentation License -:PROPERTIES: -:APPENDIX: t -:CUSTOM_ID: h:3077c3d2-7f90-4228-8f0a-73124f4026f6 -:END: +:properties: +:appendix: t +:custom_id: h:3077c3d2-7f90-4228-8f0a-73124f4026f6 +:end: #+texinfo: @include doclicense.texi + +#+begin_export html + + GNU Free Documentation License + Version 1.3, 3 November 2008 + + + Copyright (C) 2000, 2001, 2002, 2007, 2008 Free Software Foundation, Inc. + + Everyone is permitted to copy and distribute verbatim copies + of this license document, but changing it is not allowed. + +0. PREAMBLE + +The purpose of this License is to make a manual, textbook, or other +functional and useful document "free" in the sense of freedom: to +assure everyone the effective freedom to copy and redistribute it, +with or without modifying it, either commercially or noncommercially. +Secondarily, this License preserves for the author and publisher a way +to get credit for their work, while not being considered responsible +for modifications made by others. + +This License is a kind of "copyleft", which means that derivative +works of the document must themselves be free in the same sense. It +complements the GNU General Public License, which is a copyleft +license designed for free software. + +We have designed this License in order to use it for manuals for free +software, because free software needs free documentation: a free +program should come with manuals providing the same freedoms that the +software does. But this License is not limited to software manuals; +it can be used for any textual work, regardless of subject matter or +whether it is published as a printed book. We recommend this License +principally for works whose purpose is instruction or reference. + + +1. APPLICABILITY AND DEFINITIONS + +This License applies to any manual or other work, in any medium, that +contains a notice placed by the copyright holder saying it can be +distributed under the terms of this License. Such a notice grants a +world-wide, royalty-free license, unlimited in duration, to use that +work under the conditions stated herein. The "Document", below, +refers to any such manual or work. Any member of the public is a +licensee, and is addressed as "you". You accept the license if you +copy, modify or distribute the work in a way requiring permission +under copyright law. + +A "Modified Version" of the Document means any work containing the +Document or a portion of it, either copied verbatim, or with +modifications and/or translated into another language. + +A "Secondary Section" is a named appendix or a front-matter section of +the Document that deals exclusively with the relationship of the +publishers or authors of the Document to the Document's overall +subject (or to related matters) and contains nothing that could fall +directly within that overall subject. (Thus, if the Document is in +part a textbook of mathematics, a Secondary Section may not explain +any mathematics.) The relationship could be a matter of historical +connection with the subject or with related matters, or of legal, +commercial, philosophical, ethical or political position regarding +them. + +The "Invariant Sections" are certain Secondary Sections whose titles +are designated, as being those of Invariant Sections, in the notice +that says that the Document is released under this License. If a +section does not fit the above definition of Secondary then it is not +allowed to be designated as Invariant. The Document may contain zero +Invariant Sections. If the Document does not identify any Invariant +Sections then there are none. + +The "Cover Texts" are certain short passages of text that are listed, +as Front-Cover Texts or Back-Cover Texts, in the notice that says that +the Document is released under this License. A Front-Cover Text may +be at most 5 words, and a Back-Cover Text may be at most 25 words. + +A "Transparent" copy of the Document means a machine-readable copy, +represented in a format whose specification is available to the +general public, that is suitable for revising the document +straightforwardly with generic text editors or (for images composed of +pixels) generic paint programs or (for drawings) some widely available +drawing editor, and that is suitable for input to text formatters or +for automatic translation to a variety of formats suitable for input +to text formatters. A copy made in an otherwise Transparent file +format whose markup, or absence of markup, has been arranged to thwart +or discourage subsequent modification by readers is not Transparent. +An image format is not Transparent if used for any substantial amount +of text. A copy that is not "Transparent" is called "Opaque". + +Examples of suitable formats for Transparent copies include plain +ASCII without markup, Texinfo input format, LaTeX input format, SGML +or XML using a publicly available DTD, and standard-conforming simple +HTML, PostScript or PDF designed for human modification. Examples of +transparent image formats include PNG, XCF and JPG. Opaque formats +include proprietary formats that can be read and edited only by +proprietary word processors, SGML or XML for which the DTD and/or +processing tools are not generally available, and the +machine-generated HTML, PostScript or PDF produced by some word +processors for output purposes only. + +The "Title Page" means, for a printed book, the title page itself, +plus such following pages as are needed to hold, legibly, the material +this License requires to appear in the title page. For works in +formats which do not have any title page as such, "Title Page" means +the text near the most prominent appearance of the work's title, +preceding the beginning of the body of the text. + +The "publisher" means any person or entity that distributes copies of +the Document to the public. + +A section "Entitled XYZ" means a named subunit of the Document whose +title either is precisely XYZ or contains XYZ in parentheses following +text that translates XYZ in another language. (Here XYZ stands for a +specific section name mentioned below, such as "Acknowledgements", +"Dedications", "Endorsements", or "History".) To "Preserve the Title" +of such a section when you modify the Document means that it remains a +section "Entitled XYZ" according to this definition. + +The Document may include Warranty Disclaimers next to the notice which +states that this License applies to the Document. These Warranty +Disclaimers are considered to be included by reference in this +License, but only as regards disclaiming warranties: any other +implication that these Warranty Disclaimers may have is void and has +no effect on the meaning of this License. + +2. VERBATIM COPYING + +You may copy and distribute the Document in any medium, either +commercially or noncommercially, provided that this License, the +copyright notices, and the license notice saying this License applies +to the Document are reproduced in all copies, and that you add no +other conditions whatsoever to those of this License. You may not use +technical measures to obstruct or control the reading or further +copying of the copies you make or distribute. However, you may accept +compensation in exchange for copies. If you distribute a large enough +number of copies you must also follow the conditions in section 3. + +You may also lend copies, under the same conditions stated above, and +you may publicly display copies. + + +3. COPYING IN QUANTITY + +If you publish printed copies (or copies in media that commonly have +printed covers) of the Document, numbering more than 100, and the +Document's license notice requires Cover Texts, you must enclose the +copies in covers that carry, clearly and legibly, all these Cover +Texts: Front-Cover Texts on the front cover, and Back-Cover Texts on +the back cover. Both covers must also clearly and legibly identify +you as the publisher of these copies. The front cover must present +the full title with all words of the title equally prominent and +visible. You may add other material on the covers in addition. +Copying with changes limited to the covers, as long as they preserve +the title of the Document and satisfy these conditions, can be treated +as verbatim copying in other respects. + +If the required texts for either cover are too voluminous to fit +legibly, you should put the first ones listed (as many as fit +reasonably) on the actual cover, and continue the rest onto adjacent +pages. + +If you publish or distribute Opaque copies of the Document numbering +more than 100, you must either include a machine-readable Transparent +copy along with each Opaque copy, or state in or with each Opaque copy +a computer-network location from which the general network-using +public has access to download using public-standard network protocols +a complete Transparent copy of the Document, free of added material. +If you use the latter option, you must take reasonably prudent steps, +when you begin distribution of Opaque copies in quantity, to ensure +that this Transparent copy will remain thus accessible at the stated +location until at least one year after the last time you distribute an +Opaque copy (directly or through your agents or retailers) of that +edition to the public. + +It is requested, but not required, that you contact the authors of the +Document well before redistributing any large number of copies, to +give them a chance to provide you with an updated version of the +Document. + + +4. MODIFICATIONS + +You may copy and distribute a Modified Version of the Document under +the conditions of sections 2 and 3 above, provided that you release +the Modified Version under precisely this License, with the Modified +Version filling the role of the Document, thus licensing distribution +and modification of the Modified Version to whoever possesses a copy +of it. In addition, you must do these things in the Modified Version: + +A. Use in the Title Page (and on the covers, if any) a title distinct + from that of the Document, and from those of previous versions + (which should, if there were any, be listed in the History section + of the Document). You may use the same title as a previous version + if the original publisher of that version gives permission. +B. List on the Title Page, as authors, one or more persons or entities + responsible for authorship of the modifications in the Modified + Version, together with at least five of the principal authors of the + Document (all of its principal authors, if it has fewer than five), + unless they release you from this requirement. +C. State on the Title page the name of the publisher of the + Modified Version, as the publisher. +D. Preserve all the copyright notices of the Document. +E. Add an appropriate copyright notice for your modifications + adjacent to the other copyright notices. +F. Include, immediately after the copyright notices, a license notice + giving the public permission to use the Modified Version under the + terms of this License, in the form shown in the Addendum below. +G. Preserve in that license notice the full lists of Invariant Sections + and required Cover Texts given in the Document's license notice. +H. Include an unaltered copy of this License. +I. Preserve the section Entitled "History", Preserve its Title, and add + to it an item stating at least the title, year, new authors, and + publisher of the Modified Version as given on the Title Page. If + there is no section Entitled "History" in the Document, create one + stating the title, year, authors, and publisher of the Document as + given on its Title Page, then add an item describing the Modified + Version as stated in the previous sentence. +J. Preserve the network location, if any, given in the Document for + public access to a Transparent copy of the Document, and likewise + the network locations given in the Document for previous versions + it was based on. These may be placed in the "History" section. + You may omit a network location for a work that was published at + least four years before the Document itself, or if the original + publisher of the version it refers to gives permission. +K. For any section Entitled "Acknowledgements" or "Dedications", + Preserve the Title of the section, and preserve in the section all + the substance and tone of each of the contributor acknowledgements + and/or dedications given therein. +L. Preserve all the Invariant Sections of the Document, + unaltered in their text and in their titles. Section numbers + or the equivalent are not considered part of the section titles. +M. Delete any section Entitled "Endorsements". Such a section + may not be included in the Modified Version. +N. Do not retitle any existing section to be Entitled "Endorsements" + or to conflict in title with any Invariant Section. +O. Preserve any Warranty Disclaimers. + +If the Modified Version includes new front-matter sections or +appendices that qualify as Secondary Sections and contain no material +copied from the Document, you may at your option designate some or all +of these sections as invariant. To do this, add their titles to the +list of Invariant Sections in the Modified Version's license notice. +These titles must be distinct from any other section titles. + +You may add a section Entitled "Endorsements", provided it contains +nothing but endorsements of your Modified Version by various +parties--for example, statements of peer review or that the text has +been approved by an organization as the authoritative definition of a +standard. + +You may add a passage of up to five words as a Front-Cover Text, and a +passage of up to 25 words as a Back-Cover Text, to the end of the list +of Cover Texts in the Modified Version. Only one passage of +Front-Cover Text and one of Back-Cover Text may be added by (or +through arrangements made by) any one entity. If the Document already +includes a cover text for the same cover, previously added by you or +by arrangement made by the same entity you are acting on behalf of, +you may not add another; but you may replace the old one, on explicit +permission from the previous publisher that added the old one. + +The author(s) and publisher(s) of the Document do not by this License +give permission to use their names for publicity for or to assert or +imply endorsement of any Modified Version. + + +5. COMBINING DOCUMENTS + +You may combine the Document with other documents released under this +License, under the terms defined in section 4 above for modified +versions, provided that you include in the combination all of the +Invariant Sections of all of the original documents, unmodified, and +list them all as Invariant Sections of your combined work in its +license notice, and that you preserve all their Warranty Disclaimers. + +The combined work need only contain one copy of this License, and +multiple identical Invariant Sections may be replaced with a single +copy. If there are multiple Invariant Sections with the same name but +different contents, make the title of each such section unique by +adding at the end of it, in parentheses, the name of the original +author or publisher of that section if known, or else a unique number. +Make the same adjustment to the section titles in the list of +Invariant Sections in the license notice of the combined work. + +In the combination, you must combine any sections Entitled "History" +in the various original documents, forming one section Entitled +"History"; likewise combine any sections Entitled "Acknowledgements", +and any sections Entitled "Dedications". You must delete all sections +Entitled "Endorsements". + + +6. COLLECTIONS OF DOCUMENTS + +You may make a collection consisting of the Document and other +documents released under this License, and replace the individual +copies of this License in the various documents with a single copy +that is included in the collection, provided that you follow the rules +of this License for verbatim copying of each of the documents in all +other respects. + +You may extract a single document from such a collection, and +distribute it individually under this License, provided you insert a +copy of this License into the extracted document, and follow this +License in all other respects regarding verbatim copying of that +document. + + +7. AGGREGATION WITH INDEPENDENT WORKS + +A compilation of the Document or its derivatives with other separate +and independent documents or works, in or on a volume of a storage or +distribution medium, is called an "aggregate" if the copyright +resulting from the compilation is not used to limit the legal rights +of the compilation's users beyond what the individual works permit. +When the Document is included in an aggregate, this License does not +apply to the other works in the aggregate which are not themselves +derivative works of the Document. + +If the Cover Text requirement of section 3 is applicable to these +copies of the Document, then if the Document is less than one half of +the entire aggregate, the Document's Cover Texts may be placed on +covers that bracket the Document within the aggregate, or the +electronic equivalent of covers if the Document is in electronic form. +Otherwise they must appear on printed covers that bracket the whole +aggregate. + + +8. TRANSLATION + +Translation is considered a kind of modification, so you may +distribute translations of the Document under the terms of section 4. +Replacing Invariant Sections with translations requires special +permission from their copyright holders, but you may include +translations of some or all Invariant Sections in addition to the +original versions of these Invariant Sections. You may include a +translation of this License, and all the license notices in the +Document, and any Warranty Disclaimers, provided that you also include +the original English version of this License and the original versions +of those notices and disclaimers. In case of a disagreement between +the translation and the original version of this License or a notice +or disclaimer, the original version will prevail. + +If a section in the Document is Entitled "Acknowledgements", +"Dedications", or "History", the requirement (section 4) to Preserve +its Title (section 1) will typically require changing the actual +title. + + +9. TERMINATION + +You may not copy, modify, sublicense, or distribute the Document +except as expressly provided under this License. Any attempt +otherwise to copy, modify, sublicense, or distribute it is void, and +will automatically terminate your rights under this License. + +However, if you cease all violation of this License, then your license +from a particular copyright holder is reinstated (a) provisionally, +unless and until the copyright holder explicitly and finally +terminates your license, and (b) permanently, if the copyright holder +fails to notify you of the violation by some reasonable means prior to +60 days after the cessation. + +Moreover, your license from a particular copyright holder is +reinstated permanently if the copyright holder notifies you of the +violation by some reasonable means, this is the first time you have +received notice of violation of this License (for any work) from that +copyright holder, and you cure the violation prior to 30 days after +your receipt of the notice. + +Termination of your rights under this section does not terminate the +licenses of parties who have received copies or rights from you under +this License. If your rights have been terminated and not permanently +reinstated, receipt of a copy of some or all of the same material does +not give you any rights to use it. + + +10. FUTURE REVISIONS OF THIS LICENSE + +The Free Software Foundation may publish new, revised versions of the +GNU Free Documentation License from time to time. Such new versions +will be similar in spirit to the present version, but may differ in +detail to address new problems or concerns. See +https://www.gnu.org/licenses/. + +Each version of the License is given a distinguishing version number. +If the Document specifies that a particular numbered version of this +License "or any later version" applies to it, you have the option of +following the terms and conditions either of that specified version or +of any later version that has been published (not as a draft) by the +Free Software Foundation. If the Document does not specify a version +number of this License, you may choose any version ever published (not +as a draft) by the Free Software Foundation. If the Document +specifies that a proxy can decide which future versions of this +License can be used, that proxy's public statement of acceptance of a +version permanently authorizes you to choose that version for the +Document. + +11. RELICENSING + +"Massive Multiauthor Collaboration Site" (or "MMC Site") means any +World Wide Web server that publishes copyrightable works and also +provides prominent facilities for anybody to edit those works. A +public wiki that anybody can edit is an example of such a server. A +"Massive Multiauthor Collaboration" (or "MMC") contained in the site +means any set of copyrightable works thus published on the MMC site. + +"CC-BY-SA" means the Creative Commons Attribution-Share Alike 3.0 +license published by Creative Commons Corporation, a not-for-profit +corporation with a principal place of business in San Francisco, +California, as well as future copyleft versions of that license +published by that same organization. + +"Incorporate" means to publish or republish a Document, in whole or in +part, as part of another Document. + +An MMC is "eligible for relicensing" if it is licensed under this +License, and if all works that were first published under this License +somewhere other than this MMC, and subsequently incorporated in whole or +in part into the MMC, (1) had no cover texts or invariant sections, and +(2) were thus incorporated prior to November 1, 2008. + +The operator of an MMC Site may republish an MMC contained in the site +under CC-BY-SA on the same site at any time before August 1, 2009, +provided the MMC is eligible for relicensing. + + +ADDENDUM: How to use this License for your documents + +To use this License in a document you have written, include a copy of +the License in the document and put the following copyright and +license notices just after the title page: + + Copyright (c) YEAR YOUR NAME. + Permission is granted to copy, distribute and/or modify this document + under the terms of the GNU Free Documentation License, Version 1.3 + or any later version published by the Free Software Foundation; + with no Invariant Sections, no Front-Cover Texts, and no Back-Cover Texts. + A copy of the license is included in the section entitled "GNU + Free Documentation License". + +If you have Invariant Sections, Front-Cover Texts and Back-Cover Texts, +replace the "with...Texts." line with this: + + with the Invariant Sections being LIST THEIR TITLES, with the + Front-Cover Texts being LIST, and with the Back-Cover Texts being LIST. + +If you have Invariant Sections without Cover Texts, or some other +combination of the three, merge those two alternatives to suit the +situation. + +If your document contains nontrivial examples of program code, we +recommend releasing these examples in parallel under your choice of +free software license, such as the GNU General Public License, +to permit their use in free software. +#+end_export + +#+html: diff --git a/etc/themes/modus-operandi-theme.el b/etc/themes/modus-operandi-theme.el index 346000a093..ce2c75e9a8 100644 --- a/etc/themes/modus-operandi-theme.el +++ b/etc/themes/modus-operandi-theme.el @@ -1,4666 +1,66 @@ ;;; modus-operandi-theme.el --- Accessible light theme (WCAG AAA) -*- lexical-binding:t -*- -;; Copyright (C) 2019-2021 Free Software Foundation, Inc. +;; Copyright (C) 2019-2021 Free Software Foundation, Inc. ;; Author: Protesilaos Stavrou ;; URL: https://gitlab.com/protesilaos/modus-themes -;; Version: 0.13.0 +;; Version: 1.2.0 ;; Package-Requires: ((emacs "26.1")) ;; Keywords: faces, theme, accessibility ;; This file is part of GNU Emacs. -;; GNU Emacs is free software: you can redistribute it and/or modify +;; This program is free software; you can redistribute it and/or modify ;; 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. - -;; GNU Emacs 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. - +;; 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 GNU Emacs. If not, see . +;; along with this program. If not, see . ;;; Commentary: ;; -;; This theme is designed for colour-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). +;; Modus Operandi is the light variant of the Modus themes (Modus +;; Vivendi is the dark one). The themes are designed for color-contrast +;; accessibility. More specifically: ;; -;; 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. +;; 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). ;; -;; The theme provides the following customisation options, all of which -;; are disabled by default: +;; 2. Offer as close to full face coverage as possible. The list is +;; already quite long, with more additions to follow as part of the +;; ongoing development process. ;; -;; 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-no-link-underline (boolean) -;; modus-operandi-theme-completions (choice) -;; modus-operandi-theme-override-colors-alist (alist) +;; For a complete view of the project, also refer to the following files +;; (should be distributed in the same repository/directory as the +;; current item): ;; -;; The default scale is as follows (it can be customised 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 -;; 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 +;; - modus-themes.el (Main code shared between the themes) +;; - modus-vivendi-theme.el (Dark theme) ;;; Code: -(deftheme modus-operandi - "Light theme that conforms with the highest accessibility - standard for colour 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 colour 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) - -;;; Customisation options - -;; User-facing customisation 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 colours 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 colour 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 colourful 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 - colourful 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 - colourful 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 colourful 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 colourful 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 colourful 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 colour. Option `subtle' -will apply a greyscale value that is visible yet close to the -main buffer background colour. 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 colour-coded backgrounds for `org-mode' source blocks. -The colour in use depends on the language (send feedback to -include more languages)." - :type 'boolean) - -(defcustom modus-operandi-theme-org-blocks nil - "Use a subtle grey or colour-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 `greyscale' will apply a subtle neutral grey 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 -recognised by `set-face-attribute'. - -Option `rainbow' will use an accented background for the contents -of the block. The exact colour 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 grey block background" greyscale) - (const :tag "Colour-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 optimise 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 colour 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 colours to -remain distinct. - -A `desaturated' value follows the same principles as with the nil -option, while it tones down all relevant colours. - -Option `fg-only' will remove all accented backgrounds, except -from word-wise changes. It instead uses colour-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 coloured 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 -colours to style their matches, whereas Ivy or Helm rely on an -aesthetic that combines coloured backgrounds with appropriate -text colour. - -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 colours for -applicable contexts. - -Option `opinionated' will apply colour 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 colour. - -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 more prominent background for command `hl-line-mode'." - :type 'boolean) - -(defcustom modus-operandi-theme-intense-paren-match nil - "Use more prominent colour for parenthesis matching." - :type 'boolean) - -(defcustom modus-operandi-theme-faint-syntax nil - "Use less saturated colours for code syntax highlighting." - :type 'boolean) - -(defcustom modus-operandi-theme-no-link-underline nil - "Do not underline links." - :type 'boolean) - -;;; Internal functions - -;; Helper functions that are meant to ease the implementation of the -;; above customisation 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-fringe (subtlebg intensebg) - "Conditional use of background colours for fringes. -SUBTLEBG should be a subtle greyscale value. INTENSEBG must be a -more pronounced greyscale colour." - (pcase modus-operandi-theme-fringes - ('intense (list :background intensebg)) - ('subtle (list :background subtlebg)) - (_ (list :background nil)))) - -(defun modus-operandi-theme-prompt (mainfg subtlebg subtlefg intensebg intensefg) - "Conditional use of background colours 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 colour 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 colours for matching parentheses. -NORMALBG should the special palette colour 'bg-paren-match' or -something similar. INTENSEBG must be easier to discern next to -other backgrounds, such as the special palette colour -'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 colour, which should be the default. -FAINT is the less saturated colour." - (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 colour. 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 colour 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 (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 -colour 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 - ('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) - "Colour combinations for `modus-operandi-theme-mode-line'. - -FG and BG are the default colours. 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) - "Colour 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 colours 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 colours 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-scale (amount) - "Scale heading by AMOUNT. - -AMOUNT is a customisation option." - (when modus-operandi-theme-scale-headings - (list :height amount))) - -;;; Colour palette - -;; Define colour palette. Each colour must have a >= 7:1 contrast -;; ratio relative to the foreground/background colour it is rendered -;; against. -;; -;; The design of the colour 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 specialised 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" . "#1f2f6f") - ("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 colours - ;; - ;; `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' - ;; - ;; the window divider colours 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") - - ("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 colour 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 colours." - :type '(alist - :key-type (string :tag "Name") - :value-type (string :tag " Hex"))) - - (defmacro modus-operandi-theme-with-color-variables (&rest body) - "`let' bind all colours 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)) - ;; simple conditional styles that evaluate user-facing - ;; customisation options - (modus-theme-slant - (if modus-operandi-theme-slanted-constructs 'italic 'normal)) - (modus-theme-variable-pitch - (if modus-operandi-theme-variable-pitch-headings 'variable-pitch 'default))) - ,@body))) - - - -;;; Faces +(require-theme 'modus-themes) -(modus-operandi-theme-with-color-variables - (custom-theme-set-faces - 'modus-operandi -;;;; custom faces - ;; these bespoke faces are inherited by other constructs below -;;;;; subtle coloured 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 coloured 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 colours (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 - ;; colour 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-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))))) -;;;; standard faces -;;;;; absolute essentials - `(default ((,class :background ,bg-main :foreground ,fg-main))) - `(cursor ((,class :background ,fg-main))) - `(fringe ((,class ,@(modus-operandi-theme-fringe 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: - ;; - ;; (set-face-attribute 'bold nil :weight 'semibold) - `(bold ((,class :weight bold))) - `(comint-highlight-input ((,class :inherit bold))) - `(comint-highlight-prompt ((,class ,@(modus-operandi-theme-bold-weight) - ,@(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 :foreground ,cyan :slant ,modus-theme-slant))) - `(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 :foreground ,blue-alt-other - ,@(unless modus-operandi-theme-no-link-underline - (list :underline t))))) - `(link ((,class :inherit button))) - `(link-visited ((,class :inherit link :foreground ,magenta-alt-other))) - `(tooltip ((,class :background ,bg-special-cold :foreground ,fg-main))) - `(widget-button ((,class :inherit button))) - `(widget-button-pressed ((,class :inherit button :foreground ,magenta))) - `(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 :foreground ,magenta-alt-other))) - `(apropos-keybinding ((,class :inherit bold :foreground ,cyan))) - `(apropos-misc-button ((,class :inherit button :foreground ,cyan-alt-other))) - `(apropos-property ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,magenta-alt))) - `(apropos-symbol ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,blue-alt-other))) - `(apropos-user-option-button ((,class :inherit button :foreground ,green-alt-other))) - `(apropos-variable-button ((,class :inherit button :foreground ,blue))) -;;;;; 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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(font-latex-doctex-preprocessor-face ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,red-alt-other))) - `(font-latex-italic-face ((,class :foreground ,fg-special-calm :slant italic))) - `(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 ,@(modus-operandi-theme-bold-weight) :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 :background ,bg-tab-active :foreground ,fg-main :slant italic))) - `(centaur-tabs-unselected ((,class :background ,bg-tab-inactive :foreground ,fg-dim))) - `(centaur-tabs-unselected-modified ((,class :background ,bg-tab-inactive :foreground ,fg-dim :slant italic))) -;;;;; 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 :foreground ,fg-special-cold :slant italic))) - `(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 :foreground ,fg-special-warm :slant italic))) - `(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 :foreground ,red-alt-other :slant italic))) - `(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 :foreground ,fg-alt :slant italic))) - `(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 :foreground ,blue))) - `(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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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 ,@(modus-operandi-theme-bold-weight) :foreground ,red))) - `(compilation-info ((,class :foreground ,fg-special-cold))) - `(compilation-line-number ((,class :foreground ,fg-special-warm))) - `(compilation-mode-line-exit ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,blue-active))) - `(compilation-mode-line-fail ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,red-active))) - `(compilation-mode-line-run ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,magenta-active))) - `(compilation-warning ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,yellow))) -;;;;; completions - `(completions-annotations ((,class :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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 :foreground ,yellow-alt-other :slant ,modus-theme-slant))) -;;;;; 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 :background ,bg-alt :foreground ,red-alt :slant ,modus-theme-slant))) -;;;;; 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 :foreground ,cyan-alt-other :slant italic))) - `(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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(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 :foreground ,blue-alt-other))) - `(dictionary-word-definition-face ((,class :foreground ,fg-main))) - `(dictionary-word-entry-face ((,class :foreground ,fg-special-cold :slant ,modus-theme-slant))) -;;;;; 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 :foreground ,fg-alt :slant ,modus-theme-slant))) -;;;;; 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 :foreground ,cyan))) - `(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 :foreground ,cyan-alt))) - `(dired-warning ((,class :inherit bold :foreground ,yellow))) -;;;;; dired-async - `(dired-async-failures ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,red-active))) - `(dired-async-message ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,green-active))) - `(dired-async-mode-message ((,class ,@(modus-operandi-theme-bold-weight) :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 :foreground ,blue))) - `(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 :slant 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 :foreground ,yellow-active :slant italic))) - `(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 :foreground ,fg-active :slant italic))) - `(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 ,@(modus-operandi-theme-bold-weight) :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 :foreground ,cyan))) - `(eshell-ls-unreadable ((,class :background ,bg-inactive :foreground ,fg-inactive))) - `(eshell-prompt ((,class ,@(modus-operandi-theme-bold-weight) - ,@(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 ,@(modus-operandi-theme-bold-weight) :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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(epe-status-face ((,class :foreground ,magenta-alt-other))) - `(epe-venv-face ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) -;;;;; 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 :slant ,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 ,@(modus-operandi-theme-bold-weight) :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 :foreground ,fg-inactive :slant italic))) - `(flycheck-color-mode-line-info-face ((,class :inherit flycheck-fringe-warning))) -;;;;; flycheck-indicator - `(flycheck-indicator-disabled ((,class :foreground ,fg-inactive :slant ,modus-theme-slant))) - `(flycheck-indicator-error ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,red-active))) - `(flycheck-indicator-info ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,blue-active))) - `(flycheck-indicator-running ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,magenta-active))) - `(flycheck-indicator-success ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,green-active))) - `(flycheck-indicator-warning ((,class ,@(modus-operandi-theme-bold-weight) :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 :foreground ,fg-main :slant ,modus-theme-slant))) - `(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 ,@(modus-operandi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(font-lock-comment-delimiter-face ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(font-lock-comment-face ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(font-lock-constant-face ((,class ,@(modus-operandi-theme-syntax-foreground - blue-alt-other blue-alt-other-faint)))) - `(font-lock-doc-face ((,class ,@(modus-operandi-theme-syntax-foreground - fg-special-cold cyan-alt-other-faint) - :slant ,modus-theme-slant))) - `(font-lock-function-name-face ((,class ,@(modus-operandi-theme-syntax-foreground - magenta magenta-faint)))) - `(font-lock-keyword-face ((,class ,@(modus-operandi-theme-syntax-foreground - magenta-alt-other magenta-alt-other-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(font-lock-negation-char-face ((,class ,@(modus-operandi-theme-syntax-foreground - yellow yellow-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(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 ,@(modus-operandi-theme-syntax-foreground - yellow-active yellow-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) -;;;;; 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 :foreground ,magenta :slant ,modus-theme-slant))) - `(forge-topic-unread ((,class :inherit bold :foreground ,fg-main))) -;;;;; fountain-mode - `(fountain-character ((,class :foreground ,blue-alt-other))) - `(fountain-comment ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(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 :foreground ,yellow :slant ,modus-theme-slant))) - `(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 (bold ,modus-theme-variable-pitch) :foreground ,fg-main - ,@(modus-operandi-theme-scale modus-operandi-theme-scale-4)))) - `(fountain-section-heading-1 ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,fg-main - ,@(modus-operandi-theme-scale modus-operandi-theme-scale-4)))) - `(fountain-section-heading-2 ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,fg-special-warm - ,@(modus-operandi-theme-scale modus-operandi-theme-scale-3)))) - `(fountain-section-heading-3 ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,fg-special-mild - ,@(modus-operandi-theme-scale modus-operandi-theme-scale-2)))) - `(fountain-section-heading-4 ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,fg-special-calm - ,@(modus-operandi-theme-scale modus-operandi-theme-scale-1)))) - `(fountain-section-heading-5 ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,fg-special-calm))) - `(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 link))) - `(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 link))) -;;;;; git-commit - `(git-commit-comment-action ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(git-commit-comment-branch-local ((,class :foreground ,blue-alt :slant ,modus-theme-slant))) - `(git-commit-comment-branch-remote ((,class :foreground ,magenta-alt :slant ,modus-theme-slant))) - `(git-commit-comment-detached ((,class :foreground ,cyan-alt :slant ,modus-theme-slant))) - `(git-commit-comment-file ((,class :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(git-commit-comment-heading ((,class :inherit bold :foreground ,fg-dim :slant ,modus-theme-slant))) - `(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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(git-rebase-comment-heading ((,class :inherit bold :foreground ,fg-dim :slant ,modus-theme-slant))) - `(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 :foreground ,cyan))) - `(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 :foreground ,fg-main :slant italic))) - `(gnus-emphasis-highlight-words ((,class :inherit modus-theme-refine-yellow))) - `(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 :foreground ,fg-special-cold :slant italic))) - `(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 :foreground ,fg-alt :slant italic))) - `(gnus-summary-low-read ((,class :foreground ,fg-alt :slant italic))) - `(gnus-summary-low-ticked ((,class :foreground ,red-refine-fg :slant italic))) - `(gnus-summary-low-undownloaded ((,class :foreground ,yellow-refine-fg :slant italic))) - `(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 :foreground ,red))) - `(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 :foreground ,cyan))) - `(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 :foreground ,cyan-alt-other))) - `(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 :foreground ,red-alt-other :slant ,modus-theme-slant))) -;;;;; 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 :foreground ,fg-special-warm :slant ,modus-theme-slant))) - `(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 capitalisation 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 ,@(modus-operandi-theme-bold-weight) :foreground ,magenta-alt-other))) - `(info-colors-ref-item-other ((,class :foreground ,cyan))) - `(info-colors-ref-item-special-form ((,class ,@(modus-operandi-theme-bold-weight) :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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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 :foreground ,yellow :slant ,modus-theme-slant))) - `(ivy-modified-outside-buffer ((,class :foreground ,yellow-alt :slant ,modus-theme-slant))) - `(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 ,@(modus-operandi-theme-bold-weight) :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 :foreground ,cyan-alt :slant ,modus-theme-slant))) - `(lsp-face-semhl-function ((,class :foreground ,magenta))) - `(lsp-face-semhl-method ((,class :foreground ,magenta))) - `(lsp-face-semhl-namespace ((,class ,@(modus-operandi-theme-bold-weight) :foreground ,magenta-alt))) - `(lsp-face-semhl-preprocessor ((,class :foreground ,red-alt-other))) - `(lsp-face-semhl-static-method ((,class :foreground ,magenta :slant ,modus-theme-slant))) - `(lsp-face-semhl-type-class ((,class :foreground ,magenta-alt))) - `(lsp-face-semhl-type-enum ((,class :foreground ,magenta-alt))) - `(lsp-face-semhl-type-primitive ((,class :foreground ,magenta-alt :slant ,modus-theme-slant))) - `(lsp-face-semhl-type-template ((,class :foreground ,magenta-alt :slant ,modus-theme-slant))) - `(lsp-face-semhl-type-typedef ((,class :foreground ,magenta-alt :slant ,modus-theme-slant))) - `(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 :foreground ,blue-alt-other))) - `(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 :height 0.99 :slant italic))) -;;;;; 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 :slant 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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(markdown-bold-face ((,class :inherit bold))) - `(markdown-code-face ((,class ,@(modus-operandi-theme-mixed-fonts)))) - `(markdown-comment-face ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(markdown-footnote-marker-face ((,class :inherit bold :foreground ,cyan-alt))) - `(markdown-footnote-text-face ((,class :foreground ,fg-main :slant ,modus-theme-slant))) - `(markdown-gfm-checkbox-face ((,class :foreground ,cyan-alt-other))) - `(markdown-header-delimiter-face ((,class ,@(modus-operandi-theme-bold-weight) :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 :foreground ,fg-special-cold :slant italic))) - `(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 link))) - `(markdown-link-title-face ((,class :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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 :foreground ,fg-inactive :slant italic))) - `(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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(markup-complex-replacement-face ((,class :box (:line-width 2 :color nil :style released-button) - :inherit modus-theme-refine-magenta))) - `(markup-emphasis-face ((,class :foreground ,fg-special-cold :slant italic))) - `(markup-error-face ((,class :inherit bold :foreground ,red))) - `(markup-gen-face ((,class :foreground ,magenta-alt))) - `(markup-internal-reference-face ((,class :inherit button :foreground ,fg-inactive))) - `(markup-italic-face ((,class :foreground ,fg-special-cold :slant italic))) - `(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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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 link))) - `(mu4e-modeline-face ((,class :foreground ,magenta-active))) - `(mu4e-moved-face ((,class :foreground ,yellow :slant ,modus-theme-slant))) - `(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 :foreground ,fg-mark-del :slant ,modus-theme-slant))) - `(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 ,@(modus-operandi-theme-syntax-foreground - cyan-alt-other cyan-alt-other-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(nxml-attribute-value ((,class ,@(modus-operandi-theme-syntax-foreground - blue blue-faint)))) - `(nxml-cdata-section-CDATA ((,class ,@(modus-operandi-theme-syntax-foreground - red-alt red-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(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 ,@(modus-operandi-theme-syntax-foreground - green-alt-other green-alt-other-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(nxml-delimited-data ((,class :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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 ,@(modus-operandi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(nxml-entity-ref-delimiter ((,class ,@(modus-operandi-theme-syntax-foreground - green-alt-other green-alt-other-faint)))) - `(nxml-entity-ref-name ((,class ,@(modus-operandi-theme-syntax-foreground - green-alt-other green-alt-other-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(nxml-glyph ((,class :inherit modus-theme-intense-neutral))) - `(nxml-hash ((,class ,@(modus-operandi-theme-syntax-foreground - blue-alt blue-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(nxml-heading ((,class :inherit bold))) - `(nxml-name ((,class ,@(modus-operandi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(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 ,@(modus-operandi-theme-syntax-foreground - magenta-alt-other magenta-alt-other-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(nxml-prolog-keyword ((,class ,@(modus-operandi-theme-syntax-foreground - magenta-alt-other magenta-alt-other-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(nxml-ref ((,class ,@(modus-operandi-theme-syntax-foreground - green-alt-other green-alt-other-faint) - ,@(modus-operandi-theme-bold-weight)))) -;;;;; 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) :foreground ,cyan-alt-other))) - `(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 :box ,bg-region :background ,bg-dim :foreground ,green))) - `(org-drawer ((,class ,@(modus-operandi-theme-mixed-fonts) - :foreground ,cyan))) - `(org-ellipsis ((,class :foreground nil))) ; inherits from the heading's colour - `(org-footnote ((,class :inherit button :foreground ,blue-alt))) - `(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 link))) - `(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 :box ,bg-region :background ,bg-dim :foreground ,magenta))) - `(org-property-value ((,class ,@(modus-operandi-theme-mixed-fonts) - :foreground ,cyan-alt-other))) - `(org-quote ((,class ,@(modus-operandi-theme-org-block bg-dim) - :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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 ,blue-nuanced))) - `(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 :box ,bg-region :background ,bg-dim :foreground ,red-alt))) - `(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 :foreground ,yellow-alt-other :slant ,modus-theme-slant))) - `(org-journal-calendar-scheduled-face ((,class :foreground ,red-alt-other :slant ,modus-theme-slant))) - `(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 :foreground ,green))) - `(org-roam-link-current ((,class :inherit button :foreground ,green-alt))) - `(org-roam-link-invalid ((,class :inherit button :foreground ,red))) - `(org-roam-link-shielded ((,class :inherit button :foreground ,yellow))) - `(org-roam-tag ((,class :foreground ,fg-alt :slant italic))) -;;;;; 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 link))) - `(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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(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 ,@(modus-operandi-theme-bold-weight) :foreground ,blue-alt-other))) - `(paradox-highlight-face ((,class ,@(modus-operandi-theme-bold-weight) :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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(pomidor-work-face ((,class :foreground ,green-alt-other))) -;;;;; 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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(racket-logger-debug-face ((,class :foreground ,blue-alt-other))) - `(racket-logger-info-face ((,class :foreground ,fg-lang-note))) - `(racket-logger-topic-face ((,class :foreground ,magenta :slant ,modus-theme-slant))) - `(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 :foreground ,yellow-nuanced :slant italic))) - `(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 :foreground ,yellow-alt-other :slant italic))) - `(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 ,@(modus-operandi-theme-bold-weight) :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 link))) - `(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 :foreground ,magenta-alt))) -;;;;; 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 :foreground ,cyan-alt))) -;;;;; 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 ,@(modus-operandi-theme-bold-weight) :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 ,@(modus-operandi-theme-syntax-foreground - cyan cyan-faint) - :slant ,modus-theme-slant))) -;;;;; typescript - `(typescript-jsdoc-tag ((,class :foreground ,fg-special-mild :slant ,modus-theme-slant))) - `(typescript-jsdoc-type ((,class :foreground ,fg-special-calm :slant ,modus-theme-slant))) - `(typescript-jsdoc-value ((,class :foreground ,fg-special-cold :slant ,modus-theme-slant))) -;;;;; 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 :foreground ,red-active :slant ,modus-theme-slant))) - `(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 :foreground ,magenta-active :slant ,modus-theme-slant))) - `(vc-needs-update-state ((,class :foreground ,green-active :slant ,modus-theme-slant))) - `(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 ,@(modus-operandi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(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 ,@(modus-operandi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(web-mode-comment-face ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(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 ,@(modus-operandi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(web-mode-css-comment-face ((,class :inherit web-mode-comment-face))) - `(web-mode-css-function-face ((,class ,@(modus-operandi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(web-mode-css-priority-face ((,class ,@(modus-operandi-theme-syntax-foreground - yellow-alt yellow-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(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 ,@(modus-operandi-theme-syntax-foreground - magenta-alt-other magenta-alt-other-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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 ,@(modus-operandi-theme-syntax-foreground - yellow-alt-other yellow-alt-other-faint) - :slant ,modus-theme-slant))) - `(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 ,@(modus-operandi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(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 :slant 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 ,@(modus-operandi-theme-syntax-foreground - magenta-alt-other magenta-alt-other-faint) - ,@(modus-operandi-theme-bold-weight)))) - `(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 ,@(modus-operandi-theme-bold-weight) :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 :foreground ,cyan :slant italic))) - `(woman-unknown ((,class :foreground ,yellow :slant italic))) -;;;;; 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 colour-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)))))) +(deftheme modus-operandi + "Accessible and customizable light theme (WCAG AAA standard). +Conforms with the highest legibility standard for color contrast +between background and foreground in any given piece of text, +which corresponds to a minimum contrast in relative luminance of +7:1.") -;;; library provides -;;;###autoload -(when load-file-name - (add-to-list 'custom-theme-load-path - (file-name-as-directory (file-name-directory load-file-name)))) +(modus-themes-theme modus-operandi) (provide-theme 'modus-operandi) -(provide 'modus-operandi-theme) - ;;; modus-operandi-theme.el ends here diff --git a/etc/themes/modus-themes.el b/etc/themes/modus-themes.el new file mode 100644 index 0000000000..79846dbf3a --- /dev/null +++ b/etc/themes/modus-themes.el @@ -0,0 +1,6436 @@ +;;; modus-themes.el --- Highly accessible themes (WCAG AAA) -*- lexical-binding:t -*- + +;; Copyright (C) 2019-2021 Free Software Foundation, Inc. + +;; Author: Protesilaos Stavrou +;; URL: https://gitlab.com/protesilaos/modus-themes +;; Version: 1.2.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 modify +;; 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 . + +;;; Commentary: +;; +;; The Modus themes conform with the highest standard for color-contrast +;; accessibility between background and foreground values (WCAG AAA). +;; This file contains all customization options, helper functions, +;; interactive commands, and face specifications. Please refer to the +;; official Info manual for further documentation (distributed with the +;; themes, or available at: ). +;; +;; The themes share the following customization options, all of which +;; are disabled by default (nil): +;; +;; modus-themes-slanted-constructs (boolean) +;; modus-themes-bold-constructs (boolean) +;; modus-themes-variable-pitch-headings (boolean) +;; modus-themes-variable-pitch-ui (boolean) +;; modus-themes-no-mixed-fonts (boolean) +;; modus-themes-headings (alist) +;; modus-themes-scale-headings (boolean) +;; modus-themes-fringes (choice) +;; modus-themes-lang-checkers (choice) +;; modus-themes-org-blocks (choice) +;; modus-themes-org-habit (choice) +;; modus-themes-prompts (choice) +;; modus-themes-mode-line (choice) +;; modus-themes-diffs (choice) +;; modus-themes-syntax (choice) +;; modus-themes-intense-hl-line (boolean) +;; modus-themes-subtle-line-numbers (boolean) +;; modus-themes-paren-match (choice) +;; modus-themes-region (choice) +;; modus-themes-links (choice) +;; modus-themes-completions (choice) +;; +;; The default scale for headings is as follows (it can be customized as +;; well---remember, no scaling takes place by default): +;; +;; modus-themes-scale-1 1.05 +;; modus-themes-scale-2 1.1 +;; modus-themes-scale-3 1.15 +;; modus-themes-scale-4 1.2 +;; modus-themes-scale-5 1.3 +;; +;; There also exist two unique customization options for overriding +;; color palette values. The specifics are documented in the manual. +;; The symbols are: +;; +;; modus-themes-operandi-color-overrides (alist) +;; modus-themes-vivendi-color-overrides (alist) +;; +;; Below 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 report 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 +;; bbdb +;; binder +;; bm +;; bongo +;; boon +;; breakpoint (provided by built-in gdb-mi.el) +;; buffer-expose +;; calendar and diary +;; calfw +;; centaur-tabs +;; cfrs +;; 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 +;; consult +;; 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 +;; diredc +;; diredfl +;; diredp (dired+) +;; disk-usage +;; display-fill-column-indicator-mode +;; 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-snipe +;; evil-visual-mark-mode +;; eww +;; exwm +;; 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. +;; isl (isearch-light) +;; 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 +;; macrostep +;; magit +;; magit-imerge +;; make-mode +;; man +;; marginalia +;; markdown-mode +;; markup-faces (`adoc-mode') +;; mentor +;; messages +;; minibuffer-line +;; minimap +;; mmm-mode +;; 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-tree-slide +;; org-treescope +;; origami +;; outline-mode +;; outline-minor-faces +;; package (M-x list-packages) +;; page-break-lines +;; paradox +;; paren-face +;; parrot +;; pass +;; pdf-tools +;; persp-mode +;; perspective +;; phi-grep +;; phi-search +;; pkgbuild-mode +;; pomidor +;; popup +;; powerline +;; powerline-evil +;; prism (see "Note for prism.el" in the manual) +;; proced +;; prodigy +;; quick-peek +;; racket-mode +;; rainbow-blocks +;; rainbow-identifiers +;; rainbow-delimiters +;; rcirc +;; recursion-indicator +;; regexp-builder (also known as `re-builder') +;; rg +;; ripgrep +;; rmail +;; ruler-mode +;; sallet +;; selectrum +;; selectrum-prescient +;; semantic +;; sesman +;; shell-script-mode +;; shortdoc +;; show-paren-mode +;; shr +;; side-notes +;; sieve-mode +;; skewer-mode +;; smart-mode-line +;; smartparens +;; smerge +;; spaceline +;; speedbar +;; spell-fu +;; spray +;; stripes +;; suggest +;; switch-window +;; swiper +;; swoop +;; sx +;; symbol-overlay +;; tab-bar-mode +;; tab-line-mode +;; syslog-mode +;; table (built-in table.el) +;; telephone-line +;; terraform-mode +;; 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 +;; +;; For a complete view of the project, also refer to the following files +;; (should be distributed in the same repository/directory as the +;; current item): +;; +;; - modus-operandi-theme.el (Light theme) +;; - modus-vivendi-theme.el (Dark theme) + +;;; Code: + + + +(eval-when-compile (require 'cl-lib)) + +(defgroup modus-themes () + "Options for `modus-operandi', `modus-vivendi'." + :group 'faces + :link '(info-link "(modus-themes) Top") + :prefix "modus-themes-" + :tag "Modus Themes") + +;;; Variables for each theme variant + +;;;; Modus Operandi + +(define-obsolete-variable-alias + 'modus-operandi-theme-default-colors-alist + 'modus-themes-colors-operandi + "1.0.0") + +(define-obsolete-variable-alias + 'modus-themes-colors-operandi + 'modus-themes-operandi-colors + "1.1.0") + +(defconst modus-themes-operandi-colors + '(;; base values + (bg-main . "#ffffff") (fg-main . "#000000") + (bg-dim . "#f8f8f8") (fg-dim . "#282828") + (bg-alt . "#f0f0f0") (fg-alt . "#505050") + ;; specifically for on/off states and must be combined with + ;; themselves, though the backgrounds are also meant to be used with + ;; other "active" values, defined further below + (bg-active . "#d7d7d7") (fg-active . "#0a0a0a") + (bg-inactive . "#efefef") (fg-inactive . "#404148") + ;; these special values are intended as alternatives to the base + ;; values for cases where we need to avoid confusion between the + ;; highlighted constructs; they must either be used as pairs based + ;; on their name or each can be combined with {fg,bg}-{main,alt,dim} + ;; always in accordance with their role as background or foreground + (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") + ;; foregrounds that can be combined with bg-main, bg-dim, bg-alt + (red . "#a60000") + (red-alt . "#972500") + (red-alt-other . "#a0132f") + (red-faint . "#7f1010") + (red-alt-faint . "#702f00") + (red-alt-other-faint . "#7f002f") + (green . "#005e00") + (green-alt . "#315b00") + (green-alt-other . "#145c33") + (green-faint . "#104410") + (green-alt-faint . "#30440f") + (green-alt-other-faint . "#0f443f") + (yellow . "#813e00") + (yellow-alt . "#70480f") + (yellow-alt-other . "#863927") + (yellow-faint . "#5f4400") + (yellow-alt-faint . "#5d5000") + (yellow-alt-other-faint . "#5e3a20") + (blue . "#0031a9") + (blue-alt . "#2544bb") + (blue-alt-other . "#0000c0") + (blue-faint . "#003497") + (blue-alt-faint . "#0f3d8c") + (blue-alt-other-faint . "#001087") + (magenta . "#721045") + (magenta-alt . "#8f0075") + (magenta-alt-other . "#5317ac") + (magenta-faint . "#752f50") + (magenta-alt-faint . "#7b206f") + (magenta-alt-other-faint . "#55348e") + (cyan . "#00538b") + (cyan-alt . "#30517f") + (cyan-alt-other . "#005a5f") + (cyan-faint . "#005077") + (cyan-alt-faint . "#354f6f") + (cyan-alt-other-faint . "#125458") + ;; these foreground values can only be combined with bg-main and are + ;; thus not suitable for general purpose highlighting + (red-intense . "#b60000") + (orange-intense . "#904200") + (green-intense . "#006800") + (yellow-intense . "#605b00") + (blue-intense . "#1f1fce") + (magenta-intense . "#a8007f") + (purple-intense . "#7f10d0") + (cyan-intense . "#005f88") + ;; those foregrounds are meant exclusively for bg-active, bg-inactive + (red-active . "#8a0000") + (green-active . "#004c2e") + (yellow-active . "#702d1f") + (blue-active . "#0030b4") + (magenta-active . "#5c2092") + (cyan-active . "#003f8a") + ;; the "subtle" values below be combined with fg-dim, while the + ;; "intense" should be paired with fg-main + (red-subtle-bg . "#f2b0a2") + (red-intense-bg . "#ff8892") + (green-subtle-bg . "#aecf90") + (green-intense-bg . "#5ada88") + (yellow-subtle-bg . "#e4c340") + (yellow-intense-bg . "#f5df23") + (blue-subtle-bg . "#b5d0ff") + (blue-intense-bg . "#6aaeff") + (magenta-subtle-bg . "#f0d3ff") + (magenta-intense-bg . "#d5baff") + (cyan-subtle-bg . "#c0efff") + (cyan-intense-bg . "#42cbd4") + ;; those background values must be combined with fg-main and should + ;; only be used for indicators that are placed on the fringes + (red-fringe-bg . "#f08290") + (green-fringe-bg . "#62c86a") + (yellow-fringe-bg . "#dbba3f") + (blue-fringe-bg . "#82afff") + (magenta-fringe-bg . "#e0a3ff") + (cyan-fringe-bg . "#2fcddf") + ;; those background values should only be used for graphs or similar + ;; applications where colored blocks are expected to be positioned + ;; next to each other + (red-graph-0-bg . "#ef6f79") + (red-graph-1-bg . "#ff9f9f") + (green-graph-0-bg . "#49d239") + (green-graph-1-bg . "#6dec6d") + (yellow-graph-0-bg . "#efec08") + (yellow-graph-1-bg . "#dbff4e") + (blue-graph-0-bg . "#55a2f0") + (blue-graph-1-bg . "#7fcfff") + (magenta-graph-0-bg . "#ba86ef") + (magenta-graph-1-bg . "#e7afff") + (cyan-graph-0-bg . "#30d3f0") + (cyan-graph-1-bg . "#6fefff") + ;; the following are for cases where both the foreground and the + ;; background need to have a similar hue and so must be combined + ;; with themselves, even though the foregrounds can be paired 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") + ;; the "nuanced" backgrounds can be combined with all of the above + ;; foregrounds, as well as those included here, while the "nuanced" + ;; foregrounds can in turn also be combined with bg-main, bg-dim, + ;; bg-alt + (red-nuanced-bg . "#fff1f0") (red-nuanced-fg . "#5f0000") + (green-nuanced-bg . "#ecf7ed") (green-nuanced-fg . "#004000") + (yellow-nuanced-bg . "#fff3da") (yellow-nuanced-fg . "#3f3000") + (blue-nuanced-bg . "#f3f3ff") (blue-nuanced-fg . "#201f55") + (magenta-nuanced-bg . "#fdf0ff") (magenta-nuanced-fg . "#541f4f") + (cyan-nuanced-bg . "#ebf6fa") (cyan-nuanced-fg . "#0f3360") + ;; the following are reserved for specific cases + ;; + ;; 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, whereas + ;; bg-tab-inactive-alt goes together with fg-main + ;; + ;; 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 bg-main + ;; + ;; fg-docstring, 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") + (bg-tab-inactive-alt . "#999999") + (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-lang-underline-error . "#ef4f54") + (fg-lang-underline-warning . "#cf9f00") + (fg-lang-underline-note . "#3f6fef") + + (fg-window-divider-inner . "#888888") + (fg-window-divider-outer . "#585858") + + (fg-unfocused . "#56576d") + + (fg-docstring . "#2a486a") + (fg-comment-yellow . "#5f4400") + + (bg-header . "#e5e5e5") (fg-header . "#2a2a2a") + + (bg-whitespace . "#f5efef") (fg-whitespace . "#624956") + + (bg-diff-heading . "#b7cfe0") (fg-diff-heading . "#041645") + (bg-diff-added . "#d4fad4") (fg-diff-added . "#004500") + (bg-diff-added-deuteran . "#daefff") (fg-diff-added-deuteran . "#002044") + (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-added-deuteran . "#77c0ef") (fg-diff-refine-added-deuteran . "#000035") + (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-added-deuteran . "#bacfff") (fg-diff-focus-added-deuteran . "#001755") + (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) with the former as a +symbol and the latter as a string.") + +;;;; Modus Vivendi + +(define-obsolete-variable-alias + 'modus-vivendi-theme-default-colors-alist + 'modus-themes-colors-vivendi + "1.0.0") + +(define-obsolete-variable-alias + 'modus-themes-colors-vivendi + 'modus-themes-vivendi-colors + "1.1.0") + +(defconst modus-themes-vivendi-colors + '(;; base values + (bg-main . "#000000") (fg-main . "#ffffff") + (bg-dim . "#110b11") (fg-dim . "#e0e6f0") + (bg-alt . "#181a20") (fg-alt . "#a8a8a8") + ;; specifically for on/off states and must be combined with + ;; themselves, though the backgrounds are also meant to be used with + ;; other "active" values, defined further below + (bg-active . "#323232") (fg-active . "#f4f4f4") + (bg-inactive . "#1e1e1e") (fg-inactive . "#bfc0c4") + ;; these special values are intended as alternatives to the base + ;; values for cases where we need to avoid confusion between the + ;; highlighted constructs; they must either be used as pairs based + ;; on their name or each can be combined with {fg,bg}-{main,alt,dim} + ;; always in accordance with their role as background or foreground + (bg-special-cold . "#203448") (fg-special-cold . "#c6eaff") + (bg-special-mild . "#00322e") (fg-special-mild . "#bfebe0") + (bg-special-warm . "#382f27") (fg-special-warm . "#f8dec0") + (bg-special-calm . "#392a48") (fg-special-calm . "#fbd6f4") + ;; foregrounds that can be combined with bg-main, bg-dim, bg-alt + (red . "#ff8059") + (red-alt . "#f4923b") + (red-alt-other . "#ff9977") + (red-faint . "#ffa0a0") + (red-alt-faint . "#f5aa80") + (red-alt-other-faint . "#ff9fbf") + (green . "#44bc44") + (green-alt . "#70c900") + (green-alt-other . "#00cd68") + (green-faint . "#88cf88") + (green-alt-faint . "#a8cf88") + (green-alt-other-faint . "#88cfaf") + (yellow . "#eecc00") + (yellow-alt . "#cfdf30") + (yellow-alt-other . "#f0ce43") + (yellow-faint . "#d2b580") + (yellow-alt-faint . "#cabf77") + (yellow-alt-other-faint . "#d0ba95") + (blue . "#2fafff") + (blue-alt . "#79a8ff" ) + (blue-alt-other . "#00bcff") + (blue-faint . "#92baff") + (blue-alt-faint . "#a0acf5") + (blue-alt-other-faint . "#87c8ff") + (magenta . "#feacd0") + (magenta-alt . "#f78fe7") + (magenta-alt-other . "#b6a0ff") + (magenta-faint . "#e0b2d6") + (magenta-alt-faint . "#ef9fe4") + (magenta-alt-other-faint . "#cfa6ff") + (cyan . "#00d3d0") + (cyan-alt . "#4ae8fc") + (cyan-alt-other . "#6ae4b9") + (cyan-faint . "#90c4ed") + (cyan-alt-faint . "#a0bfdf") + (cyan-alt-other-faint . "#a4d0bb") + ;; these foreground values can only be combined with bg-main and are + ;; thus not suitable for general purpose highlighting + (red-intense . "#fe6060") + (orange-intense . "#fba849") + (green-intense . "#4fe42f") + (yellow-intense . "#f0dd60") + (blue-intense . "#4fafff") + (magenta-intense . "#ff62d4") + (purple-intense . "#9f80ff") + (cyan-intense . "#3fdfd0") + ;; those foregrounds are meant exclusively for bg-active, bg-inactive + (red-active . "#ffa7ba") + (green-active . "#70d73f") + (yellow-active . "#dbbe5f") + (blue-active . "#34cfff") + (magenta-active . "#d5b1ff") + (cyan-active . "#00d8b4") + ;; the "subtle" values below be combined with fg-dim, while the + ;; "intense" should be paired with fg-main + (red-subtle-bg . "#762422") + (red-intense-bg . "#a4202a") + (green-subtle-bg . "#2f4a00") + (green-intense-bg . "#006800") + (yellow-subtle-bg . "#604200") + (yellow-intense-bg . "#874900") + (blue-subtle-bg . "#10387c") + (blue-intense-bg . "#2a40b8") + (magenta-subtle-bg . "#49366e") + (magenta-intense-bg . "#7042a2") + (cyan-subtle-bg . "#00415e") + (cyan-intense-bg . "#005f88") + ;; those background values must be combined with fg-main and should + ;; only be used for indicators that are placed on the fringes + (red-fringe-bg . "#8f1f4b") + (green-fringe-bg . "#006700") + (yellow-fringe-bg . "#6f4f00") + (blue-fringe-bg . "#3f33af") + (magenta-fringe-bg . "#6f2f89") + (cyan-fringe-bg . "#004f8f") + ;; those background values should only be used for graphs or similar + ;; applications where colored blocks are expected to be positioned + ;; next to each other + (red-graph-0-bg . "#af0404") + (red-graph-1-bg . "#801f2f") + (green-graph-0-bg . "#24ba2f") + (green-graph-1-bg . "#0f8f07") + (yellow-graph-0-bg . "#ffd03e") + (yellow-graph-1-bg . "#d7d800") + (blue-graph-0-bg . "#406fff") + (blue-graph-1-bg . "#2f50c8") + (magenta-graph-0-bg . "#af7bee") + (magenta-graph-1-bg . "#7f59cf") + (cyan-graph-0-bg . "#47dcfa") + (cyan-graph-1-bg . "#0bc0df") + ;; the following are for cases where both the foreground and the + ;; background need to have a similar hue and so must be combined + ;; with themselves, even though the foregrounds can be paired with + ;; any of the base backgrounds + (red-refine-bg . "#77002a") (red-refine-fg . "#ffb9ab") + (green-refine-bg . "#00422a") (green-refine-fg . "#9ff0cf") + (yellow-refine-bg . "#693200") (yellow-refine-fg . "#e2d980") + (blue-refine-bg . "#242679") (blue-refine-fg . "#8ec6ff") + (magenta-refine-bg . "#71206a") (magenta-refine-fg . "#ffcaf0") + (cyan-refine-bg . "#004065") (cyan-refine-fg . "#8ae4f2") + ;; the "nuanced" backgrounds can be combined with all of the above + ;; foregrounds, as well as those included here, while the "nuanced" + ;; foregrounds can in turn also be combined with bg-main, bg-dim, + ;; bg-alt + (red-nuanced-bg . "#2c0614") (red-nuanced-fg . "#ffcccc") + (green-nuanced-bg . "#001904") (green-nuanced-fg . "#b8e2b8") + (yellow-nuanced-bg . "#221000") (yellow-nuanced-fg . "#dfdfb0") + (blue-nuanced-bg . "#0f0e39") (blue-nuanced-fg . "#bfd9ff") + (magenta-nuanced-bg . "#230631") (magenta-nuanced-fg . "#e5cfef") + (cyan-nuanced-bg . "#041529") (cyan-nuanced-fg . "#a8e5e5") + ;; the following are reserved for specific cases + ;; + ;; 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, whereas + ;; bg-tab-inactive-alt goes together with fg-main + ;; + ;; 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 bg-main + ;; + ;; fg-docstring, 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 . "#151823") + (bg-hl-line-intense . "#2f2f2f") + (bg-hl-alt . "#181732") + (bg-hl-alt-intense . "#282e46") + (bg-paren-match . "#5f362f") + (bg-paren-match-intense . "#7416b5") + (bg-region . "#3c3c3c") + + (bg-tab-bar . "#2c2c2c") + (bg-tab-active . "#0e0e0e") + (bg-tab-inactive . "#3d3d3d") + (bg-tab-inactive-alt . "#595959") + (fg-tab-active . "#5ac3cf") + + (fg-escape-char-construct . "#e7a59a") + (fg-escape-char-backslash . "#abab00") + + (fg-lang-error . "#ef8690") + (fg-lang-warning . "#b0aa00") + (fg-lang-note . "#9d9def") + (fg-lang-underline-error . "#ff4a6f") + (fg-lang-underline-warning . "#d0de00") + (fg-lang-underline-note . "#5f6fff") + + (fg-window-divider-inner . "#646464") + (fg-window-divider-outer . "#969696") + + (fg-unfocused . "#93959b") + + (fg-docstring . "#b0d6f5") + (fg-comment-yellow . "#cab98f") + + (bg-header . "#212121") (fg-header . "#dddddd") + + (bg-whitespace . "#101424") (fg-whitespace . "#aa9e9f") + + (bg-diff-heading . "#304466") (fg-diff-heading . "#dae7ff") + (bg-diff-added . "#0a280a") (fg-diff-added . "#94ba94") + (bg-diff-added-deuteran . "#001a3f") (fg-diff-added-deuteran . "#c4cdf2") + (bg-diff-changed . "#2a2000") (fg-diff-changed . "#b0ba9f") + (bg-diff-removed . "#40160f") (fg-diff-removed . "#c6adaa") + + (bg-diff-refine-added . "#005a36") (fg-diff-refine-added . "#e0f6e0") + (bg-diff-refine-added-deuteran . "#234f8f") (fg-diff-refine-added-deuteran . "#dde4ff") + (bg-diff-refine-changed . "#585800") (fg-diff-refine-changed . "#ffffcc") + (bg-diff-refine-removed . "#852828") (fg-diff-refine-removed . "#ffd9eb") + + (bg-diff-focus-added . "#203d20") (fg-diff-focus-added . "#b4ddb4") + (bg-diff-focus-added-deuteran . "#00405f") (fg-diff-focus-added-deuteran . "#bfe4ff") + (bg-diff-focus-changed . "#4a3a10") (fg-diff-focus-changed . "#d0daaf") + (bg-diff-focus-removed . "#5e2526") (fg-diff-focus-removed . "#eebdba") + + (bg-diff-neutral-0 . "#575757") (fg-diff-neutral-0 . "#fcfcfc") + (bg-diff-neutral-1 . "#454545") (fg-diff-neutral-1 . "#dddddd") + (bg-diff-neutral-2 . "#313131") (fg-diff-neutral-2 . "#bfbfbf") + + (bg-mark-sel . "#002f2f") (fg-mark-sel . "#60cfa2") + (bg-mark-del . "#5a0000") (fg-mark-del . "#ff99aa") + (bg-mark-alt . "#3f2210") (fg-mark-alt . "#f0aa20")) + "The entire palette of `modus-vivendi' theme. +Each element has the form (NAME . HEX) with the former as a +symbol and the latter as a string.") + + + +;;; Custom faces + +;; These faces are used internally to ensure consistency between various +;; groups and to streamline the evaluation of relevant customization +;; options. +(defface modus-theme-subtle-red nil + "Subtle red background combined with a dimmed foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-subtle-green nil + "Subtle green background combined with a dimmed foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-subtle-yellow nil + "Subtle yellow background combined with a dimmed foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-subtle-blue nil + "Subtle blue background combined with a dimmed foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-subtle-magenta nil + "Subtle magenta background combined with a dimmed foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-subtle-cyan nil + "Subtle cyan background combined with a dimmed foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-subtle-neutral nil + "Subtle gray background combined with a dimmed foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-intense-red nil + "Intense red background combined with the main foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-intense-green nil + "Intense green background combined with the main foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-intense-yellow nil + "Intense yellow background combined with the main foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-intense-blue nil + "Intense blue background combined with the main foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-intense-magenta nil + "Intense magenta background combined with the main foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-intense-cyan nil + "Intense cyan background combined with the main foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-intense-neutral nil + "Intense gray background combined with the main foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-refine-red nil + "Combination of accented red background and foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-refine-green nil + "Combination of accented green background and foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-refine-yellow nil + "Combination of accented yellow background and foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-refine-blue nil + "Combination of accented blue background and foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-refine-magenta nil + "Combination of accented magenta background and foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-refine-cyan nil + "Combination of accented cyan background and foreground. +This is used for general purpose highlighting, mostly in buffers +or for completion interfaces. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-active-red nil + "A red background meant for use on the modeline or similar. +This is combined with the modelines primary foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-active-green nil + "A green background meant for use on the modeline or similar. +This is combined with the modelines primary foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-active-yellow nil + "A yellow background meant for use on the modeline or similar. +This is combined with the modelines primary foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-active-blue nil + "A blue background meant for use on the modeline or similar. +This is combined with the modelines primary foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-active-magenta nil + "A magenta background meant for use on the modeline or similar. +This is combined with the modelines primary foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-active-cyan nil + "A cyan background meant for use on the modeline or similar. +This is combined with the modelines primary foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-fringe-red nil + "A red background meant for use on the fringe or similar. +This is combined with the main foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-fringe-green nil + "A green background meant for use on the fringe or similar. +This is combined with the main foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-fringe-yellow nil + "A yellow background meant for use on the fringe or similar. +This is combined with the main foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-fringe-blue nil + "A blue background meant for use on the fringe or similar. +This is combined with the main foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-fringe-magenta nil + "A magenta background meant for use on the fringe or similar. +This is combined with the main foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-fringe-cyan nil + "A cyan background meant for use on the fringe or similar. +This is combined with the main foreground value. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-nuanced-red nil + "A nuanced red background. +This does not specify a foreground of its own. Instead it is meant to +serve as the backdrop for elements such as Org blocks, headings, and any +other surface that needs to retain the colors on display. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-nuanced-green nil + "A nuanced green background. +This does not specify a foreground of its own. Instead it is meant to +serve as the backdrop for elements such as Org blocks, headings, and any +other surface that needs to retain the colors on display. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-nuanced-yellow nil + "A nuanced yellow background. +This does not specify a foreground of its own. Instead it is meant to +serve as the backdrop for elements such as Org blocks, headings, and any +other surface that needs to retain the colors on display. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-nuanced-blue nil + "A nuanced blue background. +This does not specify a foreground of its own. Instead it is meant to +serve as the backdrop for elements such as Org blocks, headings, and any +other surface that needs to retain the colors on display. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-nuanced-magenta nil + "A nuanced magenta background. +This does not specify a foreground of its own. Instead it is meant to +serve as the backdrop for elements such as Org blocks, headings, and any +other surface that needs to retain the colors on display. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-nuanced-cyan nil + "A nuanced cyan background. +This does not specify a foreground of its own. Instead it is meant to +serve as the backdrop for elements such as Org blocks, headings, and any +other surface that needs to retain the colors on display. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-special-cold nil + "Combines the 'special cold' background and foreground values. +This is intended for cases when a neutral gray background is not +suitable and where a combination of more saturated colors would not be +appropriate. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-special-mild nil + "Combines the 'special mild' background and foreground values. +This is intended for cases when a neutral gray background is not +suitable and where a combination of more saturated colors would not be +appropriate. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-special-warm nil + "Combines the 'special warm' background and foreground values. +This is intended for cases when a neutral gray background is not +suitable and where a combination of more saturated colors would not be +appropriate. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-special-calm nil + "Combines the 'special calm' background and foreground values. +This is intended for cases when a neutral gray background is not +suitable and where a combination of more saturated colors would not be +appropriate. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-diff-added nil + "Combines green colors for the 'added' state in diffs. +The applied colors are contingent on the value assigned to +`modus-themes-diffs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-diff-changed nil + "Combines yellow colors for the 'changed' state in diffs. +The applied colors are contingent on the value assigned to +`modus-themes-diffs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-diff-removed nil + "Combines red colors for the 'removed' state in diffs. +The applied colors are contingent on the value assigned to +`modus-themes-diffs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-diff-refine-added nil + "Combines green colors for word-wise 'added' state in diffs. +The applied colors are contingent on the value assigned to +`modus-themes-diffs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-diff-refine-changed nil + "Combines yellow colors for word-wise 'changed' state in diffs. +The applied colors are contingent on the value assigned to +`modus-themes-diffs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-diff-refine-removed nil + "Combines red colors for word-wise 'removed' state in diffs. +The applied colors are contingent on the value assigned to +`modus-themes-diffs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-diff-focus-added nil + "Combines green colors for the focused 'added' state in diffs. +The applied colors are contingent on the value assigned to +`modus-themes-diffs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-diff-focus-changed nil + "Combines yellow colors for the focused 'changed' state in. +The applied colors are contingent on the value assigned to +`modus-themes-diffs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-diff-focus-removed nil + "Combines red colors for the focused 'removed' state in diffs. +The applied colors are contingent on the value assigned to +`modus-themes-diffs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-diff-heading nil + "Combines blue colors for the diff hunk heading. +The applied colors are contingent on the value assigned to +`modus-themes-diffs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-pseudo-header nil + "Generic style for some elements that function like headings. +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-mark-alt nil + "Combines yellow colors for marking special lines +This is intended for use in modes such as Dired, Ibuffer, Proced. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-mark-del nil + "Combines red colors for marking deletable lines +This is intended for use in modes such as Dired, Ibuffer, Proced. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-mark-sel nil + "Combines green colors for marking lines +This is intended for use in modes such as Dired, Ibuffer, Proced. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-mark-symbol nil + "Applies a blue color and other styles for mark indicators. +This is intended for use in modes such as Dired, Ibuffer, Proced. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-heading-1 nil + "General purpose face for use in headings level 1 +The exact attributes assigned to this face are contingent on the values +assigned to the `modus-themes-headings' variable. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-heading-2 nil + "General purpose face for use in headings level 2. +The exact attributes assigned to this face are contingent on the values +assigned to the `modus-themes-headings' variable. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-heading-3 nil + "General purpose face for use in headings level 3. +The exact attributes assigned to this face are contingent on the values +assigned to the `modus-themes-headings' variable. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-heading-4 nil + "General purpose face for use in headings level 4. +The exact attributes assigned to this face are contingent on the values +assigned to the `modus-themes-headings' variable. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-heading-5 nil + "General purpose face for use in headings level 5. +The exact attributes assigned to this face are contingent on the values +assigned to the `modus-themes-headings' variable. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-heading-6 nil + "General purpose face for use in headings level 6. +The exact attributes assigned to this face are contingent on the values +assigned to the `modus-themes-headings' variable. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-heading-7 nil + "General purpose face for use in headings level 7. +The exact attributes assigned to this face are contingent on the values +assigned to the `modus-themes-headings' variable. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-heading-8 nil + "General purpose face for use in headings level 8. +The exact attributes assigned to this face are contingent on the values +assigned to the `modus-themes-headings' variable. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-hl-line nil + "General purpose face for the current line. +The exact attributes assigned to this face are contingent on the values +assigned to the `modus-themes-intense-hl-line' variable. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-bold nil + "Generic face for applying a conditional bold weight. +This behaves in accordance with `modus-themes-bold-constructs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-slant nil + "Generic face for applying a conditional slant (italics). +This behaves in accordance with `modus-themes-slanted-constructs'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-variable-pitch nil + "Generic face for applying a conditional `variable-pitch'. +This behaves in accordance with `modus-themes-no-mixed-fonts', +`modus-themes-variable-pitch-headings' for all heading levels, and +`modus-themes-variable-pitch-ui'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-red-0 nil + "Special subdued red face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-red-1 nil + "Special prominent red face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-green-0 nil + "Special subdued green face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-green-1 nil + "Special prominent green face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-yellow-0 nil + "Special subdued yellow face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-yellow-1 nil + "Special prominent yellow face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-blue-0 nil + "Special subdued blue face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-blue-1 nil + "Special prominent blue face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-magenta-0 nil + "Special subdued magenta face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-magenta-1 nil + "Special prominent magenta face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-cyan-0 nil + "Special subdued cyan face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-graph-cyan-1 nil + "Special prominent cyan face for use in graphs. +This is intended to be applied in contexts such as the Org agenda habit +graph where faithfulness to the semantics of a color value is of +paramount importance. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-lang-note nil + "Generic face for linter or spell checker notes. +The exact attributes and color combinations are controlled by +`modus-themes-lang-checkers'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-lang-warning nil + "Generic face for linter or spell checker warnings. +The exact attributes and color combinations are controlled by +`modus-themes-lang-checkers'. + +The actual styling of the face is done by `modus-themes-faces'.") + +(defface modus-theme-lang-error nil + "Generic face for linter or spell checker errors. +The exact attributes and color combinations are controlled by +`modus-themes-lang-checkers'. + +The actual styling of the face is done by `modus-themes-faces'.") + + + +;;; Customization options + +;;;; Current customization options (>= 1.0.0) + +(defcustom modus-themes-operandi-color-overrides nil + "Override colors in the Modus Operandi palette. + +For form, see `modus-themes-operandi-colors'." + :group 'modus-themes + :package-version '(modus-themes . "1.1.0") + :version "28.1" + :type '(alist :key-type symbol :value-type color) + :link '(info-link "(modus-themes) Override colors (DIY)")) + +(defcustom modus-themes-vivendi-color-overrides nil + "Override colors in the Modus Vivendi palette. + +For form, see `modus-themes-vivendi-colors'." + :group 'modus-themes + :package-version '(modus-themes . "1.1.0") + :version "28.1" + :type '(alist :key-type symbol :value-type color) + :link '(info-link "(modus-themes) Override colors (DIY)")) + +;; The byte compiler complains when a defcustom isn't a top level form +(let* ((names (mapcar (lambda (pair) + (symbol-name (car pair))) + modus-themes-operandi-colors)) + (colors (mapcar #'intern (sort names #'string<)))) + (put 'modus-themes-operandi-color-overrides + 'custom-options (copy-sequence colors)) + (put 'modus-themes-vivendi-color-overrides + 'custom-options (copy-sequence colors))) + +(defcustom modus-themes-slanted-constructs nil + "Use slanted text in more code constructs (italics or oblique)." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :type 'boolean + :link '(info-link "(modus-themes) Slanted constructs")) + +(defcustom modus-themes-bold-constructs nil + "Use bold text in more code constructs." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :type 'boolean + :link '(info-link "(modus-themes) Bold constructs")) + +(defcustom modus-themes-variable-pitch-headings nil + "Use proportional fonts (variable-pitch) in headings." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :type 'boolean + :link '(info-link "(modus-themes) Headings' typeface")) + +(defcustom modus-themes-variable-pitch-ui nil + "Use proportional fonts (variable-pitch) in UI elements. +This includes the mode line, header line, tab bar, and tab line." + :group 'modus-themes + :package-version '(modus-themes . "1.1.0") + :version "28.1" + :type 'boolean + :link '(info-link "(modus-themes) UI typeface")) + +(defcustom modus-themes-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." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :type 'boolean + :link '(info-link "(modus-themes) No mixed fonts")) + +(defcustom modus-themes-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-themes-headings + '((1 . highlight) + (2 . line) + (t . rainbow-line-no-bold))) + +To set a uniform value for all heading levels, use this pattern: + + (setq modus-themes-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-themes-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. + ++ `no-color' does not apply any color to the heading, meaning + that it uses the foreground of the `default' face. It still + renders the text with a bold typographic weight. + ++ `no-color-no-bold' is like `no-color' but without the bold + weight." + :group 'modus-themes + :package-version '(modus-themes . "1.2.0") + :version "28.1" + :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) + (const :tag "Do not use any distinct foreground color; just bold weight" no-color) + (const :tag "Like `no-bold' but without the distinct foreground color" no-color-no-bold))) + :link '(info-link "(modus-themes) Heading styles")) + +(defcustom modus-themes-scale-headings nil + "Use font scaling for headings. + +For regular headings the scale is controlled by the variables +`modus-themes-scale-1' (smallest) and its variants all the way up +to `modus-themes-scale-4' (larger). While `modus-themes-scale-5' +is reserved for special headings that must be the largest on the +scale. + +A special heading is, in this context, one that does not fit into +the syntax for heading levels that apply to the given mode. For +example, Org's #+title keyword lies outside the normal eight +levels of headings. Whereas, say, Markdown does not have such a +special heading." + :group 'modus-themes + :package-version '(modus-themes . "1.2.0") + :version "28.1" + :type 'boolean + :link '(info-link "(modus-themes) Scaled headings")) + +(defcustom modus-themes-scale-1 1.05 + "Font size that is slightly larger than the base value. + +This size is used for level 4 headings, such as in Org and +Markdown files. + +The default value is a floating point that is interpreted as a +multiple of the base font size. It is recommended to use such a +value. + +However, the variable also accepts an integer, understood as an +absolute height that is 1/10 of the typeface's point size (e.g. a +value of 140 is the same as setting the font at 14 point size). +This will ignore the base font size and, thus, will not scale in +accordance with it in cases where it changes, such as while using +`text-scale-adjust'." + :group 'modus-themes + :package-version '(modus-themes . "1.2.0") + :version "28.1" + :type 'number + :link '(info-link "(modus-themes) Scaled heading sizes")) + +(defcustom modus-themes-scale-2 1.1 + "Font size slightly larger than `modus-themes-scale-1'. + +This size is used for level 3 headings, such as in Org and +Markdown files. + +The default value is a floating point that is interpreted as a +multiple of the base font size. It is recommended to use such a +value. + +However, the variable also accepts an integer, understood as an +absolute height that is 1/10 of the typeface's point size (e.g. a +value of 140 is the same as setting the font at 14 point size). +This will ignore the base font size and, thus, will not scale in +accordance with it in cases where it changes, such as while using +`text-scale-adjust'." + :group 'modus-themes + :package-version '(modus-themes . "1.2.0") + :version "28.1" + :type 'number + :link '(info-link "(modus-themes) Scaled heading sizes")) + +(defcustom modus-themes-scale-3 1.15 + "Font size slightly larger than `modus-themes-scale-2'. + +This size is used for level 2 headings, such as in Org and +Markdown files. + +The default value is a floating point that is interpreted as a +multiple of the base font size. It is recommended to use such a +value. + +However, the variable also accepts an integer, understood as an +absolute height that is 1/10 of the typeface's point size (e.g. a +value of 140 is the same as setting the font at 14 point size). +This will ignore the base font size and, thus, will not scale in +accordance with it in cases where it changes, such as while using +`text-scale-adjust'." + :group 'modus-themes + :package-version '(modus-themes . "1.2.0") + :version "28.1" + :type 'number + :link '(info-link "(modus-themes) Scaled heading sizes")) + +(defcustom modus-themes-scale-4 1.2 + "Font size slightly larger than `modus-themes-scale-3'. + +This size is used for level 1 headings, such as in Org and +Markdown files. + +The default value is a floating point that is interpreted as a +multiple of the base font size. It is recommended to use such a +value. + +However, the variable also accepts an integer, understood as an +absolute height that is 1/10 of the typeface's point size (e.g. a +value of 140 is the same as setting the font at 14 point size). +This will ignore the base font size and, thus, will not scale in +accordance with it in cases where it changes, such as while using +`text-scale-adjust'." + :group 'modus-themes + :package-version '(modus-themes . "1.2.0") + :version "28.1" + :type 'number + :link '(info-link "(modus-themes) Scaled heading sizes")) + +(defcustom modus-themes-scale-5 1.3 + "Font size slightly larger than `modus-themes-scale-4'. + +This size is only used for 'special' top level headings, such as +Org's file title heading, denoted by the #+title key word, and +the Org agenda structure headers. + +The default value is a floating point that is interpreted as a +multiple of the base font size. It is recommended to use such a +value. + +However, the variable also accepts an integer, understood as an +absolute height that is 1/10 of the typeface's point size (e.g. a +value of 140 is the same as setting the font at 14 point size). +This will ignore the base font size and, thus, will not scale in +accordance with it in cases where it changes, such as while using +`text-scale-adjust'." + :group 'modus-themes + :package-version '(modus-themes . "1.2.0") + :version "28.1" + :type 'number + :link '(info-link "(modus-themes) Scaled heading sizes")) + +(defcustom modus-themes-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." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :type '(choice + (const :tag "No visible fringes (default)" nil) + (const :tag "Subtle greyscale background" subtle) + (const :tag "Intense greyscale background" intense)) + :link '(info-link "(modus-themes) Fringes")) + +(defcustom modus-themes-lang-checkers nil + "Control the style of spelling and code checkers/linters. + +Nil (the default) applies a color-coded underline to the affected +text, while it leaves the original foreground in tact. If the +display spec of Emacs has support for it, the underline's style +is that of a wave, otherwise it is a straight line. + +Options `subtle-foreground' and `intense-foreground' add a +color-coded underline while also changing the text's foreground +accordingly. The style of the underline is the same as with the +default option. + +Option `straight-underline' is like the default but always +applies a straight line under the affected text. Same principle +for `subtle-foreground-straight-underline' and its counterpart +`intense-foreground-straight-underline'. + +Option `colored-background' uses a straight underline, a +background, and a foreground. All are color-coded. This is the +most intense combination of face properties." + :group 'modus-themes + :package-version '(modus-themes . "1.1.0") + :version "28.1" + :type '(choice + (const :tag "Only color-coded wavy underline (default)" nil) + (const :tag "Like the default, but with a straight underline" straight-underline) + (const :tag "Color-coded wavy underline; subtle foreground" subtle-foreground) + (const :tag "Combines `straight-underline' and `subtle-foreground'" subtle-foreground-straight-underline) + (const :tag "Color-coded wavy underline; intense foreground" intense-foreground) + (const :tag "Combines `straight-underline' and `intense-foreground'" intense-foreground-straight-underline) + (const :tag "Color-coded background, foreground, straight underline" colored-background)) + :link '(info-link "(modus-themes) Language checkers")) + +(defcustom modus-themes-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)." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :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)) + :link '(info-link "(modus-themes) Org mode blocks")) + +(defcustom modus-themes-org-habit nil + "Control the presentation of the `org-habit' graph. + +The default is meant to conform with the original aesthetic of +`org-habit'. It employs all four color codes that correspond to +the org-habit states---clear, ready, alert, and overdue---while +distinguishing between their present and future variants. This +results in a total of eight colors in use: red, yellow, green, +blue, in tinted and shaded versions. They cover the full set of +information provided by the `org-habit' consistency graph. + +Option `simplified' is like the default except that it removes +the dichotomy between current and future variants by applying +uniform color-coded values. It applies a total of four colors: +red, yellow, green, blue. They produce a simplified consistency +graph that is more legible (or less \"busy\") than the default. +The intent is to shift focus towards the distinction between the +four states of a habit task, rather than each state's +present/future outlook. + +Option `traffic-light' further reduces the available colors to +red, yellow, and green. As in `simplified', present and future +variants appear uniformly, but differently from it, the 'clear' +state is rendered in a green hue, instead of the original blue. +This is meant to capture the use-case where a habit task being +\"too early\" is less important than it being \"too late\". The +difference between ready and clear states is attenuated by +painting both of them using shades of green. This option thus +highlights the alert and overdue states." + :group 'modus-themes + :package-version '(modus-themes . "1.1.0") + :version "28.1" + :type '(choice + (const :tag "Respect the original design of org-habit (default)" nil) + (const :tag "Like the default, but do not distinguish between present and future variants" simplified) + (const :tag "Like `simplified', but only use red, yellow, green" traffic-light)) + :link '(info-link "(modus-themes) Org agenda habits")) + +(defcustom modus-themes-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. + +The `borderless' option uses the same colors as the default (nil +value), but removes the border effect. This is done by making +the box property use the same color as the background, +effectively blending the two and creating some padding. + +The `borderless-3d' and `borderless-moody' approximate the `3d' +and `moody' options respectively, while removing the borders. +However, to ensure that the inactive modelines remain visible, +they apply a slightly more prominent background to them than what +their counterparts do (same inactive background as with the +default)." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :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) + (const :tag "Like the default, but without border effects" borderless) + (const :tag "Like `3d', but without noticeable border" borderless-3d) + (const :tag "Like `moody', but without noticeable border" borderless-moody)) + :link '(info-link "(modus-themes) Mode line")) + +(defcustom modus-themes-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. + +Option `bg-only' applies a background but does not override the +text's foreground. This makes it suitable for a non-nil value +passed to `diff-font-lock-syntax' (note: Magit does not support +syntax highlighting in diffs as of 2020-11-25, version +20201116.1057). + +Option `deuteranopia' accounts for red-green color defficiency by +replacing all instances of green with colors on the blue side of +the spectrum. Other stylistic changes are made in the interest +of optimizing for such a use-case." + :group 'modus-themes + :package-version '(modus-themes . "1.2.0") + :version "28.1" + :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) + (const :tag "Apply color-coded backgrounds; keep syntax colors in tact" bg-only) + (const :tag "Optimized for red-green color defficiency" deuteranopia)) + :link '(info-link "(modus-themes) Diffs")) + +(defcustom modus-themes-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." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :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)) + :link '(info-link "(modus-themes) Completion UIs")) + +(defcustom modus-themes-prompts nil + "Use subtle or intense styles for minibuffer and REPL prompts. + +Nil means to only use an accented foreground color. + +Options `subtle-accented' and `intense-accented' will change both +the background and the foreground values to use accented color +combinations that follow the hue of the default styles' +foreground (e.g. the default minibuffer prompt is cyan text, so +these combinations will involved a cyan background and an +appropriate cyan foreground). + +Options `subtle-gray' and `intense-gray' are like their +`subtle-accented' and `intense-accented' counterparts, except +they use grayscale values instead of accented ones." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :type '(choice + ;; `subtle' is the same as `subtle-accented', while `intense' is + ;; equal to `intense-accented' for backward compatibility + (const :tag "No prompt background (default)" nil) + (const :tag "Subtle accented background for the prompt" subtle-accented) + (const :tag "Same as `subtle-accented' for compatibility with older versions" subtle) + (const :tag "Intense accented background and foreground for the prompt" intense-accented) + (const :tag "Same as `intense-accented' for compatibility with older versions" intense) + (const :tag "Like `subtle-accented' but grayscale" subtle-gray) + (const :tag "Like `intense-accented' but grayscale" intense-gray)) + :link '(info-link "(modus-themes) Command prompts")) + +(defcustom modus-themes-intense-hl-line nil + "Use a more prominent background for command `hl-line-mode'." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :type 'boolean + :link '(info-link "(modus-themes) Line highlighting")) + +(defcustom modus-themes-subtle-line-numbers nil + "Use more subtle style for command `display-line-numbers-mode'." + :group 'modus-themes + :package-version '(modus-themes . "1.2.0") + :version "28.1" + :type 'boolean + :link '(info-link "(modus-themes) Line numbers")) + +(defcustom modus-themes-paren-match nil + "Choose the style of matching parentheses or delimiters. + +Nil means to use a subtle tinted background color (the default). + +Option `intense' applies a saturated background color. + +Option `subtle-bold' is the same as the default, but also makes +use of bold typographic weight (inherits the `bold' face). + +Option `intense-bold' is the same as `intense', while it also +uses a bold weight." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :type '(choice + (const :tag "Sublte tinted background (default)" nil) + (const :tag "Like the default, but also use bold typographic weight" subtle-bold) + (const :tag "Intense saturated background" intense) + (const :tag "Like `intense' but with bold weight" intense-bold)) + :link '(info-link "(modus-themes) Matching parentheses")) + +(defcustom modus-themes-syntax nil + "Control the overall style of code syntax highlighting. + +Nil (the default) means to use colors on the cyan-blue-magenta +side of the spectrum. There is little to no use of greens, +yellows, and reds. + +Option `faint' is like the default in terms of the choice of +palette but applies desaturated color values. + +Option `yellow-comments' applies a yellow tint to comments. The +rest of the syntax is the same as the default. + +Option `green-strings' replaces the blue/cyan/cold color variants +in strings with greener alternatives. The rest of the syntax +remains the same. + +Option `yellow-comments-green-strings' combines yellow comments +with green strings and the rest of the default syntax +highlighting style. + +Option `alt-syntax' expands the color palette and applies new +color combinations. Strings are green. Doc strings are magenta +tinted. Comments are gray. + +Option `alt-syntax-yellow-comments' combines `alt-syntax' with +`yellow-comments'. + +Option `faint-yellow-comments' combines the `faint' style with +`yellow-comments'." + :group 'modus-themes + :package-version '(modus-themes . "1.2.0") + :version "28.1" + :type '(choice + (const :tag "Balanced use of blue, cyan, magenta, purple variants (default)" nil) + (const :tag "Like the default, but with desaturated color values" faint) + (const :tag "Apply yellow tint to comments, keep the default style for the rest" yellow-comments) + (const :tag "Use green for strings, keep the default style for the rest" green-strings) + (const :tag "Use green for strings, yellow for comments, keep the default style for the rest" yellow-comments-green-strings) + (const :tag "Refashion syntax highlighting with more colors, gray comments" alt-syntax) + (const :tag "Like `alt-syntax' but with yellow comments" alt-syntax-yellow-comments) + (const :tag "Like `faint' but with yellow comments" faint-yellow-comments)) + :link '(info-link "(modus-themes) Syntax styles")) + +(defcustom modus-themes-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, while +retaining their original fairly vivid color. + +Option `underline-only' applies an underline while making the +affected text colorless (it uses the same foreground as the +theme's default). + +Option `neutral-underline-only' makes the text colorless while +using a subtle underline below it." + :group 'modus-themes + :package-version '(modus-themes . "1.2.0") + :version "28.1" + :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) + (const :tag "Apply underline only; use default foreground" underline-only) + (const :tag "Like `underline-only' but with a subtle underline" neutral-underline-only)) + :link '(info-link "(modus-themes) Link styles")) + +(defcustom modus-themes-region nil + "Change the overall appearance of the active region. + +Nil (the default) means to only use a prominent gray background +with a neutral foreground. The foreground overrides all syntax +highlighting. The region extends to the edge of the window. + +Option `no-extend' preserves the default aesthetic but prevents +the region from extending to the edge of the window. + +Option `bg-only' applies a faint tinted background that is +distinct from all others used in the theme, while it does not +override any existing colors. It extends to the edge of the +window. + +Option `bg-only-no-extend' is a combination of the `bg-only' and +`no-extend' options." + :group 'modus-themes + :package-version '(modus-themes . "1.0.0") + :version "28.1" + :type '(choice + (const :tag "Intense background; overrides colors; extends to edge of window (default)" nil) + (const :tag "As with the default, but does not extend" no-extend) + (const :tag "Subtle background; preserves colors; extends to edge of window" bg-only) + (const :tag "As with the `subtle' option, but does not extend" bg-only-no-extend)) + :link '(info-link "(modus-themes) Active region")) + + + +;;;; Deprecated customization options (prior to 1.0.0) + +;;;;; Modus Operandi obsolete options + +(make-obsolete 'modus-operandi-theme-override-colors-alist nil "1.0.0") +(make-obsolete 'modus-operandi-theme-slanted-constructs 'modus-themes-slanted-constructs "1.0.0") +(make-obsolete 'modus-operandi-theme-bold-constructs 'modus-themes-bold-constructs "1.0.0") +(make-obsolete 'modus-operandi-theme-proportional-fonts 'modus-themes-variable-pitch-headings "1.0.0") +(make-obsolete 'modus-operandi-theme-variable-pitch-headings 'modus-themes-variable-pitch-headings "1.0.0") +(make-obsolete 'modus-operandi-theme-no-mixed-fonts 'modus-themes-no-mixed-fonts "1.0.0") +(make-obsolete 'modus-operandi-theme-rainbow-headings 'modus-themes-headings "1.0.0") +(make-obsolete 'modus-operandi-theme-section-headings 'modus-themes-headings "1.0.0") +(make-obsolete 'modus-operandi-theme-headings 'modus-themes-headings "1.0.0") +(make-obsolete 'modus-operandi-theme-scale-headings 'modus-themes-scale-headings "1.0.0") +(make-obsolete 'modus-operandi-theme-scale-1 'modus-themes-scale-1 "1.0.0") +(make-obsolete 'modus-operandi-theme-scale-2 'modus-themes-scale-2 "1.0.0") +(make-obsolete 'modus-operandi-theme-scale-3 'modus-themes-scale-3 "1.0.0") +(make-obsolete 'modus-operandi-theme-scale-4 'modus-themes-scale-4 "1.0.0") +(make-obsolete 'modus-operandi-theme-scale-5 'modus-themes-scale-5 "1.0.0") +(make-obsolete 'modus-operandi-theme-visible-fringes 'modus-themes-fringes "1.0.0") +(make-obsolete 'modus-operandi-theme-fringes 'modus-themes-fringes "1.0.0") +(make-obsolete 'modus-operandi-theme-distinct-org-blocks 'modus-themes-org-blocks "1.0.0") +(make-obsolete 'modus-operandi-theme-rainbow-org-src-blocks 'modus-themes-org-blocks "1.0.0") +(make-obsolete 'modus-operandi-theme-org-blocks 'modus-themes-org-blocks "1.0.0") +(make-obsolete 'modus-operandi-theme-3d-modeline 'modus-themes-mode-line "1.0.0") +(make-obsolete 'modus-operandi-theme-mode-line 'modus-themes-mode-line "1.0.0") +(make-obsolete 'modus-operandi-theme-subtle-diffs 'modus-themes-diffs "1.0.0") +(make-obsolete 'modus-operandi-theme-diffs 'modus-themes-diffs "1.0.0") +(make-obsolete 'modus-operandi-theme-intense-standard-completions 'modus-themes-completions "1.0.0") +(make-obsolete 'modus-operandi-theme-completions 'modus-themes-completions "1.0.0") +(make-obsolete 'modus-operandi-theme-prompts 'modus-themes-prompts "1.0.0") +(make-obsolete 'modus-operandi-theme-intense-hl-line 'modus-themes-intense-hl-line "1.0.0") +(make-obsolete 'modus-operandi-theme-intense-paren-match 'modus-themes-paren-match "1.0.0") +(make-obsolete 'modus-operandi-theme-faint-syntax 'modus-themes-syntax "1.0.0") +(make-obsolete 'modus-operandi-theme-comments 'modus-themes-syntax "1.0.0") +(make-obsolete 'modus-operandi-theme-syntax 'modus-themes-syntax "1.0.0") +(make-obsolete 'modus-operandi-theme-no-link-underline 'modus-themes-links "1.0.0") +(make-obsolete 'modus-operandi-theme-links 'modus-themes-links "1.0.0") + +;;;;; Modus Vivendi obsolete options + +(make-obsolete 'modus-vivendi-theme-override-colors-alist nil "1.0.0") +(make-obsolete 'modus-vivendi-theme-slanted-constructs 'modus-themes-slanted-constructs "1.0.0") +(make-obsolete 'modus-vivendi-theme-bold-constructs 'modus-themes-bold-constructs "1.0.0") +(make-obsolete 'modus-vivendi-theme-proportional-fonts 'modus-themes-variable-pitch-headings "1.0.0") +(make-obsolete 'modus-vivendi-theme-variable-pitch-headings 'modus-themes-variable-pitch-headings "1.0.0") +(make-obsolete 'modus-vivendi-theme-no-mixed-fonts 'modus-themes-no-mixed-fonts "1.0.0") +(make-obsolete 'modus-vivendi-theme-rainbow-headings 'modus-themes-headings "1.0.0") +(make-obsolete 'modus-vivendi-theme-section-headings 'modus-themes-headings "1.0.0") +(make-obsolete 'modus-vivendi-theme-headings 'modus-themes-headings "1.0.0") +(make-obsolete 'modus-vivendi-theme-scale-headings 'modus-themes-scale-headings "1.0.0") +(make-obsolete 'modus-vivendi-theme-scale-1 'modus-themes-scale-1 "1.0.0") +(make-obsolete 'modus-vivendi-theme-scale-2 'modus-themes-scale-2 "1.0.0") +(make-obsolete 'modus-vivendi-theme-scale-3 'modus-themes-scale-3 "1.0.0") +(make-obsolete 'modus-vivendi-theme-scale-4 'modus-themes-scale-4 "1.0.0") +(make-obsolete 'modus-vivendi-theme-scale-5 'modus-themes-scale-5 "1.0.0") +(make-obsolete 'modus-vivendi-theme-visible-fringes 'modus-themes-fringes "1.0.0") +(make-obsolete 'modus-vivendi-theme-fringes 'modus-themes-fringes "1.0.0") +(make-obsolete 'modus-vivendi-theme-distinct-org-blocks 'modus-themes-org-blocks "1.0.0") +(make-obsolete 'modus-vivendi-theme-rainbow-org-src-blocks 'modus-themes-org-blocks "1.0.0") +(make-obsolete 'modus-vivendi-theme-org-blocks 'modus-themes-org-blocks "1.0.0") +(make-obsolete 'modus-vivendi-theme-3d-modeline 'modus-themes-mode-line "1.0.0") +(make-obsolete 'modus-vivendi-theme-mode-line 'modus-themes-mode-line "1.0.0") +(make-obsolete 'modus-vivendi-theme-subtle-diffs 'modus-themes-diffs "1.0.0") +(make-obsolete 'modus-vivendi-theme-diffs 'modus-themes-diffs "1.0.0") +(make-obsolete 'modus-vivendi-theme-intense-standard-completions 'modus-themes-completions "1.0.0") +(make-obsolete 'modus-vivendi-theme-completions 'modus-themes-completions "1.0.0") +(make-obsolete 'modus-vivendi-theme-prompts 'modus-themes-prompts "1.0.0") +(make-obsolete 'modus-vivendi-theme-intense-hl-line 'modus-themes-intense-hl-line "1.0.0") +(make-obsolete 'modus-vivendi-theme-intense-paren-match 'modus-themes-paren-match "1.0.0") +(make-obsolete 'modus-vivendi-theme-faint-syntax 'modus-themes-syntax "1.0.0") +(make-obsolete 'modus-vivendi-theme-comments 'modus-themes-syntax "1.0.0") +(make-obsolete 'modus-vivendi-theme-syntax 'modus-themes-syntax "1.0.0") +(make-obsolete 'modus-vivendi-theme-no-link-underline 'modus-themes-links "1.0.0") +(make-obsolete 'modus-vivendi-theme-links 'modus-themes-links "1.0.0") + + + +;;; Internal functions + +(defun modus-themes--palette (theme) + "Return color palette for Modus theme THEME. +THEME is a symbol, either `modus-operandi' or `modus-vivendi'." + (pcase theme + ('modus-operandi + (append modus-themes-operandi-color-overrides + modus-themes-operandi-colors)) + ('modus-vivendi + (append modus-themes-vivendi-color-overrides + modus-themes-vivendi-colors)) + (_theme + (error "'%s' is not a Modus theme" theme)))) + +(defvar modus-themes-faces) +(defvar modus-themes-custom-variables) + +(defmacro modus-themes-theme (name) + "Bind NAME's color palette around face specs and variables. + +NAME should be the proper name of a Modus theme, either +`modus-operandi' or `modus-vivendi'. + +Face specifications are passed to `custom-theme-set-faces'. +While variables are handled by `custom-theme-set-variables'. +Those are stored in `modus-themes-faces' and +`modus-themes-custom-variables' respectively." + (declare (indent 0)) + (let ((palette-sym (gensym)) + (colors (mapcar #'car modus-themes-operandi-colors))) + `(let* ((class '((class color) (min-colors 89))) + (,palette-sym (modus-themes--palette ',name)) + ,@(mapcar (lambda (color) + (list color `(alist-get ',color ,palette-sym))) + colors)) + (custom-theme-set-faces ',name ,@modus-themes-faces) + (custom-theme-set-variables ',name ,@modus-themes-custom-variables)))) + +(defun modus-themes--current-theme () + "Return current theme." + (car custom-enabled-themes)) + +;; Helper functions that are meant to ease the implementation of the +;; above customization options. +(defun modus-themes--bold-weight () + "Conditional use of a heavier text weight." + (when modus-themes-bold-constructs + (list :inherit 'bold))) + +(defun modus-themes--mixed-fonts () + "Conditional application of `fixed-pitch' inheritance." + (unless modus-themes-no-mixed-fonts + (list :inherit 'fixed-pitch))) + +(defun modus-themes--slant () + "Conditional use of italics for slant attribute." + (if modus-themes-slanted-constructs + (list 'italic) + (list 'normal))) + +(defun modus-themes--variable-pitch () + "Conditional use of `variable-pitch' in headings." + (when modus-themes-variable-pitch-headings + (list :inherit 'variable-pitch))) + +(defun modus-themes--variable-pitch-ui () + "Conditional use of `variable-pitch' in UI elements." + (when modus-themes-variable-pitch-ui + (list :inherit 'variable-pitch))) + +(defun modus-themes--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-themes-fringes + ('intense (list :background intensebg)) + ('subtle (list :background subtlebg)) + (_ (list :background mainbg)))) + +(defun modus-themes--line-numbers (mainfg mainbg altfg &optional altbg) + "Conditional use of colors for line numbers. +MAINBG and MAINFG are the default colors. ALTFG is a color that +combines with the theme's primary background (white/black)." + (if modus-themes-subtle-line-numbers + (list :background (or altbg 'unspecified) :foreground altfg) + (list :background mainbg :foreground mainfg))) + +(defun modus-themes--lang-check (underline subtlefg intensefg bg) + "Conditional use of foreground colors for language checkers. +UNDERLINE is a color-code value for the affected text's underline +property. SUBTLEFG and INTENSEFG follow the same color-coding +pattern and represent a value that is faint or vibrant +respectively. BG is a color-coded background." + (pcase modus-themes-lang-checkers + ('colored-background + (list :underline underline :background bg :foreground intensefg)) + ('intense-foreground + (list :underline (list :color underline :style 'wave) :foreground intensefg)) + ('intense-foreground-straight-underline + (list :underline underline :foreground intensefg)) + ('subtle-foreground + (list :underline (list :color underline :style 'wave) :foreground subtlefg)) + ('subtle-foreground-straight-underline + (list :underline underline :foreground subtlefg)) + ('straight-underline + (list :underline underline)) + (_ (list :underline (list :color underline :style 'wave))))) + +(defun modus-themes--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-themes-prompts + ;; `subtle' is the same as `subtle-accented', while `intense' is + ;; equal to `intense-accented' for backward compatibility + ('intense-accented (list :background intensebg :foreground intensefg)) + ('intense (list :background intensebg :foreground intensefg)) + ('subtle-accented (list :background subtlebg :foreground subtlefg)) + ('subtle (list :background subtlebg :foreground subtlefg)) + ('subtle-gray (list :inherit 'modus-theme-subtle-neutral)) + ('intense-gray (list :inherit 'modus-theme-intense-neutral)) + (_ (list :background nil :foreground mainfg)))) + +(defun modus-themes--paren (normalbg intensebg) + "Conditional use of intense colors for matching parentheses. +NORMALBG should be 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'." + (pcase modus-themes-paren-match + ('subtle-bold (list :inherit 'bold :background normalbg)) + ('intense-bold (list :inherit 'bold :background intensebg)) + ('intense (list :background intensebg)) + (_ (list :background normalbg)))) + +(defun modus-themes--syntax-foreground (fg faint) + "Apply foreground value to code syntax. +FG is the default. FAINT is typically the same color in its +desaturated version." + (pcase modus-themes-syntax + ('faint (list :foreground faint)) + ('faint-yellow-comments (list :foreground faint)) + (_ (list :foreground fg)))) + +(defun modus-themes--syntax-extra (fg faint alt) + "Apply foreground value to code syntax. +FG is the default. FAINT is typically the same color in its +desaturated version. ALT is another hue." + (pcase modus-themes-syntax + ('faint (list :foreground faint)) + ('faint-yellow-comments (list :foreground faint)) + ('alt-syntax (list :foreground alt)) + ('alt-syntax-yellow-comments (list :foreground alt)) + (_ (list :foreground fg)))) + +(defun modus-themes--syntax-string (fg faint green alt) + "Apply foreground value to strings in code syntax. +FG is the default. FAINT is typically the same color in its +desaturated version. GREEN is a color variant in that side of +the spectrum. ALT is another hue." + (pcase modus-themes-syntax + ('faint (list :foreground faint)) + ('faint-yellow-comments (list :foreground faint)) + ('green-strings (list :foreground green)) + ('yellow-comments-green-strings (list :foreground alt)) + ('alt-syntax (list :foreground alt)) + ('alt-syntax-yellow-comments (list :foreground alt)) + (_ (list :foreground fg)))) + +(defun modus-themes--syntax-docstring (fg faint green alt) + "Apply foreground value to strings in code syntax. +FG is the default. FAINT is typically the same color in its +desaturated version. GREEN is a color variant in that side of +the spectrum. ALT is another hue." + (pcase modus-themes-syntax + ('faint (list :foreground faint)) + ('faint-yellow-comments (list :foreground faint)) + ('green-strings (list :foreground green)) + ('yellow-comments-green-strings (list :foreground green)) + ('alt-syntax (list :foreground alt)) + ('alt-syntax-yellow-comments (list :foreground alt)) + (_ (list :foreground fg)))) + +(defun modus-themes--syntax-comment (fg yellow) + "Apply foreground value to strings in code syntax. +FG is the default. YELLOW is a color variant of that name." + (pcase modus-themes-syntax + ('yellow-comments (list :foreground yellow)) + ('yellow-comments-green-strings (list :foreground yellow)) + ('alt-syntax-yellow-comments (list :foreground yellow)) + ('faint-yellow-comments (list :foreground yellow)) + (_ (list :foreground fg)))) + +(defun modus-themes--heading-p (key) + "Query style of KEY in `modus-themes-headings'." + (cdr (assoc key modus-themes-headings))) + +(defun modus-themes--heading (level fg fg-alt bg border) + "Conditional styles for `modus-themes-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-themes--heading-p `,level)) + (style (or key (modus-themes--heading-p t))) + (var (when modus-themes-variable-pitch-headings + 'variable-pitch)) + (varbold (if var + (append (list 'bold) (list var)) + 'bold))) + (pcase style + ('no-bold + (list :inherit `,var :foreground fg)) + ('no-color + (list :inherit `,varbold)) + ('no-color-no-bold + (list :inherit `,var)) + ('line + (list :inherit `,varbold :foreground fg :overline border)) + ('line-no-bold + (list :inherit `,var :foreground fg :overline border)) + ('rainbow + (list :inherit `,varbold :foreground fg-alt)) + ('rainbow-no-bold + (list :inherit `,var :foreground fg-alt)) + ('rainbow-line + (list :inherit `,varbold :foreground fg-alt :overline border)) + ('rainbow-line-no-bold + (list :inherit `,var :foreground fg-alt :overline border)) + ('highlight + (list :inherit `,varbold :background bg :foreground fg)) + ('highlight-no-bold + (list :inherit `,var :background bg :foreground fg)) + ('rainbow-highlight + (list :inherit `,varbold :background bg :foreground fg-alt)) + ('rainbow-highlight-no-bold + (list :inherit `,var :background bg :foreground fg-alt)) + ('section + (list :inherit `,varbold :background bg :foreground fg :overline border :extend t)) + ('section-no-bold + (list :inherit `,var :background bg :foreground fg :overline border :extend t)) + ('rainbow-section + (list :inherit `,varbold :background bg :foreground fg-alt :overline border :extend t)) + ('rainbow-section-no-bold + (list :inherit `,var :background bg :foreground fg-alt :overline border :extend t)) + (_ + (list :inherit `,varbold :foreground fg))))) + +(defun modus-themes--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-themes-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-themes-org-blocks 'grayscale) + (eq modus-themes-org-blocks 'greyscale)) + (list :background bgblk :extend t) + (list :background 'unspecified))) + +(defun modus-themes--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-themes-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-themes-org-blocks' is +set to `rainbow'." + (pcase modus-themes-org-blocks + ('grayscale (list :background bg :foreground fg :extend t)) + ('greyscale (list :background bg :foreground fg :extend t)) + ('rainbow (list :background bgaccent :foreground fgaccent)) + (_ (list :background bg :foreground fg)))) + +(defun modus-themes--org-habit (default &optional traffic simple) + "Specify background values for `modus-themes-org-habit'. +If no optional TRAFFIC argument is supplied, the DEFAULT is used +instead. Same for SIMPLE." + (pcase modus-themes-org-habit + ('traffic-light (list :background (or traffic default))) + ('simplified (list :background (or simple default))) + (_ (list :background default)))) + +(defun modus-themes--mode-line-attrs + (fg bg fg-alt bg-alt border border-3d &optional alt-style border-width fg-distant) + "Color combinations for `modus-themes-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-themes-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)) + ('borderless + `(:foreground ,fg :background ,bg :box ,bg)) + ('borderless-3d + `(:foreground ,fg :background ,bg + :box (:line-width ,(or border-width 1) + :color ,bg + :style ,(and alt-style 'released-button)))) + ('borderless-moody + `(:background ,bg :foreground ,fg + :underline ,bg :overline ,bg + :distant-foreground ,fg-distant)) + (_ + `(:foreground ,fg :background ,bg :box ,border)))) + +(defun modus-themes--diff + (fg-only-bg fg-only-fg mainbg mainfg altbg altfg &optional deuteranbg deuteranfg bg-only-fg) + "Color combinations for `modus-themes-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. + +DEUTERANBG and DEUTERANFG must be combinations of colors that account +for red-green color defficiency (deuteranopia). + +Optional BG-ONLY-FG applies ALTFG else leaves the foreground +unspecified." + (pcase modus-themes-diffs + ('fg-only (list :background fg-only-bg :foreground fg-only-fg)) + ('desaturated (list :background altbg :foreground altfg)) + ('deuteranopia (list :background (or deuteranbg mainbg) :foreground (or deuteranfg mainfg))) + ('bg-only (list :background altbg :foreground (if bg-only-fg altfg 'unspecified))) + (_ (list :background mainbg :foreground mainfg)))) + +(defun modus-themes--diff-deuteran (deuteran main) + "Determine whether the DEUTERAN or MAIN color should be used. +This is based on whether `modus-themes-diffs' has the value +`deuteranopia'." + (if (eq modus-themes-diffs 'deuteranopia) + (list deuteran) + (list main))) + +(defun modus-themes--diff-text (fg-only-fg default-fg) + "Like `modus-themes--diff', but only for foregrounds. +FG-ONLY-FG is the foreground that is used when diffs are styled +using only foreground colors. DEFAULT-FG covers all other +cases." + (pcase modus-themes-diffs + ('fg-only (list :foreground fg-only-fg)) + ('bg-only (list :foreground 'unspecified)) + (_ (list :foreground default-fg)))) + +(defun modus-themes--standard-completions (mainfg subtlebg intensebg intensefg) + "Combinations for `modus-themes-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-themes-completions + ('opinionated (list :background intensebg :foreground intensefg)) + ('moderate (list :background subtlebg :foreground mainfg)) + (_ (list :foreground mainfg)))) + +(defun modus-themes--extra-completions (subtleface intenseface altface &optional altfg bold) + "Combinations for `modus-themes-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-themes-completions + ('opinionated (list :inherit (list altface bold) + :foreground (or altfg 'unspecified))) + ('moderate (list :inherit (list subtleface bold))) + (_ (list :inherit (list intenseface bold))))) + +(defun modus-themes--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-themes-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)) + ('underline-only (list :underline t)) + ('neutral-underline-only (list :underline underline)) + (_ (list :foreground fg :underline t)))) + +(defun modus-themes--link-color (fg fgfaint &optional neutralfg) + "Extends `modus-themes--link'. +FG is the main accented foreground. FGFAINT is also accented, +yet desaturated. Optional NEUTRALFG is a gray value." + (pcase modus-themes-links + ('faint (list :foreground fgfaint)) + ('faint-neutral-underline (list :foreground fgfaint)) + ('underline-only (list :underline t :foreground (or neutralfg 'unspecified))) + ('neutral-underline-only (list :underline 'unspecified :foreground (or neutralfg 'unspecified))) + (_ (list :foreground fg)))) + +(defun modus-themes--scale (amount) + "Scale heading by AMOUNT. +AMOUNT is a customization option." + (when modus-themes-scale-headings + (list :height amount))) + +(defun modus-themes--region (bg fg bgsubtle) + "Apply `modus-themes-region' styles. + +BG and FG are the main values that are used by default. BGSUBTLE +is a subtle background value that can be combined with all colors +used to fontify text and code syntax." + (pcase modus-themes-region + ('bg-only (list :background bgsubtle)) + ('bg-only-no-extend (list :background bgsubtle :extend nil)) + ('no-extend (list :background bg :foreground fg :extend nil)) + (_ (list :background bg :foreground fg)))) + + + +;;;; Utilities for DIY users + +;; This is the WCAG formula: https://www.w3.org/TR/WCAG20-TECHS/G18.html +(defun modus-themes-wcag-formula (hex) + "Get WCAG value of color value HEX. +The value is defined in hexadecimal RGB notation, such as those in +`modus-themes-operandi-colors' and `modus-themes-vivendi-colors'." + (cl-loop for k in '(0.2126 0.7152 0.0722) + for x in (color-name-to-rgb hex) + sum (* k (if (<= x 0.03928) + (/ x 12.92) + (expt (/ (+ x 0.055) 1.055) 2.4))))) + +;;;###autoload +(defun modus-themes-contrast (c1 c2) + "Measure WCAG contrast ratio between C1 and C2. +C1 and C2 are color values written in hexadecimal RGB." + (let ((ct (/ (+ (modus-themes-wcag-formula c1) 0.05) + (+ (modus-themes-wcag-formula c2) 0.05)))) + (max ct (/ ct)))) + +(defun modus-themes-current-palette () + "Return current color palette." + (modus-themes--palette (modus-themes--current-theme))) + +;;;###autoload +(defun modus-themes-color (color) + "Return color value for COLOR from current palette. +COLOR is a key in `modus-themes-operandi-colors' or +`modus-themes-vivendi-colors'." + (alist-get color (modus-themes-current-palette))) + +;;;###autoload +(defun modus-themes-color-alts (light-color dark-color) + "Return color value from current palette. +When Modus Operandi is enabled, return color value for color +LIGHT-COLOR. When Modus Vivendi is enabled, return color value +for DARK-COLOR. LIGHT-COLOR and DARK-COLOR are keys in +`modus-themes-operandi-colors' or `modus-themes-vivendi-colors'." + (let* ((theme (modus-themes--current-theme)) + (color (pcase theme + ('modus-operandi light-color) + ('modus-vivendi dark-color) + (_theme + (error "'%s' is not a Modus theme" theme))))) + (alist-get color (modus-themes--palette theme)))) + +(defmacro modus-themes-with-colors (&rest body) + "Evaluate BODY with colors from current palette bound. +For colors bound, see `modus-themes-operandi-colors' or +`modus-themes-vivendi-colors'." + (declare (indent 0)) + (let ((palette-sym (gensym)) + (colors (mapcar #'car modus-themes-operandi-colors))) + `(let* ((class '((class color) (min-colors 89))) + (,palette-sym (modus-themes-current-palette)) + ,@(mapcar (lambda (color) + (list color `(alist-get ',color ,palette-sym))) + colors)) + (ignore class ,@colors) ; Silence unused variable warnings + ,@body))) + + + +;;;; Commands + +;;;###autoload +(defun modus-themes-load-themes () + "Ensure that the Modus themes are in `custom-enabled-themes'. + +This function is intended for use in package declarations such as +those defined with the help of `use-package'. The idea is to add +this function to the `:init' stage of the package's loading, so +that subsequent calls that assume the presence of a loaded theme, +like `modus-themes-toggle' or `modus-themes-load-operandi', will +continue to work as intended even if they are lazy-loaded (such +as when they are declared in the `:config' phase)." + (unless (or (custom-theme-p 'modus-operandi) + (custom-theme-p 'modus-vivendi)) + (load-theme 'modus-operandi t t) + (load-theme 'modus-vivendi t t))) + +(defvar modus-themes-after-load-theme-hook nil + "Hook that runs after the `modus-themes-toggle' routines.") + +;; The reason we use `load-theme' instead of `enable-theme' is that the +;; former does a kind of "reset" on the face specs. So it plays nicely +;; with `custom-set-faces', as well as defcustom user customizations, +;; including the likes of `modus-themes-operandi-color-overrides'. +;; +;; Tests show that `enable-theme' does not re-read those variables, so +;; it might appear to the unsuspecting user that the themes are somehow +;; broken. +;; +;; This "reset", however, comes at the cost of being a bit slower than +;; `enable-theme'. User who have a stable setup and seldom update their +;; variables during a given Emacs session, are better off using +;; something like this: +;; +;; (defun modus-themes-toggle-enabled () +;; "Toggle between `modus-operandi' and `modus-vivendi' themes." +;; (interactive) +;; (pcase (modus-themes--current-theme) +;; ('modus-operandi (progn (enable-theme 'modus-vivendi) +;; (disable-theme 'modus-operandi))) +;; ('modus-vivendi (progn (enable-theme 'modus-operandi) +;; (disable-theme 'modus-vivendi))) +;; (_ (error "No Modus theme is loaded; evaluate `modus-themes-load-themes' first")))) + +;;;###autoload +(defun modus-themes-load-operandi () + "Load `modus-operandi' and disable `modus-vivendi'. +Also run `modus-themes-after-load-theme-hook'." + (disable-theme 'modus-vivendi) + (load-theme 'modus-operandi t) + (run-hooks 'modus-themes-after-load-theme-hook)) + +;;;###autoload +(defun modus-themes-load-vivendi () + "Load `modus-vivendi' and disable `modus-operandi'. +Also run `modus-themes-after-load-theme-hook'." + (disable-theme 'modus-operandi) + (load-theme 'modus-vivendi t) + (run-hooks 'modus-themes-after-load-theme-hook)) + +(defun modus-themes--load-prompt () + "Helper for `modus-themes-toggle'." + (let ((theme + (intern + (completing-read "Load Modus theme (will disable all others): " + '(modus-operandi modus-vivendi) nil t)))) + (mapc #'disable-theme custom-enabled-themes) + (pcase theme + ('modus-operandi (modus-themes-load-operandi)) + ('modus-vivendi (modus-themes-load-vivendi))))) + +;;;###autoload +(defun modus-themes-toggle () + "Toggle between `modus-operandi' and `modus-vivendi' themes. +Also runs `modus-themes-after-load-theme-hook' at its last stage +by virtue of calling either of `modus-themes-load-operandi' and +`modus-themes-load-vivendi' functions." + (interactive) + (modus-themes-load-themes) + (pcase (modus-themes--current-theme) + ('modus-operandi (modus-themes-load-vivendi)) + ('modus-vivendi (modus-themes-load-operandi)) + (_ (modus-themes--load-prompt)))) + + + +;;;; Face specifications + +(defconst modus-themes-faces + '( +;;;; 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 :extend t))) + `(modus-theme-nuanced-green ((,class :background ,green-nuanced-bg :extend t))) + `(modus-theme-nuanced-yellow ((,class :background ,yellow-nuanced-bg :extend t))) + `(modus-theme-nuanced-blue ((,class :background ,blue-nuanced-bg :extend t))) + `(modus-theme-nuanced-magenta ((,class :background ,magenta-nuanced-bg :extend t))) + `(modus-theme-nuanced-cyan ((,class :background ,cyan-nuanced-bg :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-themes--diff + bg-main green + bg-diff-focus-added fg-diff-focus-added + green-nuanced-bg fg-diff-added + bg-diff-focus-added-deuteran fg-diff-focus-added-deuteran)))) + `(modus-theme-diff-changed + ((,class ,@(modus-themes--diff + bg-main yellow + bg-diff-focus-changed fg-diff-focus-changed + yellow-nuanced-bg fg-diff-changed)))) + `(modus-theme-diff-removed + ((,class ,@(modus-themes--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-themes--diff + bg-diff-added fg-diff-added + bg-diff-refine-added fg-diff-refine-added + bg-diff-focus-added fg-diff-focus-added + bg-diff-refine-added-deuteran fg-diff-refine-added-deuteran)))) + `(modus-theme-diff-refine-changed + ((,class ,@(modus-themes--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-themes--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-themes--diff + bg-dim green + bg-diff-focus-added fg-diff-focus-added + bg-diff-added fg-diff-added + bg-diff-focus-added-deuteran fg-diff-focus-added-deuteran)))) + `(modus-theme-diff-focus-changed + ((,class ,@(modus-themes--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-themes--diff + bg-dim red + bg-diff-focus-removed fg-diff-focus-removed + bg-diff-removed fg-diff-removed)))) + `(modus-theme-diff-heading + ((,class ,@(modus-themes--diff + bg-main blue + bg-diff-heading fg-diff-heading + cyan-nuanced-bg cyan-nuanced-fg + bg-header fg-main + t)))) +;;;;; 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-themes--heading + 1 fg-main magenta-alt-other magenta-nuanced-bg bg-region) + ,@(modus-themes--scale modus-themes-scale-4)))) + `(modus-theme-heading-2 + ((,class ,@(modus-themes--heading + 2 fg-special-warm magenta-alt red-nuanced-bg bg-region) + ,@(modus-themes--scale modus-themes-scale-3)))) + `(modus-theme-heading-3 + ((,class ,@(modus-themes--heading + 3 fg-special-cold blue blue-nuanced-bg bg-region) + ,@(modus-themes--scale modus-themes-scale-2)))) + `(modus-theme-heading-4 + ((,class ,@(modus-themes--heading + 4 fg-special-mild cyan cyan-nuanced-bg bg-region) + ,@(modus-themes--scale modus-themes-scale-1)))) + `(modus-theme-heading-5 + ((,class ,@(modus-themes--heading + 5 fg-special-calm green-alt-other green-nuanced-bg bg-region)))) + `(modus-theme-heading-6 + ((,class ,@(modus-themes--heading + 6 yellow-nuanced-fg yellow-alt-other yellow-nuanced-bg bg-region)))) + `(modus-theme-heading-7 + ((,class ,@(modus-themes--heading + 7 red-nuanced-fg red-alt red-nuanced-bg bg-region)))) + `(modus-theme-heading-8 + ((,class ,@(modus-themes--heading + 8 fg-dim magenta bg-alt bg-region)))) +;;;;; graph-specific faces + `(modus-theme-graph-red-0 ((,class :background ,red-graph-0-bg))) + `(modus-theme-graph-red-1 ((,class :background ,red-graph-1-bg))) + `(modus-theme-graph-green-0 ((,class :background ,green-graph-0-bg))) + `(modus-theme-graph-green-1 ((,class :background ,green-graph-1-bg))) + `(modus-theme-graph-yellow-0 ((,class :background ,yellow-graph-0-bg))) + `(modus-theme-graph-yellow-1 ((,class :background ,yellow-graph-1-bg))) + `(modus-theme-graph-blue-0 ((,class :background ,blue-graph-0-bg))) + `(modus-theme-graph-blue-1 ((,class :background ,blue-graph-1-bg))) + `(modus-theme-graph-magenta-0 ((,class :background ,magenta-graph-0-bg))) + `(modus-theme-graph-magenta-1 ((,class :background ,magenta-graph-1-bg))) + `(modus-theme-graph-cyan-0 ((,class :background ,cyan-graph-0-bg))) + `(modus-theme-graph-cyan-1 ((,class :background ,cyan-graph-1-bg))) +;;;;; language checkers + `(modus-theme-lang-error ((,class ,@(modus-themes--lang-check fg-lang-underline-error fg-lang-error red red-nuanced-bg)))) + `(modus-theme-lang-note ((,class ,@(modus-themes--lang-check fg-lang-underline-note fg-lang-note blue-alt blue-nuanced-bg)))) + `(modus-theme-lang-warning ((,class ,@(modus-themes--lang-check fg-lang-underline-warning fg-lang-warning yellow yellow-nuanced-bg)))) +;;;;; other custom faces + `(modus-theme-bold ((,class ,@(modus-themes--bold-weight)))) + `(modus-theme-hl-line ((,class :background ,(if modus-themes-intense-hl-line + bg-hl-line-intense bg-hl-line) + :extend t))) + `(modus-theme-slant ((,class :inherit italic :slant ,@(modus-themes--slant)))) + `(modus-theme-variable-pitch ((,class ,@(modus-themes--variable-pitch)))) +;;;; standard faces +;;;;; absolute essentials + `(default ((,class :background ,bg-main :foreground ,fg-main))) + `(cursor ((,class :background ,fg-main))) + `(fringe ((,class ,@(modus-themes--fringe bg-main bg-inactive bg-active) + :foreground ,fg-main))) + `(vertical-border ((,class :foreground ,fg-window-divider-inner))) +;;;;; basic and/or ungrouped styles + `(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-themes--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 ,@(modus-themes--variable-pitch-ui) + :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 ,red-alt-faint))) + `(ibuffer-locked-buffer ((,class :foreground ,yellow-alt-other-faint))) + `(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-themes--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 ,@(modus-themes--region bg-region fg-main bg-hl-alt-intense)))) + `(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-themes--link + blue-alt-other blue-alt-other-faint bg-region)))) + `(link ((,class :inherit button))) + `(link-visited ((,class :inherit button + ,@(modus-themes--link-color + magenta-alt-other magenta-alt-other-faint fg-alt)))) + `(tooltip ((,class :background ,bg-special-cold :foreground ,fg-main))) + `(widget-button ((,class :inherit button))) + `(widget-button-pressed ((,class :inherit button + ,@(modus-themes--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-themes--link-color + magenta-alt-other magenta-alt-other-faint)))) + `(apropos-keybinding ((,class :inherit bold :foreground ,cyan))) + `(apropos-misc-button ((,class :inherit button + ,@(modus-themes--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-themes--link-color + green-alt-other green-alt-other-faint)))) + `(apropos-variable-button ((,class :inherit button + ,@(modus-themes--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 :inherit modus-theme-lang-note))) + `(artbollocks-lexical-illusions-face ((,class :background ,bg-alt :foreground ,red-alt :underline t))) + `(artbollocks-passive-voice-face ((,class :inherit modus-theme-lang-warning))) + `(artbollocks-weasel-words-face ((,class :inherit modus-theme-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-fg))) + `(font-latex-sectioning-1-face ((,class :inherit (bold modus-theme-variable-pitch) :foreground ,blue-nuanced-fg))) + `(font-latex-sectioning-2-face ((,class :inherit (bold modus-theme-variable-pitch) :foreground ,blue-nuanced-fg))) + `(font-latex-sectioning-3-face ((,class :inherit (bold modus-theme-variable-pitch) :foreground ,blue-nuanced-fg))) + `(font-latex-sectioning-4-face ((,class :inherit (bold modus-theme-variable-pitch) :foreground ,blue-nuanced-fg))) + `(font-latex-sectioning-5-face ((,class :inherit modus-theme-variable-pitch :foreground ,blue-nuanced-fg))) + `(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-fg + ,@(modus-themes--scale modus-themes-scale-4)))) + `(font-latex-string-face ((,class :inherit font-lock-string-face))) + `(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 :inherit font-lock-warning-face))) + `(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 error))) + `(TeX-error-description-help ((,class :foreground ,blue))) + `(TeX-error-description-tex-said ((,class :foreground ,blue))) + `(TeX-error-description-warning ((,class :inherit warning))) +;;;;; 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 :slant normal :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))) +;;;;; bbdb + `(bbdb-name ((,class :foreground ,magenta-alt-other))) + `(bbdb-organization ((,class :foreground ,red-alt-other))) + `(bbdb-field-name ((,class :foreground ,cyan-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 :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 :extend t))) +;;;;; bongo + `(bongo-album-title ((,class :foreground ,yellow-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-intense-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 ,fg-active))) + `(bongo-track-title ((,class :foreground ,cyan-active))) + `(bongo-unfilled-seek-bar ((,class :background ,bg-special-cold :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 :inherit shadow))) + `(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 modus-theme-pseudo-header))) + `(calendar-today ((,class :inherit bold :underline t))) + `(calendar-weekday-header ((,class :inherit shadow))) + `(calendar-weekend-header ((,class :inherit shadow))) + `(diary ((,class :background ,green-nuanced-bg :foreground ,green-alt-other))) + `(diary-anniversary ((,class :foreground ,red-alt-other))) + `(diary-time ((,class :foreground ,blue-alt))) + `(holiday ((,class :background ,magenta-nuanced-bg :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-themes--scale modus-themes-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 :inherit shadow))) + `(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))) +;;;;; cfrs + `(cfrs-border-color ((,class :background ,fg-window-divider-inner))) +;;;;; 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 ,yellow))) + `(change-log-date ((,class :foreground ,cyan))) + `(change-log-email ((,class :foreground ,cyan-alt-other))) + `(change-log-file ((,class :inherit bold :foreground ,fg-special-cold))) + `(change-log-function ((,class :foreground ,green-alt-other))) + `(change-log-list ((,class :foreground ,magenta-alt))) + `(change-log-name ((,class :foreground ,magenta-alt-other))) + `(log-edit-header ((,class :foreground ,fg-special-warm))) + `(log-edit-summary ((,class :inherit bold :foreground ,blue))) + `(log-edit-unknown-header ((,class :inherit shadow))) + `(log-view-commit-body ((,class :foreground ,blue-nuanced-fg))) + `(log-view-file ((,class :inherit bold :foreground ,fg-special-cold))) + `(log-view-message ((,class :background ,bg-alt :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 :inherit shadow))) + `(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 :inherit shadow))) + `(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-fg))) +;;;;; 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 :inherit shadow))) +;;;;; 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 :inherit modus-theme-bold :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 ,cyan-faint))) + `(completions-common-part ((,class ,@(modus-themes--standard-completions + blue-alt blue-nuanced-bg + cyan-refine-bg cyan-refine-fg)))) + `(completions-first-difference ((,class :inherit bold + ,@(modus-themes--standard-completions + magenta-alt blue-nuanced-bg + magenta-intense-bg fg-main)))) +;;;;; consult + `(consult-async-running ((,class :inherit bold :foreground ,blue))) + `(consult-async-split ((,class :foreground ,magenta-alt))) + `(consult-bookmark ((,class :foreground ,blue))) + `(consult-file ((,class :foreground ,fg-special-cold))) + `(consult-imenu-prefix ((,class :inherit shadow))) + `(consult-key ((,class :inherit modus-themes-bold :foreground ,magenta-alt-other))) + `(consult-line-number ((,class :foreground ,fg-special-warm))) + `(consult-line-number-prefix ((,class :foreground ,fg-unfocused))) + `(consult-narrow-indicator ((,class :foreground ,magenta-alt))) + `(consult-preview-cursor ((,class :inherit modus-theme-intense-blue))) + `(consult-preview-error ((,class :inherit modus-theme-intense-red))) + `(consult-preview-line ((,class :background ,bg-hl-alt-intense))) +;;;;; 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 org-level-1))) + `(counsel-outline-2 ((,class :inherit org-level-2))) + `(counsel-outline-3 ((,class :inherit org-level-3))) + `(counsel-outline-4 ((,class :inherit org-level-4))) + `(counsel-outline-5 ((,class :inherit org-level-5))) + `(counsel-outline-6 ((,class :inherit org-level-6))) + `(counsel-outline-7 ((,class :inherit org-level-7))) + `(counsel-outline-8 ((,class :inherit org-level-8))) + `(counsel-outline-default ((,class :foreground ,fg-main))) + `(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 unspecified))) + `(cperl-array-face ((,class :inherit font-lock-keyword-face))) + `(cperl-hash-face ((,class :inherit font-lock-variable-name-face))) +;;;;; 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 :inherit shadow))) + `(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 :inherit shadow))) +;;;;; 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 :inherit shadow))) + `(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 :inherit shadow))) + `(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-fg))) + `(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 :inherit shadow))) + `(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))) + `(dictionary-word-definition-face ((,class))) + `(dictionary-word-entry-face ((,class :inherit font-lock-comment-face))) +;;;;; 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 :extend t))) + `(diff-context ((,class ,@(modus-themes--diff-text fg-main fg-unfocused)))) + `(diff-error ((,class :inherit modus-theme-intense-red))) + `(diff-file-header ((,class :inherit (bold diff-header)))) + `(diff-function ((,class :inherit modus-theme-diff-heading))) + `(diff-header ((,class ,@(modus-themes--diff-text cyan-faint fg-main)))) + `(diff-hunk-header ((,class :inherit (bold modus-theme-diff-heading)))) + `(diff-index ((,class :inherit bold :foreground ,blue-alt))) + `(diff-indicator-added ((,class :inherit (diff-added bold) + :foreground ,@(modus-themes--diff-deuteran blue green)))) + `(diff-indicator-changed ((,class :inherit (diff-changed bold) :foreground ,yellow))) + `(diff-indicator-removed ((,class :inherit (diff-removed bold) :foreground ,red))) + `(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 :inherit shadow))) + `(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 :inherit shadow))) + `(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-themes--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-broken-symlink ((,class :inherit button :foreground ,red))) + `(dired-directory ((,class :foreground ,blue))) + `(dired-flagged ((,class :inherit modus-theme-mark-del))) + `(dired-header ((,class :inherit modus-theme-pseudo-header))) + `(dired-ignored ((,class :inherit shadow))) + `(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-themes--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 backgrounds from dired-subtree faces, else they break + ;; dired-{flagged,marked} and any other face that sets a background + ;; such as hl-line. Also, denoting depth by varying shades of gray + ;; is not good for accessibility. + `(dired-subtree-depth-1-face (())) + `(dired-subtree-depth-2-face (())) + `(dired-subtree-depth-3-face (())) + `(dired-subtree-depth-4-face (())) + `(dired-subtree-depth-5-face (())) + `(dired-subtree-depth-6-face (())) +;;;;; diredc + `(diredc-face-chmod-font-lock-dir ((,class :foreground ,blue-alt))) + `(diredc-face-chmod-font-lock-exec ((,class :foreground ,magenta))) + `(diredc-face-chmod-font-lock-read ((,class :foreground ,fg-main))) + `(diredc-face-chmod-font-lock-write ((,class :foreground ,cyan))) +;;;;; 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 :inherit shadow))) + `(diredfl-link-priv ((,class :foreground ,blue-alt-other))) + `(diredfl-no-priv ((,class :inherit shadow))) + `(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))) +;;;;; dired+ + `(diredp-autofile-name ((,class :inherit modus-theme-special-cold))) + `(diredp-compressed-file-name ((,class :foreground ,fg-special-warm))) + `(diredp-compressed-file-suffix ((,class :foreground ,red-alt))) + `(diredp-date-time ((,class :foreground ,cyan-alt-other))) + `(diredp-deletion ((,class :inherit modus-theme-mark-del))) + `(diredp-deletion-file-name ((,class :inherit modus-theme-mark-del))) + `(diredp-dir-heading ((,class :inherit modus-theme-pseudo-header))) + `(diredp-dir-name ((,class :inherit dired-directory))) + `(diredp-dir-priv ((,class :foreground ,blue-alt))) + `(diredp-exec-priv ((,class :foreground ,magenta))) + `(diredp-executable-tag ((,class :foreground ,magenta-alt))) + `(diredp-file-name ((,class :foreground ,fg-main))) + `(diredp-file-suffix ((,class :foreground ,cyan))) + `(diredp-flag-mark ((,class :inherit modus-theme-mark-sel))) + `(diredp-flag-mark-line ((,class :inherit modus-theme-mark-sel))) + `(diredp-ignored-file-name ((,class :inherit shadow))) + `(diredp-link-priv ((,class :foreground ,blue-alt-other))) + `(diredp-mode-line-flagged ((,class :foreground ,red-active))) + `(diredp-mode-line-marked ((,class :foreground ,green-active))) + `(diredp-no-priv ((,class :inherit shadow))) + `(diredp-number ((,class :foreground ,cyan-alt))) + `(diredp-omit-file-name ((,class :inherit shadow :strike-through t))) + `(diredp-other-priv ((,class :foreground ,yellow))) + `(diredp-rare-priv ((,class :foreground ,red-alt))) + `(diredp-read-priv ((,class :foreground ,fg-main))) + `(diredp-symlink ((,class :inherit dired-symlink))) + `(diredp-tagged-autofile-name ((,class :inherit modus-theme-refine-magenta))) + `(diredp-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))) +;;;;; display-fill-column-indicator-mode + `(fill-column-indicator ((,class :foreground ,bg-active))) +;;;;; 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-special-calm))) + `(ebdb-defunct ((,class :inherit shadow))) + `(ebdb-field-hidden ((,class :foreground ,magenta))) + `(ebdb-label ((,class :foreground ,cyan-alt-other))) + `(ebdb-mail-default ((,class :foreground ,fg-main))) + `(ebdb-mail-primary ((,class :foreground ,magenta-alt))) + `(ebdb-marked ((,class :background ,cyan-intense-bg))) + `(ebdb-organization-name ((,class :foreground ,red-alt-other))) + `(ebdb-person-name ((,class :foreground ,magenta-alt-other))) + `(ebdb-phone-default ((,class :foreground ,cyan))) + `(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-themes--diff + bg-dim red + bg-diff-removed fg-diff-removed + red-nuanced-bg red-faint)))) + `(ediff-current-diff-Ancestor ((,class ,@(modus-themes--diff + bg-dim fg-special-cold + bg-special-cold fg-special-cold + blue-nuanced-bg blue)))) + `(ediff-current-diff-B ((,class ,@(modus-themes--diff + bg-dim green + bg-diff-added fg-diff-added + green-nuanced-bg green-faint + bg-diff-added-deuteran fg-diff-added-deuteran)))) + `(ediff-current-diff-C ((,class ,@(modus-themes--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 ,@(modus-themes--diff-deuteran bg-diff-focus-added-deuteran bg-diff-focus-added) + :foreground ,@(modus-themes--diff-deuteran fg-diff-focus-added-deuteran 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 :inherit elfeed-search-date-face))) + `(elfeed-log-debug-level-face ((,class :inherit elfeed-search-filter-face))) + `(elfeed-log-error-level-face ((,class :inherit error))) + `(elfeed-log-info-level-face ((,class :inherit success))) + `(elfeed-log-warn-level-face ((,class :inherit warning))) + `(elfeed-search-date-face ((,class :foreground ,cyan))) + `(elfeed-search-feed-face ((,class :foreground ,blue-faint))) + `(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 ,cyan-alt-other))) + `(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 :inherit shadow))) + `(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-fg))) + `(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-themes--link-color + cyan cyan-faint)))) + `(eshell-ls-unreadable ((,class :background ,bg-inactive :foreground ,fg-inactive))) + `(eshell-prompt ((,class :inherit modus-theme-bold + ,@(modus-themes--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 :inherit shadow))) + `(eshell-git-prompt-branch-face ((,class :inherit shadow))) + `(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 :inherit shadow))) + `(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-snipe + `(evil-snipe-first-match-face ((,class :inherit (bold modus-theme-intense-blue)))) + `(evil-snipe-matches-face ((,class :inherit modus-theme-refine-magenta))) +;;;;; 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 :inherit shadow :underline t))) + `(fancy-dabbrev-selection-face ((,class :inherit (modus-theme-intense-cyan bold)))) +;;;;; flycheck + `(flycheck-error ((,class :inherit modus-theme-lang-error))) + `(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 ((,class :inherit modus-theme-lang-note))) + `(flycheck-verify-select-checker ((,class :box (:line-width 1 :color nil :style released-button)))) + `(flycheck-warning ((,class :inherit modus-theme-lang-warning))) +;;;;; 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 :inherit shadow))) + `(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 ((,class :inherit modus-theme-lang-error))) + `(flymake-note ((,class :inherit modus-theme-lang-note))) + `(flymake-warning ((,class :inherit modus-theme-lang-warning))) +;;;;; flyspell + `(flyspell-duplicate ((,class :inherit modus-theme-lang-warning))) + `(flyspell-incorrect ((,class :inherit modus-theme-lang-error))) +;;;;; flyspell-correct + `(flyspell-correct-highlight-face ((,class :inherit modus-theme-refine-green))) +;;;;; flx + `(flx-highlight-face ((,class ,@(modus-themes--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-themes--syntax-extra + magenta-alt magenta-alt-faint blue-alt)))) + `(font-lock-comment-delimiter-face ((,class :inherit font-lock-comment-face))) + `(font-lock-comment-face ((,class :inherit modus-theme-slant + ,@(modus-themes--syntax-comment + fg-alt fg-comment-yellow)))) + `(font-lock-constant-face ((,class ,@(modus-themes--syntax-extra + blue-alt-other blue-alt-other-faint magenta-alt-other)))) + `(font-lock-doc-face ((,class :inherit modus-theme-slant + ,@(modus-themes--syntax-docstring + fg-docstring green-alt-other-faint + green-alt-other-faint magenta-nuanced-fg)))) + `(font-lock-function-name-face ((,class ,@(modus-themes--syntax-extra + magenta magenta-faint magenta-alt)))) + `(font-lock-keyword-face ((,class :inherit modus-theme-bold + ,@(modus-themes--syntax-extra + magenta-alt-other magenta-alt-other-faint cyan-alt-other)))) + `(font-lock-negation-char-face ((,class :inherit modus-theme-bold + ,@(modus-themes--syntax-foreground + yellow yellow-faint)))) + `(font-lock-preprocessor-face ((,class ,@(modus-themes--syntax-foreground + red-alt-other red-alt-other-faint)))) + `(font-lock-regexp-grouping-backslash ((,class :inherit bold + ,@(modus-themes--syntax-string + fg-escape-char-backslash yellow-alt-faint + magenta-alt-other blue-alt)))) + `(font-lock-regexp-grouping-construct ((,class :inherit bold + ,@(modus-themes--syntax-string + fg-escape-char-construct red-alt-other-faint + red magenta-alt)))) + `(font-lock-string-face ((,class ,@(modus-themes--syntax-string + blue-alt blue-alt-faint green green-alt)))) + `(font-lock-type-face ((,class :inherit modus-theme-bold + ,@(modus-themes--syntax-extra + cyan-alt-other cyan-alt-faint cyan-alt)))) + `(font-lock-variable-name-face ((,class ,@(modus-themes--syntax-extra + cyan cyan-faint blue-alt-faint)))) + `(font-lock-warning-face ((,class :inherit modus-theme-bold + ,@(modus-themes--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 :inherit shadow))) + `(forge-topic-merged ((,class :inherit shadow))) + `(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 :inherit shadow))) + `(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-fg))) + `(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 :inherit font-lock-function-name-face))) + `(geiser-font-lock-autodoc-identifier ((,class :inherit font-lock-constant-face))) + `(geiser-font-lock-doc-button ((,class :inherit button :foreground ,fg-docstring))) + `(geiser-font-lock-doc-link ((,class :inherit button))) + `(geiser-font-lock-error-link ((,class :inherit button :foreground ,red))) + `(geiser-font-lock-image-button ((,class :inherit button :foreground ,green-alt))) + `(geiser-font-lock-repl-input ((,class :inherit bold))) + `(geiser-font-lock-repl-output ((,class :inherit font-lock-keyword-face))) + `(geiser-font-lock-repl-prompt ((,class :inherit minibuffer-prompt))) + `(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-themes--syntax-comment + fg-special-cold red-nuanced-fg)))) + `(git-commit-comment-heading ((,class :inherit (bold modus-theme-slant) + ,@(modus-themes--syntax-comment + fg-dim fg-special-warm)))) + `(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-themes--syntax-comment + fg-special-cold red-nuanced-fg)))) + `(git-rebase-comment-heading ((,class :inherit (bold modus-theme-slant) + ,@(modus-themes--syntax-comment + fg-dim fg-special-warm)))) + `(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-faint))) + `(gnus-cite-10 ((,class :foreground ,yellow-alt-other))) + `(gnus-cite-11 ((,class :foreground ,magenta-alt))) + `(gnus-cite-2 ((,class :foreground ,green-alt-other))) + `(gnus-cite-3 ((,class :foreground ,red-alt-other))) + `(gnus-cite-4 ((,class :foreground ,cyan))) + `(gnus-cite-5 ((,class :foreground ,yellow-alt))) + `(gnus-cite-6 ((,class :foreground ,magenta))) + `(gnus-cite-7 ((,class :foreground ,green-alt))) + `(gnus-cite-8 ((,class :foreground ,magenta-alt-other))) + `(gnus-cite-9 ((,class :foreground ,cyan-alt))) + `(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-fg))) + `(gnus-group-mail-low-empty ((,class :foreground ,magenta-nuanced-fg))) + `(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-fg))) + `(gnus-group-news-3-empty ((,class :foreground ,yellow-nuanced-fg))) + `(gnus-group-news-4 ((,class :inherit bold :foreground ,cyan-nuanced-fg))) + `(gnus-group-news-4-empty ((,class :foreground ,cyan-nuanced-fg))) + `(gnus-group-news-5 ((,class :inherit bold :foreground ,red-nuanced-fg))) + `(gnus-group-news-5-empty ((,class :foreground ,red-nuanced-fg))) + `(gnus-group-news-6 ((,class :inherit bold :foreground ,fg-alt))) + `(gnus-group-news-6-empty ((,class :inherit shadow))) + `(gnus-group-news-low ((,class :inherit bold :foreground ,green-nuanced-fg))) + `(gnus-group-news-low-empty ((,class :foreground ,green-nuanced-fg))) + `(gnus-header-content ((,class :inherit message-header-other))) + `(gnus-header-from ((,class :inherit message-header-to :underline nil))) + `(gnus-header-name ((,class :inherit message-header-name))) + `(gnus-header-newsgroups ((,class :inherit message-header-newsgroups))) + `(gnus-header-subject ((,class :inherit message-header-subject))) + `(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 :inherit shadow))) + `(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 :inherit shadow))) + `(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 :inherit shadow))) + `(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 :inherit shadow))) + `(helm-ff-denied ((,class ,@(modus-themes--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-themes--link-color + red red-faint)))) + `(helm-ff-pipe ((,class ,@(modus-themes--extra-completions + 'modus-theme-refine-magenta + 'modus-theme-subtle-magenta + 'modus-theme-nuanced-magenta + magenta)))) + `(helm-ff-prefix ((,class ,@(modus-themes--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-themes--extra-completions + 'modus-theme-subtle-red + 'modus-theme-refine-red + 'modus-theme-nuanced-yellow + red-alt)))) + `(helm-ff-symlink ((,class :inherit button + ,@(modus-themes--link-color + cyan cyan-faint)))) + `(helm-ff-truename ((,class :foreground ,blue-alt-other))) + `(helm-fd-finish ((,class :foreground ,green-active))) + `(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-themes--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-themes--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-themes--extra-completions + 'modus-theme-subtle-cyan + 'modus-theme-refine-cyan + 'modus-theme-nuanced-cyan + cyan + 'bold)))) + `(helm-match-item ((,class ,@(modus-themes--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-themes--link-color + cyan-alt-other cyan-alt-other-faint)))) + `(helm-mode-prefix ((,class ,@(modus-themes--extra-completions + 'modus-theme-subtle-magenta + 'modus-theme-intense-magenta + 'modus-theme-nuanced-magenta + magenta-alt + 'bold)))) + `(helm-non-file-buffer ((,class :inherit shadow))) + `(helm-prefarg ((,class :foreground ,red-active))) + `(helm-resume-need-update ((,class ,@(modus-themes--extra-completions + 'modus-theme-subtle-magenta + 'modus-theme-refine-magenta + 'modus-theme-nuanced-magenta + magenta-alt-other)))) + `(helm-selection ((,class ,@(modus-themes--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-themes--scale modus-themes-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-fg))) + `(helm-ls-git-deleted-not-staged-face ((,class :foreground ,red))) + `(helm-ls-git-modified-and-staged-face ((,class :foreground ,yellow-nuanced-fg))) + `(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-themes--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-aquamarine ((,class :background ,cyan-subtle-bg :foreground ,fg-main))) + `(hi-black-b ((,class :inherit bold :background ,fg-main :foreground ,bg-main))) + `(hi-black-hb ((,class :inherit bold :background ,fg-alt :foreground ,bg-main))) + `(hi-blue ((,class :background ,blue-subtle-bg :foreground ,fg-main))) + `(hi-blue-b ((,class :inherit (bold hi-blue)))) + `(hi-green ((,class :background ,green-subtle-bg :foreground ,fg-main))) + `(hi-green-b ((,class :inherit (bold hi-green)))) + `(hi-pink ((,class :background ,magenta-subtle-bg :foreground ,fg-main))) + `(hi-pink-b ((,class :inherit (bold hi-pink)))) + `(hi-red-b ((,class :inherit bold :background ,red-intense-bg :foreground ,fg-main))) + `(hi-salmon ((,class :background ,red-subtle-bg :foreground ,fg-main))) + `(hi-yellow ((,class :background ,yellow-subtle-bg :foreground ,fg-main))) + `(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 :inherit shadow))) + `(hyperlist-tag ((,class :foreground ,red))) + `(hyperlist-toplevel ((,class :inherit bold :foreground ,fg-main))) +;;;;; icomplete + `(icomplete-first-match ((,class :inherit bold + ,@(modus-themes--standard-completions + magenta bg-alt + bg-active fg-main)))) +;;;;; icomplete-vertical + `(icomplete-vertical-separator ((,class :inherit shadow))) +;;;;; ido-mode + `(ido-first-match ((,class :inherit bold + ,@(modus-themes--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-themes--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 :inherit shadow))) +;;;;; 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-themes--mixed-fonts) ; the capitalization is canonical + :background ,bg-alt :foreground ,fg-special-calm))) + `(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 :inherit font-lock-constant-face))) + `(info-colors-ref-item-function ((,class :inherit font-lock-function-name-face))) + `(info-colors-ref-item-macro ((,class :inherit font-lock-keyword-face))) + `(info-colors-ref-item-other ((,class :inherit font-lock-doc-face))) + `(info-colors-ref-item-special-form ((,class :inherit font-lock-keyword-face))) + `(info-colors-ref-item-syntax-class ((,class :inherit font-lock-builtin-face))) + `(info-colors-ref-item-type ((,class :inherit font-lock-type-face))) + `(info-colors-ref-item-user-option ((,class :inherit font-lock-variable-name-face))) + `(info-colors-ref-item-variable ((,class :inherit font-lock-variable-name-face))) +;;;;; 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 :inherit shadow))) + `(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 :inherit modus-theme-special-cold :extend t))) + `(ioccur-num-line-face ((,class :foreground ,fg-special-warm))) + `(ioccur-overlay-face ((,class :inherit modus-theme-refine-blue :extend t))) + `(ioccur-regexp-face ((,class :inherit (modus-theme-intense-magenta bold)))) + `(ioccur-title-face ((,class :inherit bold :foreground ,red-alt + ,@(modus-themes--scale modus-themes-scale-4)))) +;;;;; isearch, occur, and the like + `(isearch ((,class :inherit (modus-theme-intense-green bold)))) + `(isearch-fail ((,class :inherit modus-theme-refine-red))) + `(isearch-group-1 ((,class :inherit modus-theme-intense-blue))) + `(isearch-group-2 ((,class :inherit modus-theme-intense-magenta))) + `(lazy-highlight ((,class :inherit modus-theme-refine-cyan))) + `(match ((,class :inherit modus-theme-special-calm))) + `(query-replace ((,class :inherit (modus-theme-intense-yellow bold)))) +;;;;; isl (isearch-light) + `(isl-line ((,class :inherit modus-theme-subtle-green))) + `(isl-match ((,class :inherit modus-theme-refine-cyan))) + `(isl-number ((,class :inherit modus-theme-bold :foreground ,green-active))) + `(isl-on ((,class :inherit (bold modus-theme-intense-green)))) + `(isl-string ((,class :inherit modus-theme-bold :foreground ,cyan-active))) +;;;;; ivy + `(ivy-action ((,class :inherit bold :foreground ,red-alt))) + `(ivy-completions-annotations ((,class :inherit completions-annotations))) + `(ivy-confirm-face ((,class :foreground ,cyan))) + `(ivy-current-match ((,class ,@(modus-themes--extra-completions + 'modus-theme-refine-cyan + 'modus-theme-intense-cyan + 'modus-theme-special-cold + 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-themes--extra-completions + 'modus-theme-subtle-neutral + 'modus-theme-intense-neutral + 'modus-theme-nuanced-cyan + fg-alt)))) + `(ivy-minibuffer-match-face-2 ((,class ,@(modus-themes--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-themes--extra-completions + 'modus-theme-subtle-blue + 'modus-theme-refine-blue + 'modus-theme-nuanced-blue + blue-alt-other + 'bold)))) + `(ivy-minibuffer-match-face-4 ((,class ,@(modus-themes--extra-completions + 'modus-theme-subtle-magenta + 'modus-theme-refine-magenta + 'modus-theme-nuanced-magenta + magenta-alt-other + 'bold)))) + `(ivy-minibuffer-match-highlight ((,class ,@(modus-themes--extra-completions + 'modus-theme-subtle-cyan + 'modus-theme-intense-cyan + 'modus-theme-nuanced-cyan + cyan-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 :inherit shadow))) + `(ivy-subdir ((,class :foreground ,blue-alt-other))) + `(ivy-virtual ((,class :foreground ,magenta-alt-other))) + `(ivy-yanked-word ((,class ,@(modus-themes--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 ,fg-window-divider-inner))) + `(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-themes--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 + ,@(modus-themes--line-numbers + fg-alt bg-dim + fg-unfocused)))) + `(line-number-current-line + ((,class :inherit (bold default) + ,@(modus-themes--line-numbers + fg-main bg-active + blue-alt-other)))) + `(line-number-major-tick + ((,class :inherit (bold default) + ,@(modus-themes--line-numbers + yellow-nuanced-fg yellow-nuanced-bg + red-alt)))) + `(line-number-minor-tick + ((,class :inherit (bold default) + ,@(modus-themes--line-numbers + fg-alt bg-inactive + fg-inactive)))) +;;;;; 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 :inherit shadow))) + `(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))) +;;;;; macrostep + `(macrostep-compiler-macro-face ((,class :inherit italic))) + `(macrostep-expansion-highlight-face ((,class :background ,blue-nuanced-bg))) + `(macrostep-gensym-1 ((,class :inherit bold :foreground ,blue :box t))) + `(macrostep-gensym-2 ((,class :inherit bold :foreground ,green :box t))) + `(macrostep-gensym-3 ((,class :inherit bold :foreground ,yellow :box t))) + `(macrostep-gensym-4 ((,class :inherit bold :foreground ,red :box t))) + `(macrostep-gensym-5 ((,class :inherit bold :foreground ,magenta :box t))) + `(macrostep-macro-face ((,class :inherit button :foreground ,green-alt))) +;;;;; 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 :inherit shadow))) + `(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-themes--diff + bg-main green + bg-diff-added fg-diff-added + green-nuanced-bg fg-diff-added + bg-diff-added-deuteran fg-diff-added-deuteran)))) + `(magit-diff-added-highlight ((,class :inherit modus-theme-diff-focus-added))) + `(magit-diff-base ((,class ,@(modus-themes--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-themes--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 ,@(modus-themes--diff-deuteran bg-region bg-diff-heading) + :foreground ,@(modus-themes--diff-deuteran fg-main 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-themes--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 ,@(modus-themes--diff-deuteran blue green)))) + `(magit-diffstat-removed ((,class :foreground ,red))) + `(magit-dimmed ((,class :foreground ,fg-unfocused))) + `(magit-filename ((,class :foreground ,fg-special-cold))) + `(magit-hash ((,class :inherit shadow))) + `(magit-head ((,class :inherit magit-branch-local))) + `(magit-header-line ((,class :inherit bold :foreground ,magenta-active))) + `(magit-header-line-key ((,class :inherit bold :foreground ,blue-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 :inherit shadow))) + `(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 :inherit shadow))) + `(magit-refname-pullreq ((,class :inherit shadow))) + `(magit-refname-stash ((,class :inherit shadow))) + `(magit-refname-wip ((,class :inherit shadow))) + `(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 :inherit shadow))) + `(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))) +;;;;; make-mode (makefiles) + `(makefile-makepp-perl ((,class :background ,cyan-nuanced-bg))) + `(makefile-space ((,class :background ,magenta-nuanced-bg))) +;;;;; man + `(Man-overstrike ((,class :inherit bold :foreground ,magenta))) + `(Man-reverse ((,class :inherit modus-theme-subtle-magenta))) + `(Man-underline ((,class :foreground ,cyan :underline t))) +;;;;; marginalia + `(marginalia-archive ((,class :foreground ,green-nuanced-fg))) + `(marginalia-date ((,class :foreground ,blue-nuanced-fg))) + `(marginalia-char ((,class :foreground ,red-active))) + `(marginalia-documentation ((,class :foreground ,fg-special-cold :inherit modus-theme-slant))) + `(marginalia-file-modes ((,class :inherit shadow))) + `(marginalia-file-name ((,class :foreground ,fg-special-mild))) + `(marginalia-file-owner ((,class :foreground ,red-nuanced-fg))) + `(marginalia-key ((,class :foreground ,magenta-active))) + `(marginalia-mode ((,class :foreground ,cyan-active))) + `(marginalia-modified ((,class :foreground ,yellow-active))) + `(marginalia-number ((,class :foreground ,blue-active))) + `(marginalia-size ((,class :foreground ,green-active))) + `(marginalia-type ((,class :foreground ,fg-special-warm))) + `(marginalia-variable ((,class :foreground ,yellow-nuanced-fg))) + `(marginalia-version ((,class :foreground ,cyan-active))) +;;;;; 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-themes--mixed-fonts) :background ,bg-dim :extend t))) + `(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-themes--mixed-fonts) + :foreground ,cyan))) + `(markdown-html-attr-value-face ((,class ,@(modus-themes--mixed-fonts) + :foreground ,blue))) + `(markdown-html-entity-face ((,class ,@(modus-themes--mixed-fonts) + :foreground ,cyan))) + `(markdown-html-tag-delimiter-face ((,class ,@(modus-themes--mixed-fonts) + :foreground ,fg-special-mild))) + `(markdown-html-tag-name-face ((,class ,@(modus-themes--mixed-fonts) + :foreground ,magenta-alt))) + `(markdown-inline-code-face ((,class ,@(modus-themes--mixed-fonts) + :background ,bg-alt :foreground ,fg-special-calm))) + `(markdown-italic-face ((,class :inherit italic :foreground ,fg-special-cold))) + `(markdown-language-info-face ((,class ,@(modus-themes--mixed-fonts) + :foreground ,fg-special-cold))) + `(markdown-language-keyword-face ((,class ,@(modus-themes--mixed-fonts) + :background ,bg-alt + :foreground ,fg-alt))) + `(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 :inherit shadow))) + `(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 :inherit markdown-code-face :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-themes--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-fg))) + `(markup-bold-face ((,class :inherit bold :foreground ,red-nuanced-fg))) + `(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 :inherit shadow))) + `(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-fg))) + `(markup-small-face ((,class :height 0.8 :foreground ,fg-main))) + `(markup-strong-face ((,class :inherit bold :foreground ,red-nuanced-fg))) + `(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-fg))) + `(markup-title-1-face ((,class :height 2.4 :foreground ,blue-nuanced-fg))) + `(markup-title-2-face ((,class :height 1.8 :foreground ,blue-nuanced-fg))) + `(markup-title-3-face ((,class :height 1.4 :foreground ,blue-nuanced-fg))) + `(markup-title-4-face ((,class :height 1.2 :foreground ,blue-nuanced-fg))) + `(markup-title-5-face ((,class :height 1.2 :foreground ,blue-nuanced-fg :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-faint))) + `(message-cited-text-2 ((,class :foreground ,green-alt-other))) + `(message-cited-text-3 ((,class :foreground ,red-alt-other))) + `(message-cited-text-4 ((,class :foreground ,cyan))) + `(message-header-cc ((,class :foreground ,blue-alt-other))) + `(message-header-name ((,class :inherit bold :foreground ,cyan))) + `(message-header-newsgroups ((,class :inherit message-header-other))) + `(message-header-other ((,class :foreground ,fg-special-calm))) + `(message-header-subject ((,class :inherit bold :foreground ,magenta-alt))) + `(message-header-to ((,class :inherit bold :foreground ,magenta-alt-other))) + `(message-header-xheader ((,class :foreground ,blue-alt))) + `(message-mml ((,class :foreground ,yellow))) + `(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))) +;;;;; mmm-mode + `(mmm-cleanup-submode-face ((,class :background ,yellow-nuanced-bg))) + `(mmm-code-submode-face ((,class :background ,bg-alt))) + `(mmm-comment-submode-face ((,class :background ,blue-nuanced-bg))) + `(mmm-declaration-submode-face ((,class :background ,cyan-nuanced-bg))) + `(mmm-default-submode-face ((,class :background ,bg-dim))) + `(mmm-init-submode-face ((,class :background ,magenta-nuanced-bg))) + `(mmm-output-submode-face ((,class :background ,red-nuanced-bg))) + `(mmm-special-submode-face ((,class :background ,green-nuanced-bg))) +;;;;; modeline + `(mode-line ((,class ,@(modus-themes--variable-pitch-ui) + ,@(modus-themes--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-themes--variable-pitch-ui) + ,@(modus-themes--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 ,fg-dim))) + `(mu4e-cited-1-face ((,class :foreground ,blue-faint))) + `(mu4e-cited-2-face ((,class :foreground ,green-alt-other))) + `(mu4e-cited-3-face ((,class :foreground ,red-alt-other))) + `(mu4e-cited-4-face ((,class :foreground ,cyan))) + `(mu4e-cited-5-face ((,class :foreground ,yellow-alt))) + `(mu4e-cited-6-face ((,class :foreground ,magenta))) + `(mu4e-cited-7-face ((,class :foreground ,green-alt))) + `(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 message-header-to))) + `(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 :inherit shadow))) + `(mu4e-header-highlight-face ((,class :inherit modus-theme-hl-line))) + `(mu4e-header-key-face ((,class :inherit message-header-name))) + `(mu4e-header-marks-face ((,class :inherit mu4e-special-header-value-face))) + `(mu4e-header-title-face ((,class :foreground ,fg-special-mild))) + `(mu4e-header-value-face ((,class :inherit message-header-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))) + `(mu4e-special-header-value-face ((,class :inherit message-header-subject))) + `(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))) + `(mu4e-url-number-face ((,class :foreground ,fg-alt))) + `(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 :inherit shadow))) + `(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 :inherit shadow))) + `(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 "gray50"))) + `(notmuch-message-summary-face ((,class :inherit modus-theme-nuanced-cyan))) + `(notmuch-search-count ((,class :inherit shadow))) + `(notmuch-search-date ((,class :foreground ,cyan))) + `(notmuch-search-flagged-face ((,class :foreground ,red-alt))) + `(notmuch-search-matching-authors ((,class :foreground ,fg-main))) + `(notmuch-search-non-matching-authors ((,class :inherit shadow))) + `(notmuch-search-subject ((,class :foreground ,fg-dim))) + `(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-date-face ((,class :inherit notmuch-search-date))) + `(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 :inherit shadow))) + `(notmuch-tree-no-match-date-face ((,class :inherit shadow))) + `(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 :inherit font-lock-variable-name-face))) + `(nxml-attribute-prefix ((,class :inherit font-lock-type-face))) + `(nxml-attribute-value ((,class :inherit font-lock-constant-face))) + `(nxml-cdata-section-CDATA ((,class :inherit error))) + `(nxml-cdata-section-delimiter ((,class :inherit error))) + `(nxml-char-ref-delimiter ((,class :foreground ,fg-special-mild))) + `(nxml-char-ref-number ((,class :inherit modus-theme-bold :foreground ,fg-special-mild))) + `(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 :inherit font-lock-function-name-face))) + `(nxml-element-prefix ((,class :inherit font-lock-builtin-face))) + `(nxml-entity-ref-delimiter ((,class :foreground ,fg-special-mild))) + `(nxml-entity-ref-name ((,class :inherit modus-theme-bold :foreground ,fg-special-mild))) + `(nxml-glyph ((,class :inherit modus-theme-intense-neutral))) + `(nxml-hash ((,class :inherit (bold font-lock-string-face)))) + `(nxml-heading ((,class :inherit bold))) + `(nxml-name ((,class :inherit font-lock-builtin-face))) + `(nxml-namespace-attribute-colon ((,class :foreground ,fg-main))) + `(nxml-namespace-attribute-prefix ((,class :inherit font-lock-variable-name-face))) + `(nxml-processing-instruction-target ((,class :inherit font-lock-keyword-face))) + `(nxml-prolog-keyword ((,class :inherit font-lock-keyword-face))) + `(nxml-ref ((,class :inherit modus-theme-bold :foreground ,fg-special-mild))) + `(rng-error ((,class :inherit error))) +;;;;; objed + `(objed-hl ((,class :background ,(if modus-themes-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-themes--standard-completions + blue-alt-other blue-nuanced-bg + blue-refine-bg blue-refine-fg)))) + `(orderless-match-face-1 ((,class :inherit bold + ,@(modus-themes--standard-completions + magenta-alt magenta-nuanced-bg + magenta-refine-bg magenta-refine-fg)))) + `(orderless-match-face-2 ((,class :inherit bold + ,@(modus-themes--standard-completions + green green-nuanced-bg + green-refine-bg green-refine-fg)))) + `(orderless-match-face-3 ((,class :inherit bold + ,@(modus-themes--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 :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 ,@(modus-themes--scale modus-themes-scale-5) + :foreground ,blue-alt))) + `(org-archived ((,class :background ,bg-alt :foreground ,fg-alt))) + `(org-block ((,class ,@(modus-themes--mixed-fonts) + ,@(modus-themes--org-block bg-dim) + :foreground ,fg-main))) + `(org-block-begin-line ((,class ,@(modus-themes--mixed-fonts) + ,@(modus-themes--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-themes--mixed-fonts) + :background ,red-nuanced-bg :foreground ,magenta))) + `(org-column ((,class :background ,bg-alt))) + `(org-column-title ((,class :inherit bold :underline t :background ,bg-alt))) + `(org-date ((,class :inherit ,(if modus-themes-no-mixed-fonts + 'button + '(button fixed-pitch)) + ,@(modus-themes--link-color + cyan cyan-faint)))) + `(org-date-selected ((,class :inherit bold :foreground ,blue-alt :inverse-video t))) + `(org-dispatcher-highlight ((,class :inherit (bold modus-theme-mark-alt)))) + `(org-document-info ((,class :foreground ,fg-special-cold))) + `(org-document-info-keyword ((,class ,@(modus-themes--mixed-fonts) + :foreground ,fg-alt))) + `(org-document-title ((,class :inherit (bold modus-theme-variable-pitch) :foreground ,fg-special-cold + ,@(modus-themes--scale modus-themes-scale-5)))) + `(org-done ((,class :foreground ,green))) + `(org-drawer ((,class ,@(modus-themes--mixed-fonts) + :foreground ,fg-alt))) + `(org-ellipsis ((,class))) ; inherits from the heading's color + `(org-footnote ((,class :inherit button + ,@(modus-themes--link-color + blue-alt blue-alt-faint)))) + `(org-formula ((,class ,@(modus-themes--mixed-fonts) + :foreground ,red-alt))) + `(org-habit-alert-face ((,class ,@(modus-themes--org-habit + yellow-graph-0-bg + yellow-graph-0-bg + yellow-graph-1-bg)))) + `(org-habit-alert-future-face ((,class ,@(modus-themes--org-habit + yellow-graph-1-bg + yellow-graph-0-bg + yellow-graph-1-bg)))) + `(org-habit-clear-face ((,class ,@(modus-themes--org-habit + blue-graph-0-bg + green-graph-1-bg + blue-graph-1-bg)))) + `(org-habit-clear-future-face ((,class ,@(modus-themes--org-habit + blue-graph-1-bg + green-graph-1-bg + blue-graph-1-bg)))) + `(org-habit-overdue-face ((,class ,@(modus-themes--org-habit + red-graph-0-bg + red-graph-0-bg + red-graph-1-bg)))) + `(org-habit-overdue-future-face ((,class ,@(modus-themes--org-habit + red-graph-1-bg + red-graph-0-bg + red-graph-1-bg)))) + `(org-habit-ready-face ((,class ,@(modus-themes--org-habit + green-graph-0-bg + green-graph-0-bg + green-graph-1-bg)))) + `(org-habit-ready-future-face ((,class ,@(modus-themes--org-habit + green-graph-1-bg + green-graph-0-bg + green-graph-1-bg)))) + `(org-headline-done ((,class :inherit modus-theme-variable-pitch :foreground ,green-nuanced-fg))) + `(org-headline-todo ((,class :inherit modus-theme-variable-pitch :foreground ,red-nuanced-fg))) + `(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 ,@(modus-themes--mixed-fonts) + :background ,blue-nuanced-bg :foreground ,magenta-alt-other))) + `(org-meta-line ((,class ,@(modus-themes--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-themes--mixed-fonts) + :foreground ,fg-special-cold))) + `(org-quote ((,class :inherit modus-theme-slant + ,@(modus-themes--org-block bg-dim) + :foreground ,fg-special-cold))) + `(org-scheduled ((,class :foreground ,magenta-alt))) + `(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-themes--mixed-fonts) + :foreground ,fg-alt))) + `(org-table ((,class ,@(modus-themes--mixed-fonts) + :foreground ,fg-special-cold))) + `(org-table-header ((,class :inherit (fixed-pitch modus-theme-intense-neutral)))) + `(org-tag ((,class :foreground ,magenta-nuanced-fg))) + `(org-tag-group ((,class :inherit bold :foreground ,cyan-nuanced-fg))) + `(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-fg))) + `(org-verbatim ((,class ,@(modus-themes--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-themes--link-color + green green-faint)))) + `(org-roam-link-current ((,class :inherit button + ,@(modus-themes--link-color + green-alt green-alt-faint)))) + `(org-roam-link-invalid ((,class :inherit button + ,@(modus-themes--link-color + red red-faint)))) + `(org-roam-link-shielded ((,class :inherit button + ,@(modus-themes--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-tree-slide + `(org-tree-slide-header-overlay-face + ((,class :inherit (bold modus-theme-variable-pitch) :background ,bg-main + :foreground ,fg-special-cold :overline nil + ,@(modus-themes--scale modus-themes-scale-5)))) +;;;;; 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 :background ,bg-alt))) +;;;;; 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 font-lock-comment-face))) + `(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))) +;;;;; pdf-tools + `(pdf-links-read-link ((,class :background ,fg-main :foreground ,magenta-intense-bg :inherit bold))) ; Foreground is background and vice versa + `(pdf-occur-document-face ((,class :inherit shadow))) + `(pdf-occur-page-face ((,class :inherit shadow))) +;;;;; 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-themes--scale modus-themes-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 :inherit modus-theme-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-fg))) + `(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))) +;;;;; quick-peek + `(quick-peek-background-face ((,class :background ,bg-alt))) + `(quick-peek-border-face ((,class :background ,fg-window-divider-inner :height 1))) + `(quick-peek-padding-face ((,class :background ,bg-alt :height 0.15))) +;;;;; 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 ((,class :inherit modus-theme-lang-error))) +;;;;; 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-error-face ((,class :background ,red-subtle-bg :foreground ,fg-main))) + `(rainbow-delimiters-base-face ((,class :foreground ,fg-main))) + `(rainbow-delimiters-depth-1-face ((,class :foreground ,fg-main))) + `(rainbow-delimiters-depth-2-face ((,class :foreground ,magenta-intense))) + `(rainbow-delimiters-depth-3-face ((,class :foreground ,cyan-intense))) + `(rainbow-delimiters-depth-4-face ((,class :foreground ,orange-intense))) + `(rainbow-delimiters-depth-5-face ((,class :foreground ,purple-intense))) + `(rainbow-delimiters-depth-6-face ((,class :foreground ,green-intense))) + `(rainbow-delimiters-depth-7-face ((,class :foreground ,red-intense))) + `(rainbow-delimiters-depth-8-face ((,class :foreground ,blue-intense))) + `(rainbow-delimiters-depth-9-face ((,class :foreground ,yellow-intense))) + `(rainbow-delimiters-mismatched-face ((,class :inherit (bold modus-theme-refine-yellow)))) + `(rainbow-delimiters-unmatched-face ((,class :inherit (bold modus-theme-refine-red)))) +;;;;; rcirc + `(rcirc-bright-nick ((,class :inherit bold :foreground ,magenta-alt))) + `(rcirc-dim-nick ((,class :inherit shadow))) + `(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-fg))) + `(rcirc-url ((,class :foreground ,blue :underline t))) +;;;;; recursion-indicator + `(recursion-indicator-general ((,class :foreground ,blue-active))) + `(recursion-indicator-minibuffer ((,class :foreground ,red-active))) +;;;;; regexp-builder (re-builder) + `(reb-match-0 ((,class :inherit modus-theme-refine-cyan))) + `(reb-match-1 ((,class :inherit modus-theme-subtle-magenta))) + `(reb-match-2 ((,class :inherit modus-theme-subtle-green))) + `(reb-match-3 ((,class :inherit modus-theme-refine-yellow))) + `(reb-regexp-grouping-backslash ((,class :inherit font-lock-regexp-grouping-backslash))) + `(reb-regexp-grouping-construct ((,class :inherit font-lock-regexp-grouping-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 :foreground ,fg-main))) + `(ruler-mode-comment-column ((,class :inherit ruler-mode-default :foreground ,red))) + `(ruler-mode-current-column ((,class :inherit ruler-mode-default :background ,blue-subtle-bg :foreground ,fg-main))) + `(ruler-mode-default ((,class :inherit default :background ,bg-alt :foreground ,fg-unfocused))) + `(ruler-mode-fill-column ((,class :inherit ruler-mode-default :foreground ,green))) + `(ruler-mode-fringes ((,class :inherit ruler-mode-default :foreground ,cyan))) + `(ruler-mode-goal-column ((,class :inherit ruler-mode-default :foreground ,blue))) + `(ruler-mode-margins ((,class :inherit ruler-mode-default :foreground ,bg-main))) + `(ruler-mode-pad ((,class :inherit ruler-mode-default :background ,bg-active :foreground ,fg-inactive))) + `(ruler-mode-tab-stop ((,class :inherit ruler-mode-default :foreground ,fg-special-warm))) +;;;;; sallet + `(sallet-buffer-compressed ((,class :inherit italic :foreground ,yellow-nuanced-fg))) + `(sallet-buffer-default-directory ((,class :foreground ,cyan-nuanced-fg))) + `(sallet-buffer-directory ((,class :foreground ,blue-nuanced-fg))) + `(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-themes--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-fg))) + `(sallet-recentf-file-path ((,class :foreground ,fg-special-mild))) + `(sallet-regexp-match ((,class ,@(modus-themes--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-themes--scale modus-themes-scale-4)))) + `(sallet-substring-match ((,class ,@(modus-themes--extra-completions + 'modus-theme-subtle-blue + 'modus-theme-refine-blue + 'modus-theme-nuanced-blue + blue-alt-other)))) +;;;;; selectrum +;; NOTE 2021-02-22: The `selectrum-primary-highlight' and +;; `selectrum-secondary-highlight' are deprecated upstream in favour of +;; their selectrum-prescient counterparts. We shall remove those faces +;; from the themes once we are certain that they are no longer relevant. + `(selectrum-current-candidate + ((,class :inherit bold :foreground ,fg-main + :background ,@(pcase modus-themes-completions + ('opinionated (list bg-active)) + (_ (list bg-inactive)))))) + `(selectrum-primary-highlight + ((,class :inherit bold + ,@(modus-themes--standard-completions + magenta-alt magenta-nuanced-bg + magenta-refine-bg magenta-refine-fg)))) + `(selectrum-secondary-highlight + ((,class :inherit bold + ,@(modus-themes--standard-completions + cyan-alt-other cyan-nuanced-bg + cyan-refine-bg cyan-refine-fg)))) +;;;;; selectrum-prescient + `(selectrum-prescient-primary-highlight + ((,class :inherit bold + ,@(modus-themes--standard-completions + magenta-alt magenta-nuanced-bg + magenta-refine-bg magenta-refine-fg)))) + `(selectrum-prescient-secondary-highlight + ((,class :inherit bold + ,@(modus-themes--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-fileless-includes ((,class :inherit modus-theme-refine-green))) + `(semantic-decoration-on-private-members-face ((,class :inherit modus-theme-refine-cyan))) + `(semantic-decoration-on-protected-members-face ((,class :background ,bg-dim))) + `(semantic-decoration-on-unknown-includes ((,class :inherit modus-theme-refine-red))) + `(semantic-decoration-on-unparsed-includes ((,class :inherit modus-theme-refine-yellow))) + `(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))) +;;;;; shortdoc + `(shortdoc-heading ((,class :inherit modus-theme-pseudo-header))) + `(shortdoc-section ((,class))) ; remove the default's variable-pitch style +;;;;; show-paren-mode + `(show-paren-match ((,class ,@(modus-themes--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))) +;;;;; shr + `(shr-abbreviation + ((,(append '((supports :underline (:style wave))) class) + :foreground ,fg-docstring :underline (:color ,fg-alt :style wave)) + (,class :foreground ,fg-docstring :underline t))) + `(shr-selected-link ((,class :inherit modus-theme-subtle-cyan))) +;;;;; side-notes + `(side-notes ((,class :background ,bg-dim :foreground ,fg-dim))) +;;;;; sieve-mode + `(sieve-action-commands ((,class :inherit font-lock-builtin-face))) + `(sieve-control-commands ((,class :inherit font-lock-keyword-face))) + `(sieve-tagged-arguments ((,class :inherit font-lock-type-face))) + `(sieve-test-commands ((,class :inherit font-lock-function-name-face))) +;;;;; 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-themes--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))) +;;;;; solaire + `(solaire-default-face ((,class :inherit default :background ,bg-alt :foreground ,fg-dim))) + `(solaire-line-number-face ((,class :inherit solaire-default-face :foreground ,fg-unfocused))) + `(solaire-hl-line-face ((,class :background ,bg-active))) + `(solaire-org-hide-face ((,class :background ,bg-alt :foreground ,bg-alt))) +;;;;; 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 ((,class :inherit modus-theme-lang-error))) +;;;;; spray + `(spray-accent-face ((,class :foreground ,red-intense))) + `(spray-base-face ((,class :inherit default :foreground ,fg-special-cold))) +;;;;; 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-refine-cyan))) + `(swiper-background-match-face-3 ((,class :inherit modus-theme-refine-magenta))) + `(swiper-background-match-face-4 ((,class :inherit modus-theme-refine-yellow))) + `(swiper-line-face ((,class :inherit modus-theme-special-cold))) + `(swiper-match-face-1 ((,class :inherit (bold modus-theme-intense-neutral)))) + `(swiper-match-face-2 ((,class :inherit (bold modus-theme-intense-green)))) + `(swiper-match-face-3 ((,class :inherit (bold modus-theme-intense-blue)))) + `(swiper-match-face-4 ((,class :inherit (bold modus-theme-intense-red)))) +;;;;; swoop + `(swoop-face-header-format-line ((,class :inherit bold :foreground ,red-alt + ,@(modus-themes--scale modus-themes-scale-3)))) + `(swoop-face-line-buffer-name ((,class :inherit bold :foreground ,blue-alt + ,@(modus-themes--scale modus-themes-scale-4)))) + `(swoop-face-line-number ((,class :foreground ,fg-special-warm))) + `(swoop-face-target-line ((,class :inherit modus-theme-intense-blue :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 :inherit shadow))) + `(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 :inherit shadow))) +;;;;; 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))) +;;;;; tab-bar-mode + `(tab-bar ((,class ,@(modus-themes--variable-pitch-ui) + :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 ,@(modus-themes--variable-pitch-ui) + :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))) + `(tab-line-tab-inactive-alternate ((,class :box (:line-width 2 :color ,bg-tab-inactive-alt) + :background ,bg-tab-inactive-alt :foreground ,fg-main))) +;;;;; 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))) +;;;;; terraform-mode + `(terraform--resource-name-face ((,class ,@(modus-themes--syntax-string + magenta-alt-other magenta-alt-other-faint + red-alt red-alt)))) + `(terraform--resource-type-face ((,class ,@(modus-themes--syntax-string + green green-faint + blue-alt magenta-alt)))) +;;;;; term + `(term ((,class :background ,bg-main :foreground ,fg-main))) + `(term-bold ((,class :inherit bold))) + `(term-color-black ((,class :background "gray35" :foreground "gray35"))) + `(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-white ((,class :background "gray65" :foreground "gray65"))) + `(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 :inherit shadow))) +;;;;; 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 :inherit shadow))) + `(transient-inactive-value ((,class :inherit shadow))) + `(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-themes--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 :inherit shadow))) + `(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 :inherit font-lock-preprocessor-face))) + `(tuareg-font-lock-attribute-face ((,class :inherit font-lock-function-name-face))) + `(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 :inherit font-lock-function-name-face))) + `(tuareg-font-lock-interactive-directive-face ((,class :foreground ,fg-special-cold))) + `(tuareg-font-lock-interactive-error-face ((,class :inherit error))) + `(tuareg-font-lock-interactive-output-face ((,class :inherit font-lock-constant-face))) + `(tuareg-font-lock-label-face ((,class :inherit font-lock-type-face))) + `(tuareg-font-lock-line-number-face ((,class :foreground ,fg-special-warm))) + `(tuareg-font-lock-module-face ((,class :inherit font-lock-builtin-face))) + `(tuareg-font-lock-multistage-face ((,class :inherit bold :background ,bg-alt :foreground ,blue))) + `(tuareg-font-lock-operator-face ((,class :inherit font-lock-preprocessor-face))) + `(tuareg-opam-error-face ((,class :inherit error))) + `(tuareg-opam-pkg-variable-name-face ((,class :inherit font-lock-variable-name-face))) +;;;;; 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 :inherit shadow))) + `(undo-tree-visualizer-register-face ((,class :foreground ,magenta-intense))) + `(undo-tree-visualizer-unmodified-face ((,class :foreground ,green-intense))) +;;;;; vc (vc-dir.el, vc-hooks.el) + `(vc-dir-directory ((,class :foreground ,blue))) + `(vc-dir-file ((,class :foreground ,fg-main))) + `(vc-dir-header ((,class :foreground ,cyan-alt-other))) + `(vc-dir-header-value ((,class :foreground ,magenta-alt-other))) + `(vc-dir-mark-indicator ((,class :foreground ,blue-alt-other))) + `(vc-dir-status-edited ((,class :foreground ,yellow))) + `(vc-dir-status-ignored ((,class :foreground ,fg-unfocused))) + `(vc-dir-status-up-to-date ((,class :foreground ,cyan))) + `(vc-dir-status-warning ((,class :foreground ,red))) + `(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 :background ,bg-alt :foreground ,blue-nuanced-fg :extend t))) +;;;;; 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 :inherit font-lock-constant-face))) + `(web-mode-block-attr-value-face ((,class :inherit font-lock-type-face))) + `(web-mode-block-comment-face ((,class :inherit web-mode-comment-face))) + `(web-mode-block-control-face ((,class :inherit font-lock-builtin-face))) + `(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 font-lock-builtin-face))) + `(web-mode-comment-face ((,class :inherit font-lock-comment-face))) + `(web-mode-comment-keyword-face ((,class :inherit font-lock-warning-face))) + `(web-mode-constant-face ((,class :inherit font-lock-constant-face))) + `(web-mode-css-at-rule-face ((,class :inherit font-lock-constant-face))) + `(web-mode-css-color-face ((,class :inherit font-lock-builtin-face))) + `(web-mode-css-comment-face ((,class :inherit web-mode-comment-face))) + `(web-mode-css-function-face ((,class :inherit font-lock-builtin-face))) + `(web-mode-css-priority-face ((,class :inherit font-lock-warning-face))) + `(web-mode-css-property-name-face ((,class :inherit font-lock-keyword-face))) + `(web-mode-css-pseudo-class-face ((,class :inherit font-lock-doc-face))) + `(web-mode-css-selector-face ((,class :inherit font-lock-keyword-face))) + `(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 :inherit font-lock-function-name-face))) + `(web-mode-folded-face ((,class :underline t))) + `(web-mode-function-call-face ((,class :inherit font-lock-function-name-face))) + `(web-mode-function-name-face ((,class :inherit font-lock-function-name-face))) + `(web-mode-html-attr-custom-face ((,class :inherit font-lock-variable-name-face))) + `(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 :inherit font-lock-variable-name-face))) + `(web-mode-html-attr-value-face ((,class :inherit font-lock-constant-face))) + `(web-mode-html-entity-face ((,class :inherit font-lock-negation-char-face))) + `(web-mode-html-tag-bracket-face ((,class :foreground ,fg-dim))) + `(web-mode-html-tag-custom-face ((,class :inherit font-lock-function-name-face))) + `(web-mode-html-tag-face ((,class :inherit font-lock-function-name-face))) + `(web-mode-html-tag-namespaced-face ((,class :inherit font-lock-builtin-face))) + `(web-mode-html-tag-unclosed-face ((,class :inherit error :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 :inherit font-lock-builtin-face))) + `(web-mode-json-key-face ((,class :foreground ,blue-nuanced-fg))) + `(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-fg))) + `(web-mode-keyword-face ((,class :inherit :inherit font-lock-keyword-face))) + `(web-mode-param-name-face ((,class :inherit font-lock-function-name-face))) + `(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 :inherit font-lock-preprocessor-face))) + `(web-mode-script-face ((,class :inherit web-mode-part-face))) + `(web-mode-sql-keyword-face ((,class :inherit font-lock-negation-char-face))) + `(web-mode-string-face ((,class :inherit font-lock-string-face))) + `(web-mode-style-face ((,class :inherit web-mode-part-face))) + `(web-mode-symbol-face ((,class :inherit font-lock-constant-face))) + `(web-mode-type-face ((,class :inherit font-lock-builtin-face))) + `(web-mode-underline-face ((,class :underline t))) + `(web-mode-variable-name-face ((,class :inherit font-lock-variable-name-face))) + `(web-mode-warning-face ((,class :inherit font-lock-warning-face))) + `(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 ,fg-main))) + `(which-key-group-description-face ((,class :foreground ,magenta-alt))) + `(which-key-highlighted-command-face ((,class :foreground ,yellow :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 :foreground ,fg-special-warm))) + `(which-key-separator-face ((,class :inherit shadow))) + `(which-key-special-key-face ((,class :inherit bold :foreground ,orange-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 :background ,bg-alt))) + `(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 :inherit modus-theme-lang-warning))) + `(writegood-weasels-face ((,class :inherit modus-theme-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 font-lock-warning-face))) + `(xah-elisp-cap-variable ((,class :inherit font-lock-preprocessor-face))) + `(xah-elisp-command-face ((,class :inherit font-lock-type-face))) + `(xah-elisp-dollar-symbol ((,class :inherit font-lock-variable-name-face))) +;;;;; xref + `(xref-file-header ((,class :inherit bold :foreground ,fg-special-cold))) + `(xref-line-number ((,class :inherit shadow))) + `(xref-match ((,class :inherit match))) +;;;;; yaml-mode + `(yaml-tab-face ((,class :inherit modus-theme-intense-red))) +;;;;; yasnippet + `(yas-field-highlight-face ((,class :background ,bg-hl-alt-intense))) +;;;;; 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 :inherit shadow :strike-through t))) + `(ztreep-diff-model-normal-face ((,class :inherit shadow))) + `(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)))) + "Face specs for use with `modus-themes-theme'.") + +(defconst modus-themes-custom-variables + '( +;;;; ansi-colors + `(ansi-color-faces-vector [default bold shadow italic underline success warning error]) + `(ansi-color-names-vector ["gray35" ,red ,green ,yellow ,blue ,magenta ,cyan "gray65"]) +;;;; awesome-tray + `(awesome-tray-mode-line-active-color ,blue) + `(awesome-tray-mode-line-inactive-color ,bg-active) +;;;; exwm + `(exwm-floating-border-color ,fg-window-divider-inner) +;;;; 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-fg) + ("FIXME" . ,red-alt-other) + ("XXX+" . ,red-alt) + ("REVIEW" . ,cyan-alt-other) + ("DEPRECATED" . ,blue-nuanced-fg))) +;;;; pdf-tools + `(pdf-view-midnight-colors + '(,fg-main . ,bg-dim)) +;;;; 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 ["black" ,red ,green ,yellow ,blue ,magenta ,cyan "gray65"]) + `(xterm-color-names-bright ["gray35" ,red-alt ,green-alt ,yellow-alt ,blue-alt ,magenta-alt ,cyan-alt "white"]) + (if (eq modus-themes-org-blocks 'rainbow) + `(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))) + `(org-src-block-faces '()))) + "Custom variables for `modus-themes-theme'.") + +(provide 'modus-themes) +;;; modus-themes.el ends here diff --git a/etc/themes/modus-vivendi-theme.el b/etc/themes/modus-vivendi-theme.el index 73f07d644b..fd7f5df24d 100644 --- a/etc/themes/modus-vivendi-theme.el +++ b/etc/themes/modus-vivendi-theme.el @@ -1,4666 +1,66 @@ ;;; modus-vivendi-theme.el --- Accessible dark theme (WCAG AAA) -*- lexical-binding:t -*- -;; Copyright (C) 2019-2021 Free Software Foundation, Inc. +;; Copyright (C) 2019-2021 Free Software Foundation, Inc. ;; Author: Protesilaos Stavrou ;; URL: https://gitlab.com/protesilaos/modus-themes -;; Version: 0.13.0 +;; Version: 1.2.0 ;; Package-Requires: ((emacs "26.1")) ;; Keywords: faces, theme, accessibility ;; This file is part of GNU Emacs. -;; GNU Emacs is free software: you can redistribute it and/or modify +;; This program is free software; you can redistribute it and/or modify ;; 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. - -;; GNU Emacs 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. - +;; 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 GNU Emacs. If not, see . +;; along with this program. If not, see . ;;; Commentary: ;; -;; This theme is designed for colour-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). +;; Modus Vivendi is the dark variant of the Modus themes (Modus Operandi +;; is the light one). The themes are designed for color-contrast +;; accessibility. More specifically: ;; -;; 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. +;; 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). ;; -;; The theme provides the following customisation options, all of which -;; are disabled by default: +;; 2. Offer as close to full face coverage as possible. The list is +;; already quite long, with more additions to follow as part of the +;; ongoing development process. ;; -;; modus-vivendi-theme-slanted-constructs (boolean) -;; modus-vivendi-theme-bold-constructs (boolean) -;; modus-vivendi-theme-variable-pitch-headings (boolean) -;; modus-vivendi-theme-no-mixed-fonts (boolean) -;; modus-vivendi-theme-headings (alist) -;; modus-vivendi-theme-scale-headings (boolean) -;; modus-vivendi-theme-fringes (choice) -;; modus-vivendi-theme-org-blocks (choice) -;; modus-vivendi-theme-prompts (choice) -;; modus-vivendi-theme-mode-line (choice) -;; modus-vivendi-theme-diffs (choice) -;; modus-vivendi-theme-faint-syntax (boolean) -;; modus-vivendi-theme-intense-hl-line (boolean) -;; modus-vivendi-theme-intense-paren-match (boolean) -;; modus-vivendi-theme-no-link-underline (boolean) -;; modus-vivendi-theme-completions (choice) -;; modus-vivendi-theme-override-colors-alist (alist) +;; For a complete view of the project, also refer to the following files +;; (should be distributed in the same repository/directory as the +;; current item): ;; -;; The default scale is as follows (it can be customised as well): -;; -;; modus-vivendi-theme-scale-1 1.05 -;; modus-vivendi-theme-scale-2 1.1 -;; modus-vivendi-theme-scale-3 1.15 -;; modus-vivendi-theme-scale-4 1.2 -;; modus-vivendi-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 -;; 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 +;; - modus-themes.el (Main code shared between the themes) +;; - modus-operandi-theme.el (Light theme) ;;; Code: -(deftheme modus-vivendi - "Dark theme that conforms with the highest accessibility - standard for colour 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 colour 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 Vivendi") - -(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) - -;;; Customisation options - -;; User-facing customisation options. They are all deactivated by -;; default (users must opt in). -(defcustom modus-vivendi-theme-slanted-constructs nil - "Use slanted text in more code constructs (italics or oblique)." - :type 'boolean) - -(defcustom modus-vivendi-theme-bold-constructs nil - "Use bold text in more code constructs." - :type 'boolean) - -(define-obsolete-variable-alias 'modus-vivendi-theme-proportional-fonts - 'modus-vivendi-theme-variable-pitch-headings "`modus-vivendi-theme' 0.11.0") - -(defcustom modus-vivendi-theme-proportional-fonts nil - "Use proportional fonts (variable-pitch) in headings." - :type 'boolean) - -(defcustom modus-vivendi-theme-variable-pitch-headings nil - "Use proportional fonts (variable-pitch) in headings." - :type 'boolean) - -(defcustom modus-vivendi-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-vivendi-theme-rainbow-headings - 'modus-vivendi-theme-headings - "`modus-vivendi-theme' 0.13.0") - -(defcustom modus-vivendi-theme-rainbow-headings nil - "Use more saturated colours for headings." - :type 'boolean) - -(make-obsolete 'modus-vivendi-theme-section-headings - 'modus-vivendi-theme-headings - "`modus-vivendi-theme' 0.13.0") - -(defcustom modus-vivendi-theme-section-headings nil - "Use a background and an overline in headings." - :type 'boolean) - -(defcustom modus-vivendi-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-vivendi-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-vivendi-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-vivendi-theme-headings - '((1 . t) - (2 . line) - (t . rainbow-line-no-bold))) - -A description of all possible values: - -+ `no-bold' retains the default text colour 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 colourful 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 - colourful 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 - colourful 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 colourful 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 colourful 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 colourful foreground" rainbow-section) - (const :tag "Like `rainbow-section' without bold weight" rainbow-section-no-bold)))) - -(defcustom modus-vivendi-theme-scale-headings nil - "Use font scaling for headings." - :type 'boolean) - -(defcustom modus-vivendi-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-vivendi-theme-scale-2 1.1 - "Font size slightly larger than `modus-vivendi-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-vivendi-theme-scale-3 1.15 - "Font size slightly larger than `modus-vivendi-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-vivendi-theme-scale-4 1.2 - "Font size slightly larger than `modus-vivendi-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-vivendi-theme-scale-5 1.3 - "Font size slightly larger than `modus-vivendi-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-vivendi-theme-visible-fringes - 'modus-vivendi-theme-fringes - "`modus-vivendi-theme' 0.12.0") - -(defcustom modus-vivendi-theme-visible-fringes nil - "Use a visible style for fringes." - :type 'boolean) - -(defcustom modus-vivendi-theme-fringes nil - "Define the visibility of fringes. - -Nil means the fringes have no background colour. Option `subtle' -will apply a greyscale value that is visible yet close to the -main buffer background colour. 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-vivendi-theme-distinct-org-blocks - 'modus-vivendi-theme-org-blocks - "`modus-vivendi-theme' 0.11.0") - -(defcustom modus-vivendi-theme-distinct-org-blocks nil - "Use a distinct neutral background for `org-mode' blocks." - :type 'boolean) - -(make-obsolete 'modus-vivendi-theme-rainbow-org-src-blocks - 'modus-vivendi-theme-org-blocks - "`modus-vivendi-theme' 0.11.0") - -(defcustom modus-vivendi-theme-rainbow-org-src-blocks nil - "Use colour-coded backgrounds for `org-mode' source blocks. -The colour in use depends on the language (send feedback to -include more languages)." - :type 'boolean) - -(defcustom modus-vivendi-theme-org-blocks nil - "Use a subtle grey or colour-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 `greyscale' will apply a subtle neutral grey 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 -recognised by `set-face-attribute'. - -Option `rainbow' will use an accented background for the contents -of the block. The exact colour 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 grey block background" greyscale) - (const :tag "Colour-coded background per programming language" rainbow))) - -(make-obsolete 'modus-vivendi-theme-3d-modeline - 'modus-vivendi-theme-mode-line - "`modus-vivendi-theme' 0.13.0") - -(defcustom modus-vivendi-theme-3d-modeline nil - "Use a three-dimensional style for the active mode line." - :type 'boolean) - -(defcustom modus-vivendi-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 optimise 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-vivendi-theme-subtle-diffs - 'modus-vivendi-theme-diffs - "`modus-vivendi-theme' 0.13.0") - -(defcustom modus-vivendi-theme-subtle-diffs nil - "Use fewer/dim backgrounds in `diff-mode', `ediff',`magit'." - :type 'boolean) - -(defcustom modus-vivendi-theme-diffs nil - "Adjust the overall styles of diffs. - -Nil means to use fairly intense colour 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 colours to -remain distinct. - -A `desaturated' value follows the same principles as with the nil -option, while it tones down all relevant colours. - -Option `fg-only' will remove all accented backgrounds, except -from word-wise changes. It instead uses colour-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 coloured 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-vivendi-theme-intense-standard-completions - 'modus-vivendi-theme-completions - "`modus-vivendi-theme' 0.12.0") - -(defcustom modus-vivendi-theme-intense-standard-completions nil - "Use prominent backgrounds for Icomplete, Ido, or similar." - :type 'boolean) - -(defcustom modus-vivendi-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 -colours to style their matches, whereas Ivy or Helm rely on an -aesthetic that combines coloured backgrounds with appropriate -text colour. - -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 colours for -applicable contexts. - -Option `opinionated' will apply colour 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-vivendi-theme-prompts nil - "Use subtle or intense styles for minibuffer and REPL prompts. - -Nil means to only use an accented foreground colour. - -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-vivendi-theme-intense-hl-line nil - "Use more prominent background for command `hl-line-mode'." - :type 'boolean) - -(defcustom modus-vivendi-theme-intense-paren-match nil - "Use more prominent colour for parenthesis matching." - :type 'boolean) - -(defcustom modus-vivendi-theme-faint-syntax nil - "Use less saturated colours for code syntax highlighting." - :type 'boolean) - -(defcustom modus-vivendi-theme-no-link-underline nil - "Do not underline links." - :type 'boolean) - -;;; Internal functions - -;; Helper functions that are meant to ease the implementation of the -;; above customisation options. -(defun modus-vivendi-theme-bold-weight () - "Conditional use of a heavier text weight." - (when modus-vivendi-theme-bold-constructs - (list :inherit 'bold))) - -(defun modus-vivendi-theme-mixed-fonts () - "Conditional application of `fixed-pitch' inheritance." - (unless modus-vivendi-theme-no-mixed-fonts - (list :inherit 'fixed-pitch))) - -(defun modus-vivendi-theme-fringe (subtlebg intensebg) - "Conditional use of background colours for fringes. -SUBTLEBG should be a subtle greyscale value. INTENSEBG must be a -more pronounced greyscale colour." - (pcase modus-vivendi-theme-fringes - ('intense (list :background intensebg)) - ('subtle (list :background subtlebg)) - (_ (list :background nil)))) - -(defun modus-vivendi-theme-prompt (mainfg subtlebg subtlefg intensebg intensefg) - "Conditional use of background colours 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 colour that should be -combinable with INTENSEFG." - (pcase modus-vivendi-theme-prompts - ('intense (list :background intensebg :foreground intensefg)) - ('subtle (list :background subtlebg :foreground subtlefg)) - (_ (list :background nil :foreground mainfg)))) - -(defun modus-vivendi-theme-paren (normalbg intensebg) - "Conditional use of intense colours for matching parentheses. -NORMALBG should the special palette colour 'bg-paren-match' or -something similar. INTENSEBG must be easier to discern next to -other backgrounds, such as the special palette colour -'bg-paren-match-intense'." - (if modus-vivendi-theme-intense-paren-match - (list :background intensebg) - (list :background normalbg))) - -(defun modus-vivendi-theme-syntax-foreground (normal faint) - "Apply foreground value to code syntax. -NORMAL is the more saturated colour, which should be the default. -FAINT is the less saturated colour." - (if modus-vivendi-theme-faint-syntax - (list :foreground faint) - (list :foreground normal))) - -(defun modus-vivendi-theme-heading-p (key) - "Query style of KEY in `modus-vivendi-theme-headings'." - (cdr (assoc key modus-vivendi-theme-headings))) - -(defun modus-vivendi-theme-heading (level fg fg-alt bg border) - "Conditional styles for `modus-vivendi-theme-headings'. - -LEVEL is the heading's position in their order. FG is the -default text colour. 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 colour value that combines well with the -background and alternative foreground." - (let* ((key (modus-vivendi-theme-heading-p `,level)) - (style (or key (modus-vivendi-theme-heading-p t))) - (var (if modus-vivendi-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-vivendi-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-vivendi-theme-org-blocks' also accepts a `rainbow' option -which is applied conditionally to `org-src-block-faces' (see the -theme's source code)." - (if (eq modus-vivendi-theme-org-blocks 'greyscale) - (append - (and (>= emacs-major-version 27) '(:extend t)) - (list :background bgblk)) - (list :background nil))) - -(defun modus-vivendi-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 -colour 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-vivendi-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-vivendi-theme-org-blocks' is -set to `rainbow'." - (pcase modus-vivendi-theme-org-blocks - ('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-vivendi-theme-mode-line-attrs - (fg bg fg-alt bg-alt border border-3d &optional alt-style border-width fg-distant) - "Colour combinations for `modus-vivendi-theme-mode-line'. - -FG and BG are the default colours. 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-vivendi-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-vivendi-theme-diff (fg-only-bg fg-only-fg mainbg mainfg altbg altfg) - "Colour combinations for `modus-vivendi-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-vivendi-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-vivendi-theme-standard-completions (mainfg subtlebg intensebg intensefg) - "Combinations for `modus-vivendi-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 colours that are designed to be used in -tandem. - -These are intended for Icomplete, Ido, and related." - (pcase modus-vivendi-theme-completions - ('opinionated (list :background intensebg :foreground intensefg)) - ('moderate (list :background subtlebg :foreground mainfg)) - (_ (list :foreground mainfg)))) - -(defun modus-vivendi-theme-extra-completions (subtleface intenseface altface &optional altfg bold) - "Combinations for `modus-vivendi-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 colours 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-vivendi-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-vivendi-theme-scale (amount) - "Scale heading by AMOUNT. - -AMOUNT is a customisation option." - (when modus-vivendi-theme-scale-headings - (list :height amount))) - -;;; Colour palette - -;; Define colour palette. Each colour must have a >= 7:1 contrast -;; ratio relative to the foreground/background colour it is rendered -;; against. -;; -;; The design of the colour 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-vivendi-theme-default-colors-alist - '(;; base values - ("bg-main" . "#000000") ("fg-main" . "#ffffff") - ("bg-alt" . "#181a20") ("fg-alt" . "#a8a8a8") - ("bg-dim" . "#110b11") ("fg-dim" . "#e0e6f0") - ;; specifically for on/off states (e.g. `mode-line') - ;; - ;; must be combined with themselves - ("bg-active" . "#323232") ("fg-active" . "#f4f4f4") - ("bg-inactive" . "#1e1e1e") ("fg-inactive" . "#bfc0c4") - ;; 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" . "#203448") ("fg-special-cold" . "#c6eaff") - ("bg-special-mild" . "#00322e") ("fg-special-mild" . "#bfebe0") - ("bg-special-warm" . "#382f27") ("fg-special-warm" . "#f8dec0") - ("bg-special-calm" . "#392a48") ("fg-special-calm" . "#fbd6f4") - ;; styles for the main constructs - ;; - ;; must be combined with: `bg-main', `bg-alt', `bg-dim' - ("red" . "#ff8059") ("green" . "#44bc44") - ("yellow" . "#eecc00") ("blue" . "#2fafff") - ("magenta" . "#feacd0") ("cyan" . "#00d3d0") - ;; styles for common, but still specialised constructs - ;; - ;; must be combined with: `bg-main', `bg-alt', `bg-dim' - ("red-alt" . "#f4923b") ("green-alt" . "#80d200") - ("yellow-alt" . "#cfdf30") ("blue-alt" . "#79a8ff") - ("magenta-alt" . "#f78fe7") ("cyan-alt" . "#4ae8fc") - ;; same purpose as above, just slight differences - ;; - ;; must be combined with: `bg-main', `bg-alt', `bg-dim' - ("red-alt-other" . "#ff9977") ("green-alt-other" . "#00cd68") - ("yellow-alt-other" . "#f0ce43") ("blue-alt-other" . "#00bcff") - ("magenta-alt-other" . "#b6a0ff") ("cyan-alt-other" . "#6ae4b9") - ;; styles for desaturated foreground text, intended for use with - ;; the `modus-vivendi-theme-faint-syntax' option - ;; - ;; must be combined with: `bg-main', `bg-alt', `bg-dim' - ("red-faint" . "#ffa0a0") ("green-faint" . "#88cf88") - ("yellow-faint" . "#d2b580") ("blue-faint" . "#92baff") - ("magenta-faint" . "#e0b2d6") ("cyan-faint" . "#a0bfdf") - - ("red-alt-faint" . "#f5aa80") ("green-alt-faint" . "#a8cf88") - ("yellow-alt-faint" . "#cabf77") ("blue-alt-faint" . "#a4b0ff") - ("magenta-alt-faint" . "#ef9fe4") ("cyan-alt-faint" . "#90c4ed") - - ("red-alt-other-faint" . "#ff9fbf") ("green-alt-other-faint" . "#88cfaf") - ("yellow-alt-other-faint" . "#d0ba95") ("blue-alt-other-faint" . "#8fc5ff") - ("magenta-alt-other-faint" . "#d0b4ff") ("cyan-alt-other-faint" . "#a4d0bb") - ;; 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" . "#ffcccc") ("green-nuanced" . "#b8e2b8") - ("yellow-nuanced" . "#dfdfb0") ("blue-nuanced" . "#bfd9ff") - ("magenta-nuanced" . "#e5cfef") ("cyan-nuanced" . "#a8e5e5") - ;; styles for slightly accented background - ;; - ;; must be combined with any of the above foreground values - ("red-nuanced-bg" . "#2c0614") ("green-nuanced-bg" . "#001904") - ("yellow-nuanced-bg" . "#221000") ("blue-nuanced-bg" . "#0f0e39") - ("magenta-nuanced-bg" . "#230631") ("cyan-nuanced-bg" . "#041529") - ;; styles for elements that should draw attention to themselves - ;; - ;; must be combined with: `bg-main' - ("red-intense" . "#fb6859") ("green-intense" . "#00fc50") - ("yellow-intense" . "#ffdd00") ("blue-intense" . "#00a2ff") - ("magenta-intense" . "#ff8bd4") ("cyan-intense" . "#30ffc0") - ;; styles for background elements that should be visible yet - ;; subtle - ;; - ;; must be combined with: `fg-dim' - ("red-subtle-bg" . "#762422") ("green-subtle-bg" . "#2f4a00") - ("yellow-subtle-bg" . "#604200") ("blue-subtle-bg" . "#10387c") - ("magenta-subtle-bg" . "#49366e") ("cyan-subtle-bg" . "#00415e") - ;; styles for background elements that should be visible and - ;; distinguishable - ;; - ;; must be combined with: `fg-main' - ("red-intense-bg" . "#a4202a") ("green-intense-bg" . "#006800") - ("yellow-intense-bg" . "#874900") ("blue-intense-bg" . "#2a40b8") - ("magenta-intense-bg" . "#7042a2") ("cyan-intense-bg" . "#005f88") - ;; 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" . "#77002a") ("red-refine-fg" . "#ffb9ab") - ("green-refine-bg" . "#00422a") ("green-refine-fg" . "#9ff0cf") - ("yellow-refine-bg" . "#693200") ("yellow-refine-fg" . "#e2d980") - ("blue-refine-bg" . "#242679") ("blue-refine-fg" . "#8ec6ff") - ("magenta-refine-bg" . "#71206a") ("magenta-refine-fg" . "#ffcaf0") - ("cyan-refine-bg" . "#004065") ("cyan-refine-fg" . "#8ae4f2") - ;; styles that are meant exclusively for the mode line - ;; - ;; must be combined with: `bg-active', `bg-inactive' - ("red-active" . "#ffa7ba") ("green-active" . "#70d73f") - ("yellow-active" . "#dbbe5f") ("blue-active" . "#34cfff") - ("magenta-active" . "#d5b1ff") ("cyan-active" . "#00d8b4") - ;; styles that are meant exclusively for the fringes - ;; - ;; must be combined with `fg-main' - ("red-fringe-bg" . "#8f1f4b") ("green-fringe-bg" . "#006700") - ("yellow-fringe-bg" . "#6f4f00") ("blue-fringe-bg" . "#3f33af") - ("magenta-fringe-bg" . "#6f2f89") ("cyan-fringe-bg" . "#004f8f") - ;; 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 colours - ;; - ;; `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' - ;; - ;; the window divider colours apply to faces with just an fg value - ;; - ;; all pairs are combinable with themselves - ("bg-hl-line" . "#151823") - ("bg-hl-line-intense" . "#2f2f2f") - ("bg-hl-alt" . "#181732") - ("bg-hl-alt-intense" . "#282e46") - ("bg-paren-match" . "#5f362f") - ("bg-paren-match-intense" . "#7416b5") - ("bg-region" . "#3c3c3c") - - ("bg-tab-bar" . "#2c2c2c") - ("bg-tab-active" . "#0e0e0e") - ("bg-tab-inactive" . "#3d3d3d") - ("fg-tab-active" . "#5ac3cf") - - ("fg-escape-char-construct" . "#e7a59a") - ("fg-escape-char-backslash" . "#abab00") - - ("fg-lang-error" . "#ef8690") - ("fg-lang-warning" . "#b0aa00") - ("fg-lang-note" . "#9d9def") - - ("fg-window-divider-inner" . "#646464") - ("fg-window-divider-outer" . "#969696") - - ("fg-unfocused" . "#93959b") - - ("bg-header" . "#212121") ("fg-header" . "#dddddd") - - ("bg-whitespace" . "#170016") ("fg-whitespace" . "#a4959f") - - ("bg-diff-heading" . "#304466") ("fg-diff-heading" . "#dadffe") - ("bg-diff-added" . "#0a280a") ("fg-diff-added" . "#94ba94") - ("bg-diff-changed" . "#2a2000") ("fg-diff-changed" . "#b0ba9f") - ("bg-diff-removed" . "#40160f") ("fg-diff-removed" . "#c6adaa") - - ("bg-diff-refine-added" . "#005a36") ("fg-diff-refine-added" . "#e0f6e0") - ("bg-diff-refine-changed" . "#585800") ("fg-diff-refine-changed" . "#ffffcc") - ("bg-diff-refine-removed" . "#852828") ("fg-diff-refine-removed" . "#ffd9eb") - - ("bg-diff-focus-added" . "#203d20") ("fg-diff-focus-added" . "#b4ddb4") - ("bg-diff-focus-changed" . "#4a3a10") ("fg-diff-focus-changed" . "#d0daaf") - ("bg-diff-focus-removed" . "#5e2526") ("fg-diff-focus-removed" . "#eebdba") - - ("bg-diff-neutral-0" . "#575757") ("fg-diff-neutral-0" . "#fcfcfc") - ("bg-diff-neutral-1" . "#454545") ("fg-diff-neutral-1" . "#dddddd") - ("bg-diff-neutral-2" . "#313131") ("fg-diff-neutral-2" . "#bfbfbf") - - ("bg-mark-sel" . "#002f2f") ("fg-mark-sel" . "#60cfa2") - ("bg-mark-del" . "#5a0000") ("fg-mark-del" . "#ff99aa") - ("bg-mark-alt" . "#3f2210") ("fg-mark-alt" . "#f0aa20")) - "The entire palette of `modus-vivendi-theme'. -Each element has the form (NAME . HEX).") - - (defcustom modus-vivendi-theme-override-colors-alist '() - "Association list of palette colour overrides. -Values can be mapped to variables, using the same syntax as the -one present in `modus-vivendi-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 colours." - :type '(alist - :key-type (string :tag "Name") - :value-type (string :tag " Hex"))) - - (defmacro modus-vivendi-theme-with-color-variables (&rest body) - "`let' bind all colours 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-vivendi-theme-default-colors-alist - modus-vivendi-theme-override-colors-alist)) - ;; simple conditional styles that evaluate user-facing - ;; customisation options - (modus-theme-slant - (if modus-vivendi-theme-slanted-constructs 'italic 'normal)) - (modus-theme-variable-pitch - (if modus-vivendi-theme-variable-pitch-headings 'variable-pitch 'default))) - ,@body))) - - - -;;; Faces +(require-theme 'modus-themes) -(modus-vivendi-theme-with-color-variables - (custom-theme-set-faces - 'modus-vivendi -;;;; custom faces - ;; these bespoke faces are inherited by other constructs below -;;;;; subtle coloured 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 coloured 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 colours (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-vivendi-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-vivendi-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-vivendi-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-vivendi-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-vivendi-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-vivendi-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-vivendi-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-vivendi-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-vivendi-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-vivendi-theme-diff - bg-alt blue-alt - bg-diff-heading fg-diff-heading - blue-nuanced-bg blue)))) -;;;;; mark indicators - ;; colour 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-vivendi-theme-heading - 1 fg-main magenta-alt-other magenta-nuanced-bg bg-region) - ,@(modus-vivendi-theme-scale modus-vivendi-theme-scale-4)))) - `(modus-theme-heading-2 - ((,class ,@(modus-vivendi-theme-heading - 2 fg-special-warm magenta-alt red-nuanced-bg bg-region) - ,@(modus-vivendi-theme-scale modus-vivendi-theme-scale-3)))) - `(modus-theme-heading-3 - ((,class ,@(modus-vivendi-theme-heading - 3 fg-special-cold blue blue-nuanced-bg bg-region) - ,@(modus-vivendi-theme-scale modus-vivendi-theme-scale-2)))) - `(modus-theme-heading-4 - ((,class ,@(modus-vivendi-theme-heading - 4 fg-special-mild cyan cyan-nuanced-bg bg-region) - ,@(modus-vivendi-theme-scale modus-vivendi-theme-scale-1)))) - `(modus-theme-heading-5 - ((,class ,@(modus-vivendi-theme-heading - 5 fg-special-calm green-alt-other green-nuanced-bg bg-region)))) - `(modus-theme-heading-6 - ((,class ,@(modus-vivendi-theme-heading - 6 yellow-nuanced yellow-alt-other yellow-nuanced-bg bg-region)))) - `(modus-theme-heading-7 - ((,class ,@(modus-vivendi-theme-heading - 7 red-nuanced red-alt red-nuanced-bg bg-region)))) - `(modus-theme-heading-8 - ((,class ,@(modus-vivendi-theme-heading - 8 fg-dim magenta bg-alt bg-region)))) -;;;;; other custom faces - `(modus-theme-hl-line ((,class :background ,(if modus-vivendi-theme-intense-hl-line - bg-hl-line-intense bg-hl-line) - (and (>= emacs-major-version 27) '(:extend t))))) -;;;; standard faces -;;;;; absolute essentials - `(default ((,class :background ,bg-main :foreground ,fg-main))) - `(cursor ((,class :background ,fg-main))) - `(fringe ((,class ,@(modus-vivendi-theme-fringe 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: - ;; - ;; (set-face-attribute 'bold nil :weight 'semibold) - `(bold ((,class :weight bold))) - `(comint-highlight-input ((,class :inherit bold))) - `(comint-highlight-prompt ((,class ,@(modus-vivendi-theme-bold-weight) - ,@(modus-vivendi-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 :foreground ,cyan :slant ,modus-theme-slant))) - `(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-vivendi-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 :foreground ,blue-alt-other - ,@(unless modus-vivendi-theme-no-link-underline - (list :underline t))))) - `(link ((,class :inherit button))) - `(link-visited ((,class :inherit link :foreground ,magenta-alt-other))) - `(tooltip ((,class :background ,bg-special-cold :foreground ,fg-main))) - `(widget-button ((,class :inherit button))) - `(widget-button-pressed ((,class :inherit button :foreground ,magenta))) - `(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 :foreground ,magenta-alt-other))) - `(apropos-keybinding ((,class :inherit bold :foreground ,cyan))) - `(apropos-misc-button ((,class :inherit button :foreground ,cyan-alt-other))) - `(apropos-property ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,magenta-alt))) - `(apropos-symbol ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,blue-alt-other))) - `(apropos-user-option-button ((,class :inherit button :foreground ,green-alt-other))) - `(apropos-variable-button ((,class :inherit button :foreground ,blue))) -;;;;; 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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(font-latex-doctex-preprocessor-face ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,red-alt-other))) - `(font-latex-italic-face ((,class :foreground ,fg-special-calm :slant italic))) - `(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 ,@(modus-vivendi-theme-bold-weight) :foreground ,magenta-alt-other))) - `(font-latex-slide-title-face ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,cyan-nuanced - ,@(modus-vivendi-theme-scale modus-vivendi-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-vivendi-theme-scale modus-vivendi-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 :background ,bg-tab-active :foreground ,fg-main :slant italic))) - `(centaur-tabs-unselected ((,class :background ,bg-tab-inactive :foreground ,fg-dim))) - `(centaur-tabs-unselected-modified ((,class :background ,bg-tab-inactive :foreground ,fg-dim :slant italic))) -;;;;; 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 :foreground ,fg-special-cold :slant italic))) - `(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 :foreground ,fg-special-warm :slant italic))) - `(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 :foreground ,red-alt-other :slant italic))) - `(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 :foreground ,fg-alt :slant italic))) - `(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 :foreground ,blue))) - `(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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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 ,@(modus-vivendi-theme-bold-weight) :foreground ,red))) - `(compilation-info ((,class :foreground ,fg-special-cold))) - `(compilation-line-number ((,class :foreground ,fg-special-warm))) - `(compilation-mode-line-exit ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,blue-active))) - `(compilation-mode-line-fail ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,red-active))) - `(compilation-mode-line-run ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,magenta-active))) - `(compilation-warning ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,yellow))) -;;;;; completions - `(completions-annotations ((,class :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(completions-common-part ((,class ,@(modus-vivendi-theme-standard-completions - blue-alt blue-nuanced-bg - cyan-refine-bg cyan-refine-fg)))) - `(completions-first-difference ((,class :inherit bold - ,@(modus-vivendi-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 :foreground ,yellow-alt-other :slant ,modus-theme-slant))) -;;;;; 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 :background ,bg-alt :foreground ,red-alt :slant ,modus-theme-slant))) -;;;;; 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 :foreground ,cyan-alt-other :slant italic))) - `(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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) -;;;;; 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 :foreground ,fg-alt :slant ,modus-theme-slant))) -;;;;; 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 :foreground ,cyan))) - `(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 :foreground ,cyan-alt))) - `(dired-warning ((,class :inherit bold :foreground ,yellow))) -;;;;; dired-async - `(dired-async-failures ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,red-active))) - `(dired-async-message ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,green-active))) - `(dired-async-mode-message ((,class ,@(modus-vivendi-theme-bold-weight) :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 :foreground ,blue))) - `(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 :slant 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 :foreground ,yellow-active :slant italic))) - `(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 :foreground ,fg-active :slant italic))) - `(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-vivendi-theme-diff - bg-dim red - bg-diff-removed fg-diff-removed - red-nuanced-bg red-faint)))) - `(ediff-current-diff-Ancestor ((,class ,@(modus-vivendi-theme-diff - bg-dim fg-special-cold - bg-special-cold fg-special-cold - blue-nuanced-bg blue)))) - `(ediff-current-diff-B ((,class ,@(modus-vivendi-theme-diff - bg-dim green - bg-diff-added fg-diff-added - green-nuanced-bg green-faint)))) - `(ediff-current-diff-C ((,class ,@(modus-vivendi-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 ,@(modus-vivendi-theme-bold-weight) :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 :foreground ,cyan))) - `(eshell-ls-unreadable ((,class :background ,bg-inactive :foreground ,fg-inactive))) - `(eshell-prompt ((,class ,@(modus-vivendi-theme-bold-weight) - ,@(modus-vivendi-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 ,@(modus-vivendi-theme-bold-weight) :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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(epe-status-face ((,class :foreground ,magenta-alt-other))) - `(epe-venv-face ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) -;;;;; 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 :slant ,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 ,@(modus-vivendi-theme-bold-weight) :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 :foreground ,fg-inactive :slant italic))) - `(flycheck-color-mode-line-info-face ((,class :inherit flycheck-fringe-warning))) -;;;;; flycheck-indicator - `(flycheck-indicator-disabled ((,class :foreground ,fg-inactive :slant ,modus-theme-slant))) - `(flycheck-indicator-error ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,red-active))) - `(flycheck-indicator-info ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,blue-active))) - `(flycheck-indicator-running ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,magenta-active))) - `(flycheck-indicator-success ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,green-active))) - `(flycheck-indicator-warning ((,class ,@(modus-vivendi-theme-bold-weight) :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 :foreground ,fg-main :slant ,modus-theme-slant))) - `(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-vivendi-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 ,@(modus-vivendi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(font-lock-comment-delimiter-face ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(font-lock-comment-face ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(font-lock-constant-face ((,class ,@(modus-vivendi-theme-syntax-foreground - blue-alt-other blue-alt-other-faint)))) - `(font-lock-doc-face ((,class ,@(modus-vivendi-theme-syntax-foreground - fg-special-cold cyan-alt-other-faint) - :slant ,modus-theme-slant))) - `(font-lock-function-name-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta magenta-faint)))) - `(font-lock-keyword-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta-alt-other magenta-alt-other-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(font-lock-negation-char-face ((,class ,@(modus-vivendi-theme-syntax-foreground - yellow yellow-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(font-lock-preprocessor-face ((,class ,@(modus-vivendi-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-vivendi-theme-syntax-foreground - blue-alt blue-alt-faint)))) - `(font-lock-type-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta-alt magenta-alt-faint)))) - `(font-lock-variable-name-face ((,class ,@(modus-vivendi-theme-syntax-foreground - cyan cyan-faint)))) - `(font-lock-warning-face ((,class ,@(modus-vivendi-theme-syntax-foreground - yellow-active yellow-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) -;;;;; 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 :foreground ,magenta :slant ,modus-theme-slant))) - `(forge-topic-unread ((,class :inherit bold :foreground ,fg-main))) -;;;;; fountain-mode - `(fountain-character ((,class :foreground ,blue-alt-other))) - `(fountain-comment ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(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 :foreground ,yellow :slant ,modus-theme-slant))) - `(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 (bold ,modus-theme-variable-pitch) :foreground ,fg-main - ,@(modus-vivendi-theme-scale modus-vivendi-theme-scale-4)))) - `(fountain-section-heading-1 ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,fg-main - ,@(modus-vivendi-theme-scale modus-vivendi-theme-scale-4)))) - `(fountain-section-heading-2 ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,fg-special-warm - ,@(modus-vivendi-theme-scale modus-vivendi-theme-scale-3)))) - `(fountain-section-heading-3 ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,fg-special-mild - ,@(modus-vivendi-theme-scale modus-vivendi-theme-scale-2)))) - `(fountain-section-heading-4 ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,fg-special-calm - ,@(modus-vivendi-theme-scale modus-vivendi-theme-scale-1)))) - `(fountain-section-heading-5 ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,fg-special-calm))) - `(fountain-synopsis ((,class :foreground ,cyan-alt))) - `(fountain-trans ((,class :foreground ,yellow-alt-other))) -;;;;; geiser - `(geiser-font-lock-autodoc-current-arg ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta magenta-faint)))) - `(geiser-font-lock-autodoc-identifier ((,class ,@(modus-vivendi-theme-syntax-foreground - blue blue-faint)))) - `(geiser-font-lock-doc-button ((,class ,@(modus-vivendi-theme-syntax-foreground - cyan-alt cyan-alt-faint) - :underline t))) - `(geiser-font-lock-doc-link ((,class :inherit link))) - `(geiser-font-lock-error-link ((,class ,@(modus-vivendi-theme-syntax-foreground - red-alt red-alt-faint) - :underline t))) - `(geiser-font-lock-image-button ((,class ,@(modus-vivendi-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-vivendi-theme-syntax-foreground - magenta-alt-other magenta-alt-other-faint)))) - `(geiser-font-lock-repl-prompt ((,class ,@(modus-vivendi-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 link))) -;;;;; git-commit - `(git-commit-comment-action ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(git-commit-comment-branch-local ((,class :foreground ,blue-alt :slant ,modus-theme-slant))) - `(git-commit-comment-branch-remote ((,class :foreground ,magenta-alt :slant ,modus-theme-slant))) - `(git-commit-comment-detached ((,class :foreground ,cyan-alt :slant ,modus-theme-slant))) - `(git-commit-comment-file ((,class :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(git-commit-comment-heading ((,class :inherit bold :foreground ,fg-dim :slant ,modus-theme-slant))) - `(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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(git-rebase-comment-heading ((,class :inherit bold :foreground ,fg-dim :slant ,modus-theme-slant))) - `(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 :foreground ,cyan))) - `(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 :foreground ,fg-main :slant italic))) - `(gnus-emphasis-highlight-words ((,class :inherit modus-theme-refine-yellow))) - `(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 :foreground ,fg-special-cold :slant italic))) - `(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 :foreground ,fg-alt :slant italic))) - `(gnus-summary-low-read ((,class :foreground ,fg-alt :slant italic))) - `(gnus-summary-low-ticked ((,class :foreground ,red-refine-fg :slant italic))) - `(gnus-summary-low-undownloaded ((,class :foreground ,yellow-refine-fg :slant italic))) - `(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-vivendi-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 :foreground ,red))) - `(helm-ff-pipe ((,class ,@(modus-vivendi-theme-extra-completions - 'modus-theme-refine-magenta - 'modus-theme-subtle-magenta - 'modus-theme-nuanced-magenta - magenta)))) - `(helm-ff-prefix ((,class ,@(modus-vivendi-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-vivendi-theme-extra-completions - 'modus-theme-subtle-red - 'modus-theme-refine-red - 'modus-theme-nuanced-yellow - red-alt)))) - `(helm-ff-symlink ((,class :inherit button :foreground ,cyan))) - `(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-vivendi-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-vivendi-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-vivendi-theme-extra-completions - 'modus-theme-subtle-cyan - 'modus-theme-refine-cyan - 'modus-theme-nuanced-cyan - cyan - 'bold)))) - `(helm-match-item ((,class ,@(modus-vivendi-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 :foreground ,cyan-alt-other))) - `(helm-mode-prefix ((,class ,@(modus-vivendi-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-vivendi-theme-extra-completions - 'modus-theme-subtle-magenta - 'modus-theme-refine-magenta - 'modus-theme-nuanced-magenta - magenta-alt-other)))) - `(helm-selection ((,class ,@(modus-vivendi-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-vivendi-theme-scale modus-vivendi-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-vivendi-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 :foreground ,red-alt-other :slant ,modus-theme-slant))) -;;;;; 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-vivendi-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-vivendi-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-vivendi-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 :foreground ,fg-special-warm :slant ,modus-theme-slant))) - `(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-vivendi-theme-mixed-fonts) - :foreground ,magenta))) ; the capitalisation 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 ,@(modus-vivendi-theme-bold-weight) :foreground ,magenta-alt-other))) - `(info-colors-ref-item-other ((,class :foreground ,cyan))) - `(info-colors-ref-item-special-form ((,class ,@(modus-vivendi-theme-bold-weight) :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-vivendi-theme-scale modus-vivendi-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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(ivy-confirm-face ((,class :foreground ,cyan))) - `(ivy-current-match ((,class ,@(modus-vivendi-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-vivendi-theme-extra-completions - 'modus-theme-subtle-neutral - 'modus-theme-intense-neutral - 'modus-theme-subtle-neutral - fg-alt)))) - `(ivy-minibuffer-match-face-2 ((,class ,@(modus-vivendi-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-vivendi-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-vivendi-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-vivendi-theme-extra-completions - 'modus-theme-subtle-blue - 'modus-theme-intense-blue - 'modus-theme-nuanced-blue - blue-alt-other - 'bold)))) - `(ivy-modified-buffer ((,class :foreground ,yellow :slant ,modus-theme-slant))) - `(ivy-modified-outside-buffer ((,class :foreground ,yellow-alt :slant ,modus-theme-slant))) - `(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-vivendi-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 ,@(modus-vivendi-theme-bold-weight) :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-vivendi-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 :foreground ,cyan-alt :slant ,modus-theme-slant))) - `(lsp-face-semhl-function ((,class :foreground ,magenta))) - `(lsp-face-semhl-method ((,class :foreground ,magenta))) - `(lsp-face-semhl-namespace ((,class ,@(modus-vivendi-theme-bold-weight) :foreground ,magenta-alt))) - `(lsp-face-semhl-preprocessor ((,class :foreground ,red-alt-other))) - `(lsp-face-semhl-static-method ((,class :foreground ,magenta :slant ,modus-theme-slant))) - `(lsp-face-semhl-type-class ((,class :foreground ,magenta-alt))) - `(lsp-face-semhl-type-enum ((,class :foreground ,magenta-alt))) - `(lsp-face-semhl-type-primitive ((,class :foreground ,magenta-alt :slant ,modus-theme-slant))) - `(lsp-face-semhl-type-template ((,class :foreground ,magenta-alt :slant ,modus-theme-slant))) - `(lsp-face-semhl-type-typedef ((,class :foreground ,magenta-alt :slant ,modus-theme-slant))) - `(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 :foreground ,blue-alt-other))) - `(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 :height 0.99 :slant italic))) -;;;;; 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 :slant 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-vivendi-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-vivendi-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-vivendi-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-vivendi-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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(markdown-bold-face ((,class :inherit bold))) - `(markdown-code-face ((,class ,@(modus-vivendi-theme-mixed-fonts)))) - `(markdown-comment-face ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(markdown-footnote-marker-face ((,class :inherit bold :foreground ,cyan-alt))) - `(markdown-footnote-text-face ((,class :foreground ,fg-main :slant ,modus-theme-slant))) - `(markdown-gfm-checkbox-face ((,class :foreground ,cyan-alt-other))) - `(markdown-header-delimiter-face ((,class ,@(modus-vivendi-theme-bold-weight) :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-vivendi-theme-mixed-fonts) - :foreground ,cyan))) - `(markdown-html-attr-value-face ((,class ,@(modus-vivendi-theme-mixed-fonts) - :foreground ,blue))) - `(markdown-html-entity-face ((,class ,@(modus-vivendi-theme-mixed-fonts) - :foreground ,cyan))) - `(markdown-html-tag-delimiter-face ((,class ,@(modus-vivendi-theme-mixed-fonts) - :foreground ,fg-special-mild))) - `(markdown-html-tag-name-face ((,class ,@(modus-vivendi-theme-mixed-fonts) - :foreground ,magenta-alt))) - `(markdown-inline-code-face ((,class ,@(modus-vivendi-theme-mixed-fonts) - :foreground ,magenta))) - `(markdown-italic-face ((,class :foreground ,fg-special-cold :slant italic))) - `(markdown-language-info-face ((,class ,@(modus-vivendi-theme-mixed-fonts) - :foreground ,fg-special-cold))) - `(markdown-language-keyword-face ((,class ,@(modus-vivendi-theme-mixed-fonts) - :foreground ,green-alt-other))) - `(markdown-line-break-face ((,class :inherit modus-theme-refine-cyan :underline t))) - `(markdown-link-face ((,class :inherit link))) - `(markdown-link-title-face ((,class :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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-vivendi-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-vivendi-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 :foreground ,fg-inactive :slant italic))) - `(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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(markup-complex-replacement-face ((,class :box (:line-width 2 :color nil :style released-button) - :inherit modus-theme-refine-magenta))) - `(markup-emphasis-face ((,class :foreground ,fg-special-cold :slant italic))) - `(markup-error-face ((,class :inherit bold :foreground ,red))) - `(markup-gen-face ((,class :foreground ,magenta-alt))) - `(markup-internal-reference-face ((,class :inherit button :foreground ,fg-inactive))) - `(markup-italic-face ((,class :foreground ,fg-special-cold :slant italic))) - `(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-vivendi-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-vivendi-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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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 link))) - `(mu4e-modeline-face ((,class :foreground ,magenta-active))) - `(mu4e-moved-face ((,class :foreground ,yellow :slant ,modus-theme-slant))) - `(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 :foreground ,fg-mark-del :slant ,modus-theme-slant))) - `(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-vivendi-theme-syntax-foreground - cyan-alt cyan-alt-faint)))) - `(nxml-attribute-prefix ((,class ,@(modus-vivendi-theme-syntax-foreground - cyan-alt-other cyan-alt-other-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(nxml-attribute-value ((,class ,@(modus-vivendi-theme-syntax-foreground - blue blue-faint)))) - `(nxml-cdata-section-CDATA ((,class ,@(modus-vivendi-theme-syntax-foreground - red-alt red-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(nxml-cdata-section-delimiter ((,class ,@(modus-vivendi-theme-syntax-foreground - red-alt red-alt-faint)))) - `(nxml-char-ref-delimiter ((,class ,@(modus-vivendi-theme-syntax-foreground - green-alt-other green-alt-other-faint)))) - `(nxml-char-ref-number ((,class ,@(modus-vivendi-theme-syntax-foreground - green-alt-other green-alt-other-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(nxml-delimited-data ((,class :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(nxml-delimiter ((,class :foreground ,fg-dim))) - `(nxml-element-colon ((,class :foreground ,fg-main))) - `(nxml-element-local-name ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta magenta-faint)))) - `(nxml-element-prefix ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(nxml-entity-ref-delimiter ((,class ,@(modus-vivendi-theme-syntax-foreground - green-alt-other green-alt-other-faint)))) - `(nxml-entity-ref-name ((,class ,@(modus-vivendi-theme-syntax-foreground - green-alt-other green-alt-other-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(nxml-glyph ((,class :inherit modus-theme-intense-neutral))) - `(nxml-hash ((,class ,@(modus-vivendi-theme-syntax-foreground - blue-alt blue-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(nxml-heading ((,class :inherit bold))) - `(nxml-name ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(nxml-namespace-attribute-colon ((,class :foreground ,fg-main))) - `(nxml-namespace-attribute-prefix ((,class ,@(modus-vivendi-theme-syntax-foreground - cyan cyan-faint)))) - `(nxml-processing-instruction-target ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta-alt-other magenta-alt-other-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(nxml-prolog-keyword ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta-alt-other magenta-alt-other-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(nxml-ref ((,class ,@(modus-vivendi-theme-syntax-foreground - green-alt-other green-alt-other-faint) - ,@(modus-vivendi-theme-bold-weight)))) -;;;;; objed - `(objed-hl ((,class :background ,(if modus-vivendi-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-vivendi-theme-standard-completions - blue-alt-other blue-nuanced-bg - blue-refine-bg blue-refine-fg)))) - `(orderless-match-face-1 ((,class :inherit bold - ,@(modus-vivendi-theme-standard-completions - magenta-alt magenta-nuanced-bg - magenta-refine-bg magenta-refine-fg)))) - `(orderless-match-face-2 ((,class :inherit bold - ,@(modus-vivendi-theme-standard-completions - green green-nuanced-bg - green-refine-bg green-refine-fg)))) - `(orderless-match-face-3 ((,class :inherit bold - ,@(modus-vivendi-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-vivendi-theme-mixed-fonts) - ,@(modus-vivendi-theme-org-block bg-dim) - :foreground ,fg-main))) - `(org-block-begin-line ((,class ,@(modus-vivendi-theme-mixed-fonts) - ,@(modus-vivendi-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-vivendi-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) :foreground ,cyan-alt-other))) - `(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-vivendi-theme-mixed-fonts) - :foreground ,fg-alt))) - `(org-document-title ((,class :inherit (bold ,modus-theme-variable-pitch) :foreground ,fg-special-cold - ,@(modus-vivendi-theme-scale modus-vivendi-theme-scale-5)))) - `(org-done ((,class :box ,bg-region :background ,bg-dim :foreground ,green))) - `(org-drawer ((,class ,@(modus-vivendi-theme-mixed-fonts) - :foreground ,cyan))) - `(org-ellipsis ((,class :foreground nil))) ; inherits from the heading's colour - `(org-footnote ((,class :inherit button :foreground ,blue-alt))) - `(org-formula ((,class ,@(modus-vivendi-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 link))) - `(org-list-dt ((,class :inherit bold))) - `(org-macro ((,class :background ,blue-nuanced-bg :foreground ,magenta-alt-other))) - `(org-meta-line ((,class ,@(modus-vivendi-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 :box ,bg-region :background ,bg-dim :foreground ,magenta))) - `(org-property-value ((,class ,@(modus-vivendi-theme-mixed-fonts) - :foreground ,cyan-alt-other))) - `(org-quote ((,class ,@(modus-vivendi-theme-org-block bg-dim) - :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(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-vivendi-theme-mixed-fonts) - :foreground ,blue-nuanced))) - `(org-table ((,class ,@(modus-vivendi-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 :box ,bg-region :background ,bg-dim :foreground ,red-alt))) - `(org-upcoming-deadline ((,class :foreground ,red-alt-other))) - `(org-upcoming-distant-deadline ((,class :foreground ,red-nuanced))) - `(org-verbatim ((,class ,@(modus-vivendi-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 :foreground ,yellow-alt-other :slant ,modus-theme-slant))) - `(org-journal-calendar-scheduled-face ((,class :foreground ,red-alt-other :slant ,modus-theme-slant))) - `(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 :foreground ,green))) - `(org-roam-link-current ((,class :inherit button :foreground ,green-alt))) - `(org-roam-link-invalid ((,class :inherit button :foreground ,red))) - `(org-roam-link-shielded ((,class :inherit button :foreground ,yellow))) - `(org-roam-tag ((,class :foreground ,fg-alt :slant italic))) -;;;;; 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 link))) - `(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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(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 ,@(modus-vivendi-theme-bold-weight) :foreground ,blue-alt-other))) - `(paradox-highlight-face ((,class ,@(modus-vivendi-theme-bold-weight) :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-vivendi-theme-scale modus-vivendi-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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(pomidor-work-face ((,class :foreground ,green-alt-other))) -;;;;; 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 :foreground ,fg-alt :slant ,modus-theme-slant))) - `(racket-logger-debug-face ((,class :foreground ,blue-alt-other))) - `(racket-logger-info-face ((,class :foreground ,fg-lang-note))) - `(racket-logger-topic-face ((,class :foreground ,magenta :slant ,modus-theme-slant))) - `(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 :foreground ,yellow-nuanced :slant italic))) - `(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 :foreground ,yellow-alt-other :slant italic))) - `(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-vivendi-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-vivendi-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-vivendi-theme-scale modus-vivendi-theme-scale-4)))) - `(sallet-substring-match ((,class ,@(modus-vivendi-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-vivendi-theme-completions - ('opinionated (list bg-active)) - (_ (list bg-inactive)))))) - `(selectrum-primary-highlight ((,class :inherit bold - ,@(modus-vivendi-theme-standard-completions - magenta-alt magenta-nuanced-bg - magenta-refine-bg magenta-refine-fg)))) - `(selectrum-secondary-highlight ((,class :inherit bold - ,@(modus-vivendi-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 ,@(modus-vivendi-theme-bold-weight) :foreground ,magenta-alt))) -;;;;; show-paren-mode - `(show-paren-match ((,class ,@(modus-vivendi-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-vivendi-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 link))) - `(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-vivendi-theme-scale modus-vivendi-theme-scale-3)))) - `(swoop-face-line-buffer-name ((,class :inherit bold :foreground ,blue-alt - ,@(modus-vivendi-theme-scale modus-vivendi-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 :foreground ,magenta-alt))) -;;;;; 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 :foreground ,cyan-alt))) -;;;;; 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 ,@(modus-vivendi-theme-bold-weight) :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-vivendi-theme-syntax-foreground - red-alt red-alt-faint)))) - `(tuareg-font-lock-attribute-face ((,class ,@(modus-vivendi-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-vivendi-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-vivendi-theme-syntax-foreground - red red-faint)))) - `(tuareg-font-lock-interactive-output-face ((,class ,@(modus-vivendi-theme-syntax-foreground - blue-alt-other blue-alt-other-faint)))) - `(tuareg-font-lock-label-face ((,class ,@(modus-vivendi-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-vivendi-theme-syntax-foreground - magenta-alt magenta-alt-faint)))) - `(tuareg-font-lock-multistage-face ((,class :inherit bold :background ,bg-alt - ,@(modus-vivendi-theme-syntax-foreground - blue blue-faint)))) - `(tuareg-font-lock-operator-face ((,class ,@(modus-vivendi-theme-syntax-foreground - red-alt red-alt-faint)))) - `(tuareg-opam-error-face ((,class :inherit bold - ,@(modus-vivendi-theme-syntax-foreground - red red-faint)))) - `(tuareg-opam-pkg-variable-name-face ((,class ,@(modus-vivendi-theme-syntax-foreground - cyan cyan-faint) - :slant ,modus-theme-slant))) -;;;;; typescript - `(typescript-jsdoc-tag ((,class :foreground ,fg-special-mild :slant ,modus-theme-slant))) - `(typescript-jsdoc-type ((,class :foreground ,fg-special-calm :slant ,modus-theme-slant))) - `(typescript-jsdoc-value ((,class :foreground ,fg-special-cold :slant ,modus-theme-slant))) -;;;;; 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 :foreground ,red-active :slant ,modus-theme-slant))) - `(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 :foreground ,magenta-active :slant ,modus-theme-slant))) - `(vc-needs-update-state ((,class :foreground ,green-active :slant ,modus-theme-slant))) - `(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-vivendi-theme-syntax-foreground - blue blue-faint)))) - `(web-mode-block-attr-value-face ((,class ,@(modus-vivendi-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 ,@(modus-vivendi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(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 ,@(modus-vivendi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(web-mode-comment-face ((,class :foreground ,fg-alt :slant ,modus-theme-slant))) - `(web-mode-comment-keyword-face ((,class :inherit bold :background ,bg-dim - ,@(modus-vivendi-theme-syntax-foreground - yellow yellow-faint)))) - `(web-mode-constant-face ((,class ,@(modus-vivendi-theme-syntax-foreground - blue-alt-other blue-alt-other-faint)))) - `(web-mode-css-at-rule-face ((,class ,@(modus-vivendi-theme-syntax-foreground - blue-alt-other blue-alt-other-faint)))) - `(web-mode-css-color-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(web-mode-css-comment-face ((,class :inherit web-mode-comment-face))) - `(web-mode-css-function-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(web-mode-css-priority-face ((,class ,@(modus-vivendi-theme-syntax-foreground - yellow-alt yellow-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(web-mode-css-property-name-face ((,class ,@(modus-vivendi-theme-syntax-foreground - cyan cyan-faint)))) - `(web-mode-css-pseudo-class-face ((,class ,@(modus-vivendi-theme-syntax-foreground - cyan-alt-other cyan-alt-other-faint)))) - `(web-mode-css-selector-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta-alt-other magenta-alt-other-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(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 :foreground ,fg-special-cold :slant ,modus-theme-slant))) - `(web-mode-error-face ((,class :inherit modus-theme-intense-red))) - `(web-mode-filter-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta magenta-faint)))) - `(web-mode-folded-face ((,class :underline t))) - `(web-mode-function-call-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta magenta-faint)))) - `(web-mode-function-name-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta magenta-faint)))) - `(web-mode-html-attr-custom-face ((,class ,@(modus-vivendi-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-vivendi-theme-syntax-foreground - cyan cyan-faint)))) - `(web-mode-html-attr-value-face ((,class ,@(modus-vivendi-theme-syntax-foreground - blue-alt-other blue-alt-other-faint)))) - `(web-mode-html-entity-face ((,class ,@(modus-vivendi-theme-syntax-foreground - yellow-alt-other yellow-alt-other-faint) - :slant ,modus-theme-slant))) - `(web-mode-html-tag-bracket-face ((,class :foreground ,fg-dim))) - `(web-mode-html-tag-custom-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta magenta-faint)))) - `(web-mode-html-tag-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta magenta-faint)))) - `(web-mode-html-tag-namespaced-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta-alt magenta-alt-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(web-mode-html-tag-unclosed-face ((,class ,@(modus-vivendi-theme-syntax-foreground - red red-faint) - :underline t))) - `(web-mode-inlay-face ((,class :background ,bg-alt))) - `(web-mode-italic-face ((,class :slant 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-vivendi-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 ,@(modus-vivendi-theme-syntax-foreground - magenta-alt-other magenta-alt-other-faint) - ,@(modus-vivendi-theme-bold-weight)))) - `(web-mode-param-name-face ((,class ,@(modus-vivendi-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-vivendi-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-vivendi-theme-syntax-foreground - yellow yellow-faint)))) - `(web-mode-string-face ((,class ,@(modus-vivendi-theme-syntax-foreground - blue-alt blue-alt-faint)))) - `(web-mode-style-face ((,class :inherit web-mode-part-face))) - `(web-mode-symbol-face ((,class ,@(modus-vivendi-theme-syntax-foreground - blue-alt-other blue-alt-other-faint)))) - `(web-mode-type-face ((,class ,@(modus-vivendi-theme-syntax-foreground - magenta-alt magenta-alt-faint)))) - `(web-mode-underline-face ((,class :underline t))) - `(web-mode-variable-name-face ((,class ,@(modus-vivendi-theme-syntax-foreground - cyan cyan-faint)))) - `(web-mode-warning-face ((,class :inherit bold :background ,bg-alt - ,@(modus-vivendi-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 ,@(modus-vivendi-theme-bold-weight) :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 :foreground ,cyan :slant italic))) - `(woman-unknown ((,class :foreground ,yellow :slant italic))) -;;;;; xah-elisp-mode - `(xah-elisp-at-symbol ((,class :inherit bold - ,@(modus-vivendi-theme-syntax-foreground - red-alt red-alt-faint)))) - `(xah-elisp-cap-variable ((,class ,@(modus-vivendi-theme-syntax-foreground - red-alt-other red-alt-other-faint)))) - `(xah-elisp-command-face ((,class ,@(modus-vivendi-theme-syntax-foreground - cyan-alt-other cyan-alt-other-faint)))) - `(xah-elisp-dollar-symbol ((,class ,@(modus-vivendi-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-vivendi -;;;;; 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-vivendi -;;;;; 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-vivendi -;;;; ansi-colors - `(ansi-color-faces-vector [default bold shadow italic underline success warning error]) - `(ansi-color-names-vector [,bg-main ,red ,green ,yellow ,blue ,magenta ,cyan ,fg-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 [,bg-main ,red ,green ,yellow ,blue ,magenta ,cyan ,fg-alt]) - `(xterm-color-names-bright [,bg-alt ,red-alt ,green-alt ,yellow-alt ,blue-alt ,magenta-alt ,cyan-alt ,fg-main])) -;;; Conditional theme variables -;;;; org-src-block-faces - ;; this is a user option to add a colour-coded background to source - ;; blocks for various programming languages - (when (eq modus-vivendi-theme-org-blocks 'rainbow) - (custom-theme-set-variables - 'modus-vivendi - `(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)))))) +(deftheme modus-vivendi + "Accessible and customizable dark theme (WCAG AAA standard). +Conforms with the highest legibility standard for color contrast +between background and foreground in any given piece of text, +which corresponds to a minimum contrast in relative luminance of +7:1.") -;;; library provides -;;;###autoload -(when load-file-name - (add-to-list 'custom-theme-load-path - (file-name-as-directory (file-name-directory load-file-name)))) +(modus-themes-theme modus-vivendi) (provide-theme 'modus-vivendi) -(provide 'modus-vivendi-theme) - ;;; modus-vivendi-theme.el ends here -- 2.30.1