[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)))