[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/vertico e5a1c4e 2/2: vertico-quick: Fix space
From: |
ELPA Syncer |
Subject: |
[elpa] externals/vertico e5a1c4e 2/2: vertico-quick: Fix space |
Date: |
Sat, 10 Jul 2021 12:57:20 -0400 (EDT) |
branch: externals/vertico
commit e5a1c4ed8da3ef63709a9eaccba320c245f95b04
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
vertico-quick: Fix space
---
extensions/vertico-quick.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/extensions/vertico-quick.el b/extensions/vertico-quick.el
index e237d02..7b11f5c 100644
--- a/extensions/vertico-quick.el
+++ b/extensions/vertico-quick.el
@@ -66,7 +66,8 @@
(len (+ fst snd))
(idx (- index start))
;; Ensure that space is not trimmed by `vertico-flat-mode'
- (sp (propertize "_" 'display `(space :width 1))))
+ (sp #("_" 0 1 (display (space :width 1))))
+ (sp2 #("__" 0 2 (display (space :width 2)))))
(funcall orig cand
(concat
(if (>= idx fst)
@@ -77,7 +78,7 @@
((eq first vertico-quick--first)
(concat sp (propertize (char-to-string second) 'face
'vertico-quick1)))
(vertico-quick--first
- (concat sp sp))
+ sp2)
(t
(concat (propertize (char-to-string first) 'face
'vertico-quick1)
(propertize (char-to-string second) 'face
'vertico-quick2)))))