diff options
| author | jao <jao@gnu.org> | 2021-04-05 03:16:06 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2021-04-05 03:16:06 +0100 |
| commit | 75bdceaf0be3eaca4be2d6ba34e0b37b5618e8fd (patch) | |
| tree | 08e71cd7a455c54a708308796227de42b679faca /completion.org | |
| parent | 182e571584f0f526c512195f269cf6a26fb48ce4 (diff) | |
| download | elibs-75bdceaf0be3eaca4be2d6ba34e0b37b5618e8fd.tar.gz elibs-75bdceaf0be3eaca4be2d6ba34e0b37b5618e8fd.tar.bz2 | |
completion clean-ups
Diffstat (limited to 'completion.org')
| -rw-r--r-- | completion.org | 19 |
1 files changed, 8 insertions, 11 deletions
diff --git a/completion.org b/completion.org index 37d5bbf..02a01d8 100644 --- a/completion.org +++ b/completion.org @@ -1,5 +1,9 @@ #+title: Completion configuration using selectrum, consult and friends +* completion styles + #+begin_src emacs-lisp + (setq completion-styles '(partial-completion emacs22 initials)) + #+end_src * company #+begin_src emacs-lisp (use-package company @@ -95,7 +99,7 @@ :config (defun jao-minicomp--orderless (&rest _) (setq-local completion-styles '(orderless))) - (add-hook 'minibuffer-setup-hook #'jao-minicomp--orderless)) + (advice-add 'minicomp--setup :before #'jao-minicomp--orderless)) (minicomp-mode 1) #+end_src * marginalia @@ -124,6 +128,7 @@ ("C-c B" . bookmark-set) ("C-c h" . consult-history) ("C-c i" . consult-imenu) + ("C-c I" . consult-project-imenu) ("C-c k" . consult-ripgrep) ("C-c K" . consult-git-grep) ("C-c l" . consult-locate) @@ -132,21 +137,13 @@ ("C-x r x" . consult-register) ("C-x r b" . consult-bookmark) ("M-g b" . consult-bookmark) - ("M-g g" . consult-goto-line) - ("M-g M-g" . consult-goto-line) - ("M-g o" . consult-outline) - ("M-g s" . consult-line) - ("M-g m" . consult-man) - ("M-g M" . consult-mark) - ("M-g K" . consult-git-grep) - ("M-g k" . consult-ripgrep) - ("M-g i" . consult-imenu) - ("M-g I" . consult-project-imenu) + ("M-g m" . consult-mark) ("M-g e" . consult-error) ("M-s m" . consult-multi-occur) ("M-s o" . consult-outline) ("M-y" . consult-yank-pop) ("C-s" . isearch-forward) + ("C-S-s" . consult-line) ("<help> a" . consult-apropos)) :custom ((consult-locate-command "locate --ignore-case --regexp ARG OPTS") |