diff options
author | Case Duckworth | 2022-04-02 13:56:25 -0500 |
---|---|---|
committer | Case Duckworth | 2022-04-02 13:56:25 -0500 |
commit | 99ddcb1718f7debafb20ab6b15539dd437546b7d (patch) | |
tree | ef07c0964c2892c72d412b8388236113bdb44be2 | |
parent | Remove binding for crux-visit-shell-buffer (diff) | |
download | emacs-99ddcb1718f7debafb20ab6b15539dd437546b7d.tar.gz emacs-99ddcb1718f7debafb20ab6b15539dd437546b7d.zip |
Experiment: remove most font-lock faces
-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 | ||