[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/corfu 59263bf 5/6: Hide scrollbar if there are fewer th
From: |
Protesilaos Stavrou |
Subject: |
[elpa] externals/corfu 59263bf 5/6: Hide scrollbar if there are fewer than corfu-count candidates |
Date: |
Sat, 17 Apr 2021 18:26:56 -0400 (EDT) |
branch: externals/corfu
commit 59263bf7bc4e85651f31d893c3750375aefcad64
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Hide scrollbar if there are fewer than corfu-count candidates
---
corfu.el | 13 +++++++------
1 file changed, 7 insertions(+), 6 deletions(-)
diff --git a/corfu.el b/corfu.el
index fc1fe29..4c623ae 100644
--- a/corfu.el
+++ b/corfu.el
@@ -216,12 +216,13 @@ If `line-spacing/=nil' or in text-mode, the background
color is used instead.")
(if fancy (if (= row idx) lborder-curr lborder) " ")
line
(make-string (- width (string-width line)) 32)
- (if fancy
- (if (and lo (<= lo row (+ lo bar)))
- (if (= row idx) rbar-curr rbar)
- (if (= row idx) rborder-curr rborder))
- (propertize " " 'face (if (and lo (<= lo row (+ lo bar)))
- 'corfu-bar 'corfu-border))))))
+ (cond
+ (fancy (if (and lo (<= lo row (+ lo bar)))
+ (if (= row idx) rbar-curr rbar)
+ (if (= row idx) rborder-curr rborder)))
+ (lo (propertize " " 'face (if (<= lo row (+ lo bar))
+ 'corfu-bar 'corfu-border)))
+ (t " ")))))
(add-face-text-property 0 (length str) (if (= row idx)
'corfu-current 'corfu-background) 'append str)
(push (concat
(truncate-string-to-width bufline col 0 32) str
- [elpa] externals/corfu updated (4c2c997 -> 5214170), Protesilaos Stavrou, 2021/04/17
- [elpa] externals/corfu e226da3 1/6: Oops, use `:global nil` instead of `:local t`, Protesilaos Stavrou, 2021/04/17
- [elpa] externals/corfu 68d799a 2/6: Revert "Add corfu-completion-styles", Protesilaos Stavrou, 2021/04/17
- [elpa] externals/corfu 6c361fd 3/6: README: Update caveats section, Protesilaos Stavrou, 2021/04/17
- [elpa] externals/corfu 4c2d5de 4/6: Update readme, Protesilaos Stavrou, 2021/04/17
- [elpa] externals/corfu 59263bf 5/6: Hide scrollbar if there are fewer than corfu-count candidates,
Protesilaos Stavrou <=
- [elpa] externals/corfu 5214170 6/6: Add base string when previewing the current candidate, Protesilaos Stavrou, 2021/04/17