[elpa] externals/vertico 14c37e29f3 1/3: vertico-repeat-select: Simplify, do not display selected candidate

[ELPA Syncer]

branch: externals/vertico
commit 14c37e29f357938429a2abb1cd9511c1803a81dc
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    vertico-repeat-select: Simplify, do not display selected candidate
---
 extensions/vertico-repeat.el | 13 ++-----------
 1 file changed, 2 insertions(+), 11 deletions(-)

diff --git a/extensions/vertico-repeat.el b/extensions/vertico-repeat.el
index cb4165cf4d..697ba5f8d0 100644
--- a/extensions/vertico-repeat.el
+++ b/extensions/vertico-repeat.el
@@ -152,28 +152,19 @@ previous sessions for the current command."
               (replace-regexp-in-string
                "\\s-+" " "
                (string-trim (cadr session)))
-              (if (caddr session)
-                  (replace-regexp-in-string
-                   "\\s-+" " "
-                   (string-trim (caddr session)))
-                "")
               session))
             (user-error "No repeatable Vertico session"))))
          (max-cmd (cl-loop for (cmd . _) in trimmed
                            maximize (string-width cmd)))
-         (max-input (cl-loop for (_cmd input . _) in trimmed
-                             maximize (string-width input)))
          (formatted (cl-loop
-                     for (cmd input cand session) in trimmed collect
+                     for (cmd input session) in trimmed collect
                      (cons
                       (concat
                        (and (not current-cmd)
                             (propertize cmd 'face 
'font-lock-function-name-face))
                        (and (not current-cmd)
                             (make-string (- max-cmd (string-width cmd) -4) 
?\s))
-                       input
-                       (make-string (- max-input (string-width input) -4) ?\s)
-                       (and cand (propertize cand 'face 
'font-lock-comment-face)))
+                       input)
                       session)))
          (enable-recursive-minibuffers t)
          (selected (or (cdr (assoc (completing-read