branch: externals/corfu
commit e39ac1f908836190f34f42c9c16124c50ee01149
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
Call corfu-abort
---
corfu.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/corfu.el b/corfu.el
index 58383b0..5db2f8a 100644
--- a/corfu.el
+++ b/corfu.el
@@ -480,7 +480,7 @@ Set to nil in order to disable confirmation."
(`(,beg ,end ,_table ,_pred)
(when (and (eq (marker-buffer beg) (current-buffer)) (<= beg (point)
end))
(corfu--update))))
- (completion-in-region-mode -1)))
+ (corfu-abort)))
(defun corfu--goto (index)
"Go to candidate with INDEX."
@@ -611,14 +611,14 @@ Set to nil in order to disable confirmation."
;; XXX Is the :exit-function handling sufficient?
(when-let (exit (plist-get corfu--extra-properties :exit-function))
(funcall exit str status))
- (completion-in-region-mode -1))
+ (corfu-abort))
(defun corfu-insert ()
"Insert current candidate."
(interactive)
(if (> corfu--total 0)
(corfu--insert 'finished)
- (completion-in-region-mode -1)))
+ (corfu-abort)))
(defun corfu--setup ()
"Setup Corfu completion state."
