Out with company, in with corfu

config-min.org

@@ -393,10 +393,15 @@
                  (window-height   . 0.10)))
 
   ;; Autocompletion
-  (use-package company)
-  (setq company-idle-delay 0.2)
-  (add-hook 'emacs-lisp-mode-hook 'company-mode)
-  (add-hook 'lisp-mode-hook 'company-mode)
+  (use-package corfu
+    :after orderless
+    :custom
+    (corfu-quit-at-boundary nil)
+    (corfu-quit-no-match t)
+    (corfu-cycle t)
+    (corfu-auto t)
+    :init
+    (global-corfu-mode))
 
   ;; Magit
   (use-package magit)

config-programming.org

@@ -3,10 +3,17 @@
 * lsp
 #+begin_src emacs-lisp
   (use-package lsp-mode
+    :after corfu
     :commands lsp
     :config
     (setq lsp-lens-enable nil)
-    (setq read-process-output-max (* 1024 1024)))
+    (setq read-process-output-max (* 1024 1024))
+    (setq lsp-completion-provider :none)
+    ;; (defun corfu-lsp-setup ()
+    ;;   (setq-local completion-styles '(orderless)
+    ;;               completion-category-defaults nil))
+    ;; (add-hook 'lsp-mode-hook #'corfu-lsp-setup)
+    )
 
   (use-package lsp-ui
     :after lsp-mode
@@ -35,6 +42,7 @@
   (let ((fetcher (if (or noninteractive my-ec/at-ti) "github" "github-ssh")))
     (quelpa `(yasnippet :repo "pestctrl/yasnippet" :branch "quit-undo-tree" :fetcher ,fetcher)))
   (use-package java-snippets)
+  (add-hook 'lsp-mode-hook 'yas-minor-mode)
 #+END_SRC
 
 * c++