emacs corfu blah blah blah

This commit is contained in:
Sakooooo 2024-11-26 19:00:50 +04:00
parent d9462251cc
commit 074796a801
Signed by: sako
GPG key ID: FE52FD65B76E4751

View file

@ -577,34 +577,38 @@ kept-old-versions 5)
#+end_src #+end_src
** Corfu ** Corfu
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package corfu (use-package corfu
:bind (:map corfu-map :bind (:map corfu-map
("C-j" . corfu-next) ("M-SPC" . corfu-insert-separator)
("C-k" . corfu-previous) ("RET" . nil)
("TAB" . corfu-insert) ("TAB" . corfu-next)
([tab] . corfu-insert) ([tab] . corfu-next)
("C-f" . corfu-insert)) ("S-TAB" . corfu-previous)
:custom ([backtab] . corfu-previous)
(corfu-cycle t) ("S-<return>" . corfu-insert))
(corfu-auto t) :custom
(corfu-preview-current nil) (corfu-cycle t)
(corfu-quit-at-boundary t) (corfu-auto t)
(corfu-quit-no-match t) (corfu-preview-current 'insert)
(corfu-min-chars 3) (corfu-echo-documentation 0.20)
(corfu-auto-delay 0) ;; (corfu-quit-at-boundary t)
(corfu-auto-prefix 0) (corfu-quit-at-boundary 'seperator)
:init (corfu-quit-no-match t)
(global-corfu-mode) (corfu-min-chars 3)
(corfu-auto-delay 0.0)
(corfu-auto-prefix 2)
:init
(global-corfu-mode)
(corfu-history-mode))
;; (defun corfu-enable-in-minibuffer ()
;; "Enable Corfu in the minibuffer if `completion-at-point' is bound."
;; (when (where-is-internal #'completion-at-point (list (current-local-map)))
;; (setq-local corfu-auto nil) ;; Enable/disable auto completion
;; (setq-local corfu-echo-delay nil ;; Disable automatic echo and popup
;; corfu-popupinfo-delay nil)
;; (corfu-mode 1)))
(defun corfu-enable-in-minibuffer () ;; (add-hook 'minibuffer-setup-hook #'corfu-enable-in-minibuffer))
"Enable Corfu in the minibuffer if `completion-at-point' is bound."
(when (where-is-internal #'completion-at-point (list (current-local-map)))
(setq-local corfu-auto nil) ;; Enable/disable auto completion
(setq-local corfu-echo-delay nil ;; Disable automatic echo and popup
corfu-popupinfo-delay nil)
(corfu-mode 1)))
(add-hook 'minibuffer-setup-hook #'corfu-enable-in-minibuffer))
#+end_src #+end_src
** Dashboard ** Dashboard
#+begin_src emacs-lisp #+begin_src emacs-lisp