branch: externals/vertico commit a595b05ecc87ce0cd6663f01727159e6640b2d2e Author: Daniel Mendler <m...@daniel-mendler.de> Commit: Daniel Mendler <m...@daniel-mendler.de>
vertico--move-to-front: Simplify --- vertico.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/vertico.el b/vertico.el index 912506262a..f676925d1a 100644 --- a/vertico.el +++ b/vertico.el @@ -265,8 +265,7 @@ The function is configured by BY, BSIZE, BINDEX, BPRED and PRED." (defun vertico--move-to-front (elem list) "Move ELEM to front of LIST." (if-let (found (member elem list)) - (let ((head (list (car found)))) - (nconc head (delq (setcar found nil) list))) + (nconc (list (car found)) (delq (setcar found nil) list)) list)) ;; bug#47711: Deferred highlighting for `completion-all-completions'