[elpa] externals/consult 69bbd21 3/3: consult--multi-group: Do not default to category

[ELPA Syncer]

branch: externals/consult
commit 69bbd213dc8a98abe94a4f5b1920e3d689d31caa
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    consult--multi-group: Do not default to category
    
    * The user should explicitly opt-in to a group title
    * Avoid allocations in the group function
---
 consult.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/consult.el b/consult.el
index 661eb05..2910d6c 100644
--- a/consult.el
+++ b/consult.el
@@ -1894,8 +1894,7 @@ INHERIT-INPUT-METHOD, if non-nil the minibuffer inherits 
the input method."
   "Return title of candidate CAND or TRANSFORM the candidate given SOURCES."
   (if transform
       cand
-    (let ((src (consult--multi-source sources cand)))
-      (or (plist-get src :name) (capitalize (symbol-name (plist-get src 
:category)))))))
+    (plist-get (consult--multi-source sources cand) :name)))
 
 (defun consult--multi-preview-key (sources)
   "Return preview keys from SOURCES."