awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-09 12:57:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

selectrum: add experimental vertico flag

Browse Source
This commit is contained in:
Itai Y. Efrat
2021-06-30 17:36:08 +03:00
parent 78955d8a64
commit d3eff82b9d
7 changed files with 90 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
modules/completion/selectrum/autoload/selectrum.el
View File

@ -123,12 +123,24 @@ Supports exporting consult-grep to wgrep, file to wdeired, and consult-location
(defun +selectrum/next-candidate-preview ()
"Move to next candidate and preivew it"
(interactive)
(selectrum-next-candidate)
(if (featurep! :completion selectrum +vertico)
(vertico-next)
(selectrum-next-candidate))
(+selectrum/embark-preview))
;;;###autoload
(defun +selectrum/previous-candidate-preview ()
"Move to previous candidate and preview it"
(interactive)
(selectrum-previous-candidate)
(if (featurep! :completion selectrum +vertico)
(vertico-previous)
(selectrum-previous-candidate))
(+selectrum/embark-preview))
;;;###autoload
(defun +selectrum/repeat ()
"Repeat the last selectrum/vertico command."
(interactive)
(if (featurep! :completion selectrum +vertico)
(user-error "The vertico flag doesn't support repeating commands (yet)")
(selectrum-repeat)))