emacs
/
evil-collection
mirror of https://github.com/jojojames/evil-collection.git
1
0
Fork 0
Code Issues Releases Wiki Activity

fix: show corfu popup when in insertable state

This commit is contained in:
Kien Nguyen 2024-03-31 01:33:50 -07:00
parent 89aea40633
commit 83e0fd74ab
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
modes/corfu/evil-collection-corfu.el
View File

@ -71,6 +71,10 @@ This key theme variable may be refactored in the future so use with caution."
(const
:tag "Magic Backspace" magic-backspace))))
(defcustom evil-collection-corfu-supported-states '(insert replace emacs)
"The `evil-state's which `corfu' function can be requested."
:type '(repeat symbol))
;;;###autoload
(defun evil-collection-corfu-setup ()
"Set up `evil' bindings for `corfu'."
@ -129,7 +133,10 @@ This key theme variable may be refactored in the future so use with caution."
(kbd "C-u") 'corfu-scroll-down))
(advice-add 'corfu--setup :after (lambda (&rest _) (evil-normalize-keymaps)))
(advice-add 'corfu--teardown :after (lambda (&rest _) (evil-normalize-keymaps))))
(advice-add 'corfu--teardown :after (lambda (&rest _) (evil-normalize-keymaps)))
(advice-add 'corfu--continue-p
:before-while (lambda (&rest _) (memq evil-state evil-collection-corfu-supported-states)))
)
(provide 'evil-collection-corfu)
;;; evil-collection-corfu.el ends here