X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/69228c73e01ec9a3ae6cf5a1f8c4d83d8c6f4999..6067bc693b739c6b5d17393809404e0aef831a2a:/company.el

diff --git a/company.el b/company.el
index 9e45e9258..27bee545a 100644
--- a/company.el
+++ b/company.el
@@ -1356,9 +1356,9 @@ from the rest of the backends in the group, if any, will be left at the end."
                    (or (not b1) (not (memq b1 low-priority)))))))))))
 
 (defun company-sort-prefer-same-case-prefix (candidates)
-  "Prefer CANDIDATES with the same case sensitive prefix.
+  "Prefer CANDIDATES with the exact same prefix.
 If a backend returns case insensitive matches, candidates with the an exact
-prefix match will be prioritized even if this changes the lexical order."
+prefix match (same case) will be prioritized."
   (cl-loop for candidate in candidates
            if (string-prefix-p company-prefix candidate)
            collect candidate into same-case