diff options
| -rw-r--r-- | init.el | 22 |
1 files changed, 22 insertions, 0 deletions
| diff --git a/init.el b/init.el index 5f8e659..4ea6f90 100644 --- a/init.el +++ b/init.el | |||
| @@ -1790,6 +1790,28 @@ See also `crux-reopen-as-root-mode'." | |||
| 1790 | :now))))) | 1790 | :now))))) |
| 1791 | (:face modus-themes-tab-active ((t :bold nil)) | 1791 | (:face modus-themes-tab-active ((t :bold nil)) |
| 1792 | modus-themes-tab-inactive ((t :italic t))) | 1792 | modus-themes-tab-inactive ((t :italic t))) |
| 1793 | |||
| 1794 | (add-hook 'modus-themes-after-load-theme-hook | ||
| 1795 | (defun +modus-themes-mostly-monochrome () | ||
| 1796 | "Set up mdous-themes to be mostly monochrome." | ||
| 1797 | (modus-themes-with-colors | ||
| 1798 | (custom-set-faces | ||
| 1799 | `(font-lock-builtin-face ((,class :inherit modus-themes-bold :foreground unspecified))) | ||
| 1800 | `(font-lock-comment-delimiter-face ((,class :inherit font-lock-comment-face))) | ||
| 1801 | `(font-lock-comment-face ((,class :inherit modus-themes-slant :foreground ,fg-docstring))) | ||
| 1802 | `(font-lock-constant-face ((,class :foreground unspecified))) | ||
| 1803 | `(font-lock-doc-face ((,class :inherit modus-themes-slant :foreground ,fg-docstring))) | ||
| 1804 | `(font-lock-function-name-face ((,class :foreground unspecified))) | ||
| 1805 | `(font-lock-keyword-face ((,class :inherit modus-themes-bold :foreground unspecified))) | ||
| 1806 | `(font-lock-negation-char-face ((,class :inherit modus-themes-bold :foreground unspecified))) | ||
| 1807 | `(font-lock-preprocessor-face ((,class :foreground unspecified))) | ||
| 1808 | `(font-lock-regexp-grouping-backslash ((,class :foreground ,fg-escape-char-backslash))) | ||
| 1809 | `(font-lock-regexp-grouping-construct ((,class :foreground ,fg-escape-char-construct))) | ||
| 1810 | `(font-lock-string-face ((,class :inherit modus-themes-slant :foreground unspecified))) | ||
| 1811 | `(font-lock-type-face ((,class :inherit modus-themes-bold :foreground unspecified))) | ||
| 1812 | `(font-lock-variable-name-face ((,class :foreground unspecified))) | ||
| 1813 | `(font-lock-warning-face ((,class :inherit modus-themes-bold :foreground ,red-nuanced-fg))))))) | ||
| 1814 | |||
| 1793 | (dawn-schedule #'modus-themes-load-operandi | 1815 | (dawn-schedule #'modus-themes-load-operandi |
| 1794 | #'modus-themes-load-vivendi)) | 1816 | #'modus-themes-load-vivendi)) |
| 1795 | 1817 | ||