Slightly better result sorting in company.

ansible/roles/emacs/files/elisp/common-lsp.el

@@ -10,13 +10,13 @@
               ;; C-M-.
               ([remap xref-find-apropos] . #'consult-eglot-symbols)
               )
-  :hook (
-         (eglot-managed-mode . (lambda ()
-                                 (when (eglot-managed-p)
-                                   (corfu-mode +1)
-                                   )
-                                 ))
-         )
+  ;; :hook (
+  ;;        (eglot-managed-mode . (lambda ()
+  ;;                                (when (eglot-managed-p)
+  ;;                                  (corfu-mode +1)
+  ;;                                  )
+  ;;                                ))
+  ;;        )
   :config
   (fset #'jsonrpc--log-event #'ignore) ;; Disable logging LSP traffic for performance boost
   (set-face-attribute 'eglot-highlight-symbol-face nil :background "#0291a1" :foreground "black")
@@ -38,6 +38,7 @@
   :hook (eglot-managed-mode . company-mode)
   :config
   (setq company-backends '((company-capf)))
+  (setq company-transformers '(company-sort-by-occurrence))
   )
 
 ;; (use-package company-box