[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/corfu 4f6bd93243 3/3: Fix corfu-indexed-mode
From: |
ELPA Syncer |
Subject: |
[elpa] externals/corfu 4f6bd93243 3/3: Fix corfu-indexed-mode |
Date: |
Thu, 2 Feb 2023 13:57:29 -0500 (EST) |
branch: externals/corfu
commit 4f6bd932438ec2bbb083cf1388b4496ef0312c28
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Fix corfu-indexed-mode
---
extensions/corfu-indexed.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/extensions/corfu-indexed.el b/extensions/corfu-indexed.el
index 44093b9fad..6ee832b39a 100644
--- a/extensions/corfu-indexed.el
+++ b/extensions/corfu-indexed.el
@@ -69,8 +69,8 @@
(funcall orig)))
(apply orig args)))
-(cl-defmethod corfu--affixate (cands &context (corfu-indexed-mode (eql t)))
- (setq cands (cdr cands))
+(cl-defmethod corfu--affixate :around (cands &context (corfu-indexed-mode (eql
t)))
+ (setq cands (cdr (cl-call-next-method cands)))
(let* ((space #(" " 0 1 (face (:height 0.5 :inherit corfu-indexed))))
(width (if (length> cands (- 10 corfu-indexed-start)) 2 1))
(fmt (concat space