Add vertico multiform to specialise vertico layout for specific commands
This commit is contained in:
@@ -662,6 +662,17 @@ outperforming ~icomplete~ consistently when displaying results.
|
|||||||
"M-h" #'vertico-grid-left
|
"M-h" #'vertico-grid-left
|
||||||
"M-l" #'vertico-grid-right))
|
"M-l" #'vertico-grid-right))
|
||||||
#+end_src
|
#+end_src
|
||||||
|
**** Vertico multiform
|
||||||
|
This extension to vertico allows one to specialise the behaviour of
|
||||||
|
vertico for specific forms.
|
||||||
|
#+begin_src emacs-lisp
|
||||||
|
(use-package vertico-multiform
|
||||||
|
:after vertico
|
||||||
|
:init
|
||||||
|
(setq vertico-multiform-categories '((t grid)))
|
||||||
|
:config
|
||||||
|
(vertico-multiform-mode))
|
||||||
|
#+end_src
|
||||||
*** Consult
|
*** Consult
|
||||||
Consult provides some improved replacements for certain inbuilt
|
Consult provides some improved replacements for certain inbuilt
|
||||||
functions, and a few extensions as well. If we consider ivy/counsel
|
functions, and a few extensions as well. If we consider ivy/counsel
|
||||||
@@ -681,14 +692,19 @@ search system.
|
|||||||
consult-preview-excluded-files '("\\`/[^/|:]+:")
|
consult-preview-excluded-files '("\\`/[^/|:]+:")
|
||||||
consult-preview-key "M-'")
|
consult-preview-key "M-'")
|
||||||
:general
|
:general
|
||||||
(:states '(normal insert motion visual emacs)
|
([remap imenu] #'consult-imenu
|
||||||
[remap imenu] #'consult-imenu
|
[remap switch-to-buffer] #'consult-buffer
|
||||||
[remap switch-to-buffer] #'consult-buffer)
|
[remap info] #'consult-info)
|
||||||
(leader
|
(leader
|
||||||
"'" #'consult-register)
|
"'" #'consult-register)
|
||||||
(search-leader
|
(search-leader
|
||||||
"s" #'consult-line)
|
"s" #'consult-line)
|
||||||
:config
|
:config
|
||||||
|
(with-eval-after-load "vertico-multiform"
|
||||||
|
(add-multiple-to-list vertico-multiform-commands
|
||||||
|
'(consult-buffer grid)
|
||||||
|
'(consult-line list)))
|
||||||
|
|
||||||
(defun consult-line-isearch-history (&rest _)
|
(defun consult-line-isearch-history (&rest _)
|
||||||
"Add latest `consult-line' search pattern to the isearch history.
|
"Add latest `consult-line' search pattern to the isearch history.
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user