company--begin-new: Check the value of c

diff --git a/company.el b/company.el
index 9160c0def77dde425f15b0f304e57d868438d7a8..f0b1f1d7043d2ccddf1604badb0e9076f9c34e4f 100644 (file)
--- a/company.el
+++ b/company.el
@@ -1476,9 +1476,10 @@ from the rest of the back-ends in the group, if any, will be left at the end."
               (progn
                 (when company--manual-action
                   (message "No completion found"))
-                ;; t means complete/unique.
-                ;; Run the hooks anyway, to e.g. clear the cache.
-                (company-cancel 'unique))
+                (when (eq c t)
+                  ;; t means complete/unique.
+                  ;; Run the hooks anyway, to e.g. clear the cache.
+                  (company-cancel 'unique)))
             (when company--manual-action
               (setq company--manual-prefix prefix))
             (company-update-candidates c)