bump: :completion vertico
iyefrat/all-the-icons-completion@9650041854 -> iyefrat/all-the-icons-completion@a0f34d68cc minad/consult@dc6e455861 -> minad/consult@166e3b03c3 minad/marginalia@cb1d3ba604 -> minad/marginalia@fbd2f378f5 minad/vertico@0df75c0bbc -> minad/vertico@cd3c400aac oantolin/embark@1492aefc00 -> oantolin/embark@8a0b80c6e6 Add --null to consult-ripgrep-args to comply with upstream changes to filename detection. Update +vertico-embark-which-key-indicator. Fix #5494 Fix #5547
This commit is contained in:
parent
68c5336972
commit
04e96c6faf
2 changed files with 13 additions and 9 deletions
|
@ -44,7 +44,7 @@ orderless."
|
|||
(concat "rg "
|
||||
(if all-files "-uu ")
|
||||
(unless recursive "--maxdepth 1 ")
|
||||
"--line-buffered --color=never --max-columns=1000 "
|
||||
"--null --line-buffered --color=never --max-columns=1000 "
|
||||
"--path-separator / --smart-case --no-heading --line-number "
|
||||
"--hidden -g !.git "
|
||||
(mapconcat #'shell-quote-argument args " ")
|
||||
|
@ -209,7 +209,7 @@ current target followed by an ellipsis if there are further
|
|||
targets."
|
||||
(lambda (&optional keymap targets prefix)
|
||||
(if (null keymap)
|
||||
(kill-buffer which-key--buffer)
|
||||
(which-key--hide-popup-ignore-command)
|
||||
(which-key--show-keymap
|
||||
(if (eq (caar targets) 'embark-become)
|
||||
"Become"
|
||||
|
@ -217,7 +217,11 @@ targets."
|
|||
(plist-get (car targets) :type)
|
||||
(embark--truncate-target (plist-get (car targets) :target))
|
||||
(if (cdr targets) "…" "")))
|
||||
(if prefix (lookup-key keymap prefix) keymap)
|
||||
(if prefix
|
||||
(pcase (lookup-key keymap prefix 'accept-default)
|
||||
((and (pred keymapp) km) km)
|
||||
(_ (key-binding prefix 'accept-default)))
|
||||
keymap)
|
||||
nil nil t))))
|
||||
|
||||
;;;###autoload
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue