[elpa] externals/consult 7e660440c1 2/2: Minor simplification

[ELPA Syncer]

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

    Minor simplification
---
 consult.el | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/consult.el b/consult.el
index 99c06b739e..6a0dcb8e34 100644
--- a/consult.el
+++ b/consult.el
@@ -3092,10 +3092,8 @@ The symbol at point is added to the future history."
   (let* ((candidates (consult--slow-operation
                          "Collecting headings..."
                        (consult--outline-candidates)))
-         (min-level (- (apply #'min (mapcar
-                                     (lambda (cand)
-                                       (get-text-property 0 
'consult--outline-level cand))
-                                     candidates))
+         (min-level (- (cl-loop for cand in candidates minimize
+                                (get-text-property 0 'consult--outline-level 
cand))
                        ?1))
          (narrow-pred (lambda (cand)
                         (<= (get-text-property 0 'consult--outline-level cand)