emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/corfu e39ac1f 4/6: Call corfu-abort


From: Protesilaos Stavrou
Subject: [elpa] externals/corfu e39ac1f 4/6: Call corfu-abort
Date: Thu, 29 Apr 2021 06:51:18 -0400 (EDT)

branch: externals/corfu
commit e39ac1f908836190f34f42c9c16124c50ee01149
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    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."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]