emacs corfu blah blah blah
This commit is contained in:
parent
d9462251cc
commit
074796a801
1 changed files with 31 additions and 27 deletions
|
@ -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
|
||||||
|
|
Loading…
Reference in a new issue