Work around mysterious pseudo-tooltip error.

diff --git a/company.el b/company.el
index 6b0b7bdb835e96e20372e7ac9db0a7829d8169d4..5a09eb80e2140a69040cc541c7ee5209856b7953 100644 (file)
--- a/company.el
+++ b/company.el
@@ -1464,8 +1464,9 @@ Example:
 
 (defun company-pseudo-tooltip-show-at-point (pos)
   (let ((col-row (posn-actual-col-row (posn-at-point pos))))
-    (company-pseudo-tooltip-show (1+ (cdr col-row)) (car col-row)
-                                 company-selection)))
+    (when col-row
+      (company-pseudo-tooltip-show (1+ (cdr col-row)) (car col-row)
+                                   company-selection))))
 
 (defun company-pseudo-tooltip-edit (lines selection)
   (let* ((old-string (overlay-get company-pseudo-tooltip-overlay 'company-old))