Completing common should not call company-finish unless unique.

diff --git a/company.el b/company.el
index 086c021c749c25080b7ca33fa031be8f1306acb5..655806714afe229b66237b9a5e618287aea65e73 100644 (file)
--- a/company.el
+++ b/company.el
@@ -1064,8 +1064,8 @@ followed by `company-search-kill-others' after each input."
   "Complete the common part of all candidates."
   (interactive)
   (when (company-manual-begin)
-    (if (equal company-common (car company-candidates))
-        ;; for success message
+    (if (and (not (cdr company-candidates))
+             (equal company-common (car company-candidates)))
         (company-complete-selection)
       (insert (company-strip-prefix company-common)))))