From 07bb1debd8a9556dd013afd8fc724f06a46da8cc Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Tue, 3 Jan 2023 23:38:53 -0500 Subject: Use named function for setting custom faces --- init.el | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/init.el b/init.el index 1c9ee1a..2eddc6f 100644 --- a/init.el +++ b/init.el @@ -62,12 +62,14 @@ :config (add-to-list 'modus-themes-org-agenda '(header-block . (no-scale))) + (defun km/modus-themes-set-custom-faces () + (set-face-attribute 'git-annex-dired-annexed-available nil + :foreground (modus-themes-color 'green)) + (set-face-attribute 'git-annex-dired-annexed-unavailable nil + :foreground (modus-themes-color 'red))) (add-hook 'modus-themes-after-load-theme-hook - (lambda () - (set-face-attribute 'git-annex-dired-annexed-available nil - :foreground (modus-themes-color 'green)) - (set-face-attribute 'git-annex-dired-annexed-unavailable nil - :foreground (modus-themes-color 'red)))) + #'km/modus-themes-set-custom-faces) + (load-theme 'modus-operandi t)) -- cgit v1.2.3