emacs: make git gutter look like Zed's
1 file changed, 13 insertions(+), 0 deletions(-)
changed files
M user/settings/emacs/theme.el → user/settings/emacs/theme.el
@@ -9,6 +9,19 @@ (mapc #'disable-theme custom-enabled-themes) (load-theme light-mode-theme :noconfirm :noenable) (load-theme dark-mode-theme :noconfirm :noenable) + (defun my/modus-themes-custom (&rest _) + (modus-themes-with-colors + (custom-set-faces + '(region ((t :extend nil))) + `(git-gutter:added ((,c :foreground ,bg-added-fringe :background nil))) + `(git-gutter:deleted ((,c :foreground ,bg-removed-fringe :background nil))) + `(git-gutter:modified ((,c :foreground ,bg-changed-fringe :background nil))) + `(git-gutter-fr:added ((,c :foreground ,bg-added-fringe :background nil))) + `(git-gutter-fr:deleted ((,c :foreground ,bg-removed-fringe :background nil))) + `(git-gutter-fr:modified ((,c :foreground ,bg-changed-fringe :background nil)))))) + + (add-hook 'modus-themes-after-load-theme-hook #'my/modus-themes-custom) + (defun my/switch-theme-variant (mode) (interactive (list (intern (completing-read "Make it: " '("light" "dark") nil t))))