branch: externals/consult
commit 8dbf6b3e0ccab93107cef320bca732ba858e81c1
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
consult--multi-lookup: Add comment
---
consult.el | 3 +++
1 file changed, 3 insertions(+)
diff --git a/consult.el b/consult.el
index 0787f54bef..5070a3f61d 100644
--- a/consult.el
+++ b/consult.el
@@ -2284,6 +2284,9 @@ INHERIT-INPUT-METHOD, if non-nil the minibuffer inherits
the input method."
(if (consult--tofu-p (aref cand (1- (length cand))))
(cons (if-let (found (member cand candidates))
(cdr (get-text-property 0 'multi-category (car found)))
+ ;; Non-existing tofu'ed candidates can occur due an
+ ;; interaction of Consult preview and Embark.
+ ;; See https://github.com/oantolin/embark/issues/490.
(substring cand 0 -1))
(consult--multi-source sources cand))
;; TODO return source with :new field, depending on current narrowing
