Use company for completion-in-region instead of corfu

I found out it does completion-in-region, and honestly, it's a better
interface, and more uniform.

1 files changed, 7 insertions, 13 deletions

@@ -691,7 +691,13 @@ if ripgrep is installed, otherwise `consult-grep'."
            xref-show-definitions-function #'consult-xref)
 
   ;; Projects
-  (:option consult-project-root-function #'vc-root-dir))
+  (:option consult-project-root-function #'vc-root-dir)
+
+  ;; Competion-at-point (complete-region)
+  (:global "M-/" completion-at-point)
+  (:option completion-in-region-function #'consult-completion-in-region
+           completion-cycle-threshold 3
+           tab-always-indent 'complete))
 
 (setup (:straight marginalia)
   (:option marginalia-annotators '(marginalia-annotators-heavy
@@ -779,18 +785,6 @@ if ripgrep is installed, otherwise `consult-grep'."
                      (apheleia--get-formatter-command)))
       (indent-region (point-min) (point-max)))))
 
-(setup (:straight (corfu
-                   :host github
-                   :repo "minad/corfu"))
-  (:option completion-cycle-threshold 3
-           tab-always-indent 'complete
-           corfu-cycle t)
-  (:with-map corfu-map
-    (:bind "TAB" corfu-next
-           "S-TAB" corfu-previous))
-  (:hook-into prog-mode
-              eshell-mode))
-
 ;;; Lisps
 (defvar lispy-modes '(emacs-lisp-mode
                       eval-expression-minibuffer