emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

ophints: Add hooks for lispyville

Browse source 
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.
This commit is contained in:
Grazfather 2021-05-09 20:16:25 -04:00
parent 10f9ec44a0
commit 0d5ed1e257
1 changed files with 39 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

40
modules/ui/ophints/config.el
View file

@ -23,7 +23,45 @@
'(+eval:region '(+eval:region
:face evil-goggles-yank-face :face evil-goggles-yank-face
:switch evil-goggles-enable-yank :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 (use-package! volatile-highlights