summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Mendler <mail@daniel-mendler.de>2022-12-11 07:38:31 +0100
committerDaniel Mendler <mail@daniel-mendler.de>2022-12-11 07:38:31 +0100
commit3655403f68e0b3ec784071eef3b2b79be08191f5 (patch)
tree88c263a5df1b6d58caf4996943136d92e47e34f6
parentb174dcee1debc864d3ea964ce520b834c5d68df6 (diff)
Fix predicate for asynchronous capf
-rw-r--r--corfu.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/corfu.el b/corfu.el
index bc5b0a9..ed94a2f 100644
--- a/corfu.el
+++ b/corfu.el
@@ -1135,7 +1135,7 @@ RESULT may be a capf result, if already present."
#'corfu--capf-wrapper)))
(`(,fun ,beg ,end ,table . ,plist)
(let ((completion-in-region-mode-predicate
- (lambda () (eq beg (car-safe (funcall fun)))))
+ (if result fun (lambda () (eq beg (car-safe (funcall fun))))))
(completion-extra-properties plist))
(setq completion-in-region--data
(list (if (markerp beg) beg (copy-marker beg))