summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Mendler <mail@daniel-mendler.de>2021-11-07 20:24:44 +0100
committerDaniel Mendler <mail@daniel-mendler.de>2021-11-07 20:24:44 +0100
commitd6f10e989d96edec9a414466a588275ea620b7a6 (patch)
tree72b56341fafb1b8a4448e7f7e883c16f27101575
parentd0d093832baa309e56a141edd2f81db474ae5ba4 (diff)
corfu--affixate: Normalize
-rw-r--r--corfu.el6
1 files 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."