From 4a3a67268dbcab2144cb820f9b63d51668bdb567 Mon Sep 17 00:00:00 2001 From: eriedaberrie Date: Thu, 30 Mar 2023 23:33:12 -0700 Subject: [PATCH] Use surface1 instead of bright colors for goggles backgrounds --- init.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/init.el b/init.el index 0bd411a..0bdbc40 100644 --- a/init.el +++ b/init.el @@ -244,9 +244,11 @@ :config (setq-default goggles-pulse t) (with-eval-after-load 'catppuccin-theme - (face-spec-set 'goggles-added `((t (:background ,(catppuccin-get-color 'green))))) - (face-spec-set 'goggles-removed `((t (:background ,(catppuccin-get-color 'red))))) - (face-spec-set 'goggles-changed `((t (:background ,(catppuccin-get-color 'blue)))))) + (let ((new-spec `((t (:background ,(catppuccin-get-color 'surface1)))))) + (dolist (f '(goggles-added + goggles-removed + goggles-changed)) + (face-spec-set f new-spec)))) (setcar (cdr (assq 'goggles-mode minor-mode-alist)) " O-O")) (use-package treesit