From 0d5ed1e2576a627add0db0cd7c29e60f8836a291 Mon Sep 17 00:00:00 2001 From: Grazfather Date: Sun, 9 May 2021 20:16:25 -0400 Subject: [PATCH] ophints: Add hooks for lispyville Because lispyville (depending on how you configure it) replaces some evil-mode mappings with its own function, we lose the indication of our deletions/yanks/etc. This change adds all lispyville functions to the evil-goggles--commands list. --- modules/ui/ophints/config.el | 40 +++++++++++++++++++++++++++++++++++- 1 file changed, 39 insertions(+), 1 deletion(-) diff --git a/modules/ui/ophints/config.el b/modules/ui/ophints/config.el index f1349a549..faf383cc3 100644 --- a/modules/ui/ophints/config.el +++ b/modules/ui/ophints/config.el @@ -23,7 +23,45 @@ '(+eval:region :face evil-goggles-yank-face :switch evil-goggles-enable-yank - :advice evil-goggles--generic-async-advice))) + :advice evil-goggles--generic-async-advice)) + (when (featurep! :editor lispy) + (pushnew! evil-goggles--commands + '(lispyville-delete + :face evil-goggles-delete-face + :switch evil-goggles-enable-delete + :advice evil-goggles--generic-blocking-advice) + '(lispyville-delete-line + :face evil-goggles-delete-face + :switch evil-goggles-enable-delete + :advice evil-goggles--delete-line-advice) + '(lispyville-yank + :face evil-goggles-yank-face + :switch evil-goggles-enable-yank + :advice evil-goggles--generic-async-advice) + '(lispyville-yank-line + :face evil-goggles-yank-face + :switch evil-goggles-enable-yank + :advice evil-goggles--generic-async-advice) + '(lispyville-change + :face evil-goggles-change-face + :switch evil-goggles-enable-change + :advice evil-goggles--generic-blocking-advice) + '(lispyville-change-line + :face evil-goggles-change-face + :switch evil-goggles-enable-change + :advice evil-goggles--generic-blocking-advice) + '(lispyville-change-whole-line + :face evil-goggles-change-face + :switch evil-goggles-enable-change + :advice evil-goggles--generic-blocking-advice) + '(lispyville-indent + :face evil-goggles-indent-face + :switch evil-goggles-enable-indent + :advice evil-goggles--generic-async-advice) + '(lispyville-join + :face evil-goggles-join-face + :switch evil-goggles-enable-join + :advice evil-goggles--join-advice)))) (use-package! volatile-highlights