emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/vertico f240c3ccdf 1/2: vertico-indexed: Ensure that pr


From: ELPA Syncer
Subject: [elpa] externals/vertico f240c3ccdf 1/2: vertico-indexed: Ensure that prefix-arg is reset (Fix #340)
Date: Fri, 10 Mar 2023 12:01:31 -0500 (EST)

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

    vertico-indexed: Ensure that prefix-arg is reset (Fix #340)
---
 extensions/vertico-indexed.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/extensions/vertico-indexed.el b/extensions/vertico-indexed.el
index e02bc6a04e..d38d580ec2 100644
--- a/extensions/vertico-indexed.el
+++ b/extensions/vertico-indexed.el
@@ -60,12 +60,12 @@
     (let ((index (+ vertico-indexed--min
                     (- (prefix-numeric-value prefix-arg)
                        vertico-indexed-start))))
-        (if (and (>= index vertico-indexed--min)
-                 (<= index vertico-indexed--max)
-                 (/= vertico--total 0))
-            (setq vertico--index index)
-          (minibuffer-message "Out of range")
-          (setq this-command #'ignore)))))
+      (if (and (>= index vertico-indexed--min)
+               (<= index vertico-indexed--max)
+               (/= vertico--total 0))
+          (setq vertico--index index prefix-arg nil)
+        (minibuffer-message "Out of range")
+        (setq this-command #'ignore)))))
 
 (cl-defmethod vertico--format-candidate :around
   (cand prefix suffix index start &context (vertico-indexed-mode (eql t)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]