47 lines
1.2 KiB
Org Mode
47 lines
1.2 KiB
Org Mode
#+TITLE: Selection
|
|
#+OPTIONS: toc:nil
|
|
#+PROPERTY: header-args:emacs-lisp :shebang ";;; -*- lexical-binding: t; -*-\n"
|
|
|
|
** Table of Contents :toc_4:
|
|
- [[#selection][Selection]]
|
|
|
|
** Selection
|
|
|
|
#+BEGIN_SRC emacs-lisp
|
|
(use-package selectrum
|
|
:hook (emacs-startup . selectrum-mode)
|
|
:config
|
|
|
|
(defun dot/selectrum-backspace ()
|
|
"In Selectrum file completion, backward kill sexp, delete char otherwise."
|
|
(interactive)
|
|
(if (and selectrum-is-active
|
|
minibuffer-completing-file-name)
|
|
(evil-with-state 'insert
|
|
(move-end-of-line 1) (backward-kill-sexp 1))
|
|
(evil-delete-backward-char-and-join 1))))
|
|
|
|
(use-package prescient
|
|
:after selectrum
|
|
:config
|
|
(setq prescient-filter-method '(literal regexp fuzzy))
|
|
(setq prescient-save-file (concat dot-cache-dir "/prescient-save.el"))
|
|
(prescient-persist-mode))
|
|
|
|
(use-package selectrum-prescient
|
|
:after (selectrum prescient)
|
|
:config
|
|
(selectrum-prescient-mode))
|
|
|
|
(use-package marginalia
|
|
:after selectrum
|
|
:config
|
|
(setq marginalia-annotators '(marginalia-annotators-heavy marginalia-annotators-light))
|
|
(marginalia-mode))
|
|
|
|
(use-package consult
|
|
:after selectrum
|
|
:config
|
|
(setq consult-project-root-function #'dot/find-project-root))
|
|
#+END_SRC
|