Function: consult--multi-narrow
consult--multi-narrow is a byte-compiled function defined in
consult.el.
Signature
(consult--multi-narrow SOURCES)
Documentation
Return narrow list from SOURCES.
Source Code
;; Defined in ~/.emacs.d/elpa/consult-20260805.1130/consult.el
(defun consult--multi-narrow (sources)
"Return narrow list from SOURCES."
(thread-last
sources
(mapcan (lambda (src)
(when-let* ((narrow (plist-get src :narrow)))
(if (consp narrow)
(if (consp (car narrow)) (append narrow nil) (list narrow))
(when-let* ((name (plist-get src :name)))
(list (cons narrow name)))))))
(delq nil)
(delete-dups)))