Sort candidates.

diff --git a/company.el b/company.el
index dbc51d311a978d57e5e4c506da187c7bf82197fa..f7fe2406787d4aacf31ce2bd5fa217837cfa3f9d 100644 (file)
--- a/company.el
+++ b/company.el
@@ -256,6 +256,8 @@
                     company-common (try-completion prefix company-candidates)
                     company-selection 0
                     company-point (point))
+              (unless (funcall company-backend 'sorted)
+                (setq company-candidates (sort company-candidates 'string<)))
               (company-call-frontends 'update))
             (return prefix)))
         (unless (and company-candidates