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

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

[elpa] externals/corfu d6f10e9 2/3: corfu--affixate: Normalize


From: ELPA Syncer
Subject: [elpa] externals/corfu d6f10e9 2/3: corfu--affixate: Normalize
Date: Sun, 7 Nov 2021 16:57:16 -0500 (EST)

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

    corfu--affixate: Normalize
---
 corfu.el | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/corfu.el b/corfu.el
index 6db4a03..74b99e1 100644
--- a/corfu.el
+++ b/corfu.el
@@ -582,7 +582,7 @@ completion began less than that number of seconds ago."
                               suffix
                             (propertize suffix 'face 'corfu-annotations)))))
                 candidates)
-      candidates)))
+      (mapcar (lambda (cand) (list cand "" "")) candidates))))
 
 ;; XXX Do not use `completion-metadata-get' in order to avoid Marginalia.
 ;; The Marginalia annotators are way to heavy for the Corfu popup!
@@ -594,9 +594,7 @@ completion began less than that number of seconds ago."
   "Format annotated CAND string."
   (replace-regexp-in-string
    "[ \t]*\n[ \t]*" " "
-   (if (consp cand)
-       (concat (cadr cand) (car cand) (caddr cand))
-     cand)))
+   (concat (cadr cand) (car cand) (caddr cand))))
 
 (defun corfu--show-candidates (beg end str)
   "Update display given BEG, END and STR."



reply via email to

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