[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/corfu bf024f2 1/2: Do not bind while-no-input-ignore-ev
From: |
ELPA Syncer |
Subject: |
[elpa] externals/corfu bf024f2 1/2: Do not bind while-no-input-ignore-events |
Date: |
Thu, 4 Nov 2021 15:57:11 -0400 (EDT) |
branch: externals/corfu
commit bf024f2c5fd4b46bd03621b468bf941dc5fc8204
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Do not bind while-no-input-ignore-events
---
corfu.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/corfu.el b/corfu.el
index 201574c..7bf8214 100644
--- a/corfu.el
+++ b/corfu.el
@@ -543,8 +543,7 @@ completion began less than that number of seconds ago."
(defun corfu--update-candidates (str pt table pred)
"Update candidates from STR, PT, TABLE and PRED."
- (pcase (let ((while-no-input-ignore-events '(selection-request)))
- (while-no-input (corfu--recompute-candidates str pt table pred)))
+ (pcase (while-no-input (corfu--recompute-candidates str pt table pred))
('nil (keyboard-quit))
(`(,base ,total ,candidates ,hl ,metadata)
(setq corfu--input (cons str pt)