[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/corfu cc1c4fe 2/3: Do not trim annotations
From: |
ELPA Syncer |
Subject: |
[elpa] externals/corfu cc1c4fe 2/3: Do not trim annotations |
Date: |
Wed, 10 Nov 2021 07:57:16 -0500 (EST) |
branch: externals/corfu
commit cc1c4fe150cd240a502521c6ca44fdfed2eb1803
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Do not trim annotations
---
corfu.el | 4 +---
1 file changed, 1 insertion(+), 3 deletions(-)
diff --git a/corfu.el b/corfu.el
index 210b6be..a4927dc 100644
--- a/corfu.el
+++ b/corfu.el
@@ -601,12 +601,10 @@ A scroll bar is displayed from LO to LO+BAR."
(setq cands
(cl-loop for c in cands collect
(cl-loop for s in c collect
- (string-trim (replace-regexp-in-string "[ \t]*\n[
\t]*" " " s)))))
+ (replace-regexp-in-string "[ \t]*\n[ \t]*" " " s))))
(let* ((cw (cl-loop for x in cands maximize (string-width (car x))))
(pw (cl-loop for x in cands maximize (string-width (cadr x))))
(sw (cl-loop for x in cands maximize (string-width (caddr x))))
- (pw (if (> pw 0) (1+ pw) 0))
- (sw (if (> sw 0) (1+ sw) 0))
(width (+ pw cw sw)))
(when (< width corfu-min-width)
(setq cw (+ cw (- corfu-min-width width))