branch: externals/corfu
commit 26e455f51d6699195e3929d2a1b0aed44499e923
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
corfu-popupinfo: Simplify handling of delay=0
---
extensions/corfu-popupinfo.el | 9 +++------
1 file changed, 3 insertions(+), 6 deletions(-)
diff --git a/extensions/corfu-popupinfo.el b/extensions/corfu-popupinfo.el
index 8852e1dfac..1299ec8a6b 100644
--- a/extensions/corfu-popupinfo.el
+++ b/extensions/corfu-popupinfo.el
@@ -508,18 +508,15 @@ not be displayed until this command is called again, even
if
corfu-popupinfo-delay)
corfu-popupinfo-delay))
(corfu-popupinfo--toggle))
- (if (or (<= delay 0)
- (and (equal-including-properties cand
corfu-popupinfo--candidate)
- (corfu-popupinfo--visible-p)))
- (corfu-popupinfo--show cand)
- (when (corfu-popupinfo--visible-p)
+ (progn
+ (when (and (corfu-popupinfo--visible-p) (> delay 0))
(cond
(corfu-popupinfo-hide
(corfu-popupinfo--hide))
(corfu-popupinfo--candidate
(corfu-popupinfo--show corfu-popupinfo--candidate))))
(setq corfu-popupinfo--timer
- (run-at-time delay nil #'corfu-popupinfo--show cand)))
+ (run-at-time delay nil #'corfu-popupinfo--show cand)))
(unless (equal-including-properties cand
corfu-popupinfo--candidate)
(corfu-popupinfo--hide))))
(corfu-popupinfo--hide))))
