[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/corfu da272f8a8e 2/2: Only quit if (= beg end) and not
From: |
ELPA Syncer |
Subject: |
[elpa] externals/corfu da272f8a8e 2/2: Only quit if (= beg end) and not initializing |
Date: |
Thu, 3 Feb 2022 09:57:23 -0500 (EST) |
branch: externals/corfu
commit da272f8a8ea31b8e676861705f7fa2dc939b6b9c
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Only quit if (= beg end) and not initializing
---
corfu.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/corfu.el b/corfu.el
index 1356825a6b..4e16a26c35 100644
--- a/corfu.el
+++ b/corfu.el
@@ -246,7 +246,7 @@ The completion backend can override this with
"Scroll position.")
(defvar-local corfu--input nil
- "Cons of last prompt contents and point or t.")
+ "Cons of last prompt contents and point.")
(defvar-local corfu--preview-ov nil
"Current candidate overlay.")
@@ -846,7 +846,8 @@ there hasn't been any input, then quit."
(`(,beg ,end . ,_)
(when (let ((pt (point)))
(and (eq (marker-buffer beg) (current-buffer))
- (< beg end) (<= beg pt end)
+ (<= beg pt end)
+ (or (not corfu--input) (< beg end))
(save-excursion
(goto-char beg)
(<= (line-beginning-position) pt (line-end-position)))