branch: externals/company
commit 54f60ef523878c4d332f29df380f36cf2f165935
Author: Dmitry Gutov <dgu...@yandex.ru>
Commit: Dmitry Gutov <dgu...@yandex.ru>
Print the right buffer-local value
---
company.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/company.el b/company.el
index 6897c3c..a43eb32 100644
--- a/company.el
+++ b/company.el
@@ -2435,6 +2435,7 @@ If SHOW-VERSION is non-nil, show the version in the echo
area."
thereis (let ((company-backend b))
(setq backend b)
(company-call-backend 'prefix))))
+ (c-a-p-f completion-at-point-functions)
cc annotations)
(when (or (stringp prefix) (consp prefix))
(let ((company-backend backend))
@@ -2461,7 +2462,7 @@ If SHOW-VERSION is non-nil, show the version in the echo
area."
(memq 'company-capf backend)
(eq backend 'company-capf))
(insert "Value of c-a-p-f: "
- (pp-to-string completion-at-point-functions)))
+ (pp-to-string c-a-p-f)))
(insert "Major mode: " mode)
(insert "\n")
(insert "Prefix: " (pp-to-string prefix))
