corfu: show corfu popup when in insertable state (#800)

* fix: show corfu popup when in insertable state
This commit is contained in:
kiennq 2024-04-02 09:12:57 -07:00 committed by GitHub
parent 89aea40633
commit 198578a255
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 7 additions and 1 deletions

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,9 @@ 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