branch: externals/company
commit e27597f6f97d95b70c048a9530d2b03f336f315b
Author: Dmitry Gutov <dmi...@gutov.dev>
Commit: Dmitry Gutov <dmi...@gutov.dev>
company-capf--candidates: Make sure to check 'non-essential'
---
company-capf.el | 3 ++-
test/capf-tests.el | 3 ++-
2 files changed, 4 insertions(+), 2 deletions(-)
diff --git a/company-capf.el b/company-capf.el
index 09ba50b1a1..8d796f5f01 100644
--- a/company-capf.el
+++ b/company-capf.el
@@ -193,7 +193,8 @@ so we can't just use the preceding variable instead.")
(candidates (company-capf--candidates-1 input table pred
(length input)
meta
- interrupt))
+ (and non-essential
+ interrupt)))
(sortfun (cdr (assq 'display-sort-function meta)))
(last (last candidates))
(base-size (and (numberp (cdr last)) (cdr last))))
diff --git a/test/capf-tests.el b/test/capf-tests.el
index 10bb267728..bf7997ade0 100644
--- a/test/capf-tests.el
+++ b/test/capf-tests.el
@@ -149,7 +149,8 @@
(let ((completion-at-point-functions
(list (lambda ()
(list 1 1 obarray :company-use-while-no-input t))))
- (unread-command-events '(?a)))
+ (unread-command-events '(?a))
+ (non-essential t))
(company-capf 'candidates "a")
(error "Not reachable"))))
'new-input)))
