eriedaberrie/.emacs.d
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Use surface1 instead of bright colors for goggles backgrounds

Browse source
This commit is contained in:
eriedaberrie 2023-03-30 23:33:12 -07:00
parent 518423333b
commit 4a3a67268d
1 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
init.el
View file

@ -244,9 +244,11 @@
:config :config
(setq-default goggles-pulse t) (setq-default goggles-pulse t)
(with-eval-after-load 'catppuccin-theme (with-eval-after-load 'catppuccin-theme
(face-spec-set 'goggles-added `((t (:background ,(catppuccin-get-color 'green))))) (let ((new-spec `((t (:background ,(catppuccin-get-color 'surface1))))))
(face-spec-set 'goggles-removed `((t (:background ,(catppuccin-get-color 'red))))) (dolist (f '(goggles-added
(face-spec-set 'goggles-changed `((t (:background ,(catppuccin-get-color 'blue)))))) goggles-removed
goggles-changed))
(face-spec-set f new-spec))))
(setcar (cdr (assq 'goggles-mode minor-mode-alist)) " O-O")) (setcar (cdr (assq 'goggles-mode minor-mode-alist)) " O-O"))
(use-package treesit (use-package treesit