72 lines
1.7 KiB
EmacsLisp
72 lines
1.7 KiB
EmacsLisp
;; -*- coding: utf-8; lexical-binding: t; -*-
|
|
|
|
(require 'init-package)
|
|
(add-pkg-in-pkg-dir "marginalia")
|
|
(add-pkg-in-pkg-dir "vertico")
|
|
(add-pkg-in-pkg-dir "corfu")
|
|
(add-pkg-in-pkg-dir "orderless")
|
|
(add-pkg-in-pkg-dir "corfu-doc")
|
|
(add-pkg-in-pkg-dir "cape")
|
|
(add-pkg-in-pkg-dir "consult")
|
|
(add-pkg-in-pkg-dir "emacs-corfu-terminal")
|
|
(add-pkg-in-pkg-dir "emacs-popon")
|
|
(add-pkg-in-pkg-dir "emacs-corfu-doc-terminal")
|
|
(add-pkg-in-pkg-dir "embark")
|
|
|
|
|
|
(require 'marginalia)
|
|
(marginalia-mode 1)
|
|
|
|
|
|
(require 'vertico)
|
|
(vertico-mode 1)
|
|
(require 'vertico-indexed)
|
|
(vertico-indexed-mode 1)
|
|
(require 'vertico-sort)
|
|
(setq vertico-sort-function 'vertico-sort-history-length-alpha)
|
|
|
|
|
|
(require 'corfu)
|
|
(global-corfu-mode 'toggle)
|
|
(setq corfu-auto t
|
|
corfu-auto-delay 0.05
|
|
corfu-auto-prefix 2
|
|
corfu-quit-no-match t)
|
|
|
|
(require 'orderless)
|
|
(setq completion-styles '(orderless basic partial-completion flex)
|
|
completion-category-overrides '((file (styles basic partial-completion))))
|
|
|
|
(require 'corfu-doc)
|
|
(add-hook 'corfu-mode-hook #'corfu-doc-mode)
|
|
|
|
(lazy-load-local-keys
|
|
'(("M-SPC" . corfu-quick-complete))
|
|
corfu-map
|
|
"corfu-quick")
|
|
|
|
(lazy-load-global-keys
|
|
'(("C-'" . cape-file))
|
|
"cape")
|
|
|
|
|
|
(require 'init-keybindings)
|
|
(lazy-load-local-keys
|
|
'(("fr" . consult-recent-file))
|
|
creature/map "consult")
|
|
(with-eval-after-load 'consult
|
|
(recentf-mode 1))
|
|
|
|
|
|
(defun creature/load-corfu-terminal-in-no-gui-env ()
|
|
(unless (display-graphic-p)
|
|
(require 'corfu-terminal)
|
|
(require 'corfu-doc-terminal)
|
|
(corfu-terminal-mode 1)
|
|
(corfu-doc-terminal-mode 1)))
|
|
|
|
(add-hook 'emacs-startup-hook #'creature/load-corfu-terminal-in-no-gui-env)
|
|
(add-hook 'server-after-make-frame-hook #'creature/load-corfu-terminal-in-no-gui-env)
|
|
|
|
(provide 'init-vertico)
|