dotfiles-misc/protesilaos.dotfiles
1
0
Fork 0
mirror of https://github.com/protesilaos/dotfiles.git synced 2026-09-10 07:16:20 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity

emacs: tweak how the "next" and "complete" private vertico to move to the first candidate

Browse source 
I believe this was working before, but maybe my latest change affected
it. Anyway, this is more explicit.
This commit is contained in:
Protesilaos Stavrou 2025-01-07 09:41:38 +02:00
parent b5f4a45154
commit 6bab223970
No known key found for this signature in database
GPG key ID: 99BD6459CD5CA3EA
2 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
emacs/.emacs.d/prot-emacs.org
View file

@ -17308,7 +17308,7 @@ automatically.")
This is done to accommodate `prot-vertico-multiform-minimal'."
(interactive)
(if vertico-unobtrusive-mode
(let ((vertico--index 0))
(progn
(vertico-multiform-vertical)
(vertico-next 1))
(vertico-next 1)))
@ -17330,7 +17330,7 @@ This is done to accommodate `prot-vertico-multiform-minimal'."
(if (and vertico-unobtrusive-mode (> vertico--total 1))
(progn
(minibuffer-complete)
(vertico-multiform-vertical))
(prot-vertico-private-next))
(vertico-insert)))
(provide 'prot-vertico)

4
emacs/.emacs.d/prot-lisp/prot-vertico.el
View file

@ -75,7 +75,7 @@ automatically.")
This is done to accommodate `prot-vertico-multiform-minimal'."
(interactive)
(if vertico-unobtrusive-mode
(let ((vertico--index 0))
(progn
(vertico-multiform-vertical)
(vertico-next 1))
(vertico-next 1)))
@ -97,7 +97,7 @@ This is done to accommodate `prot-vertico-multiform-minimal'."
(if (and vertico-unobtrusive-mode (> vertico--total 1))
(progn
(minibuffer-complete)
(vertico-multiform-vertical))
(prot-vertico-private-next))
(vertico-insert)))
(provide 'prot-vertico)