[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult 30c6d7c95a 1/4: Rename consult--multi-candidate
From: |
ELPA Syncer |
Subject: |
[elpa] externals/consult 30c6d7c95a 1/4: Rename consult--multi-candidates to consult--multi-items |
Date: |
Sun, 5 Jan 2025 06:57:41 -0500 (EST) |
branch: externals/consult
commit 30c6d7c95adf2fb5aec29ccb6307496c7d91c3a1
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Rename consult--multi-candidates to consult--multi-items
---
consult.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/consult.el b/consult.el
index 957205d8f5..c3d2d34972 100644
--- a/consult.el
+++ b/consult.el
@@ -2926,7 +2926,7 @@ KEYMAP is a command-specific keymap."
;; Non-existing Tofu'ed candidate submitted, e.g., via Embark
`(,(substring selected 0 -1) :match nil ,@(consult--multi-source sources
selected)))))
-(defun consult--multi-candidates (idx src items)
+(defun consult--multi-items (idx src items)
"Create completion candidate strings from ITEMS.
Attach source IDX and SRC properties to each item."
(unless (listp items)
@@ -2961,9 +2961,9 @@ Attach source IDX and SRC properties to each item."
(lambda (sink)
(consult--async-predicate
(funcall async (consult--async-transform
- sink consult--multi-candidates idx src))
+ sink consult--multi-items idx src))
pred))
- (let ((cands (consult--multi-candidates idx src t)))
+ (let ((cands (consult--multi-items idx src t)))
(lambda (sink)
(consult--async-predicate
(consult--async-static sink cands)
@@ -3022,7 +3022,7 @@ Attach source IDX and SRC properties to each item."
(if (cl-loop for src across sources thereis (plist-get src :async))
(consult--multi-async sources)
(cl-loop for idx from 0 for src across sources nconc
- (consult--multi-candidates idx src t)))))
+ (consult--multi-items idx src t)))))
(defun consult--multi (sources &rest options)
"Select from candidates taken from a list of SOURCES.