* company-capf.el (company--capf-data): Don't get confused by lambda exps.

[gnu-emacs-elpa] / packages / company / company-capf.el

diff --git a/packages/company/company-capf.el b/packages/company/company-capf.el
index 018c6b775f51b13c006b261e4851f1ccb32b6ac2..07d792c51d89ca3038a01cdaa34f0b7bd2908f9e 100644 (file)
--- a/packages/company/company-capf.el
+++ b/packages/company/company-capf.el
@@ -34,7 +34,7 @@
           (data (run-hook-wrapped 'completion-at-point-functions
                                   ;; Ignore misbehaving functions.
                                   #'completion--capf-wrapper 'optimist)))
-    (when (consp data) data)))
+    (when (and (consp data) (numberp (car data))) data)))
 
 (defun company-capf (command &optional arg &rest _args)
   "`company-mode' back-end using `completion-at-point-functions'.