Add vertico multiform to specialise vertico layout for specific commands

This commit is contained in:
2025-02-17 16:40:45 +00:00
parent 36cc4bfcf8
commit 4e4238a522

View File

@@ -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.