[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/vertico 5aadabe 2/2: vertico-buffer: Set line truncatio
From: |
ELPA Syncer |
Subject: |
[elpa] externals/vertico 5aadabe 2/2: vertico-buffer: Set line truncation correctly |
Date: |
Tue, 13 Jul 2021 14:57:18 -0400 (EDT) |
branch: externals/vertico
commit 5aadabe409a95c9364ed0b3301e4c5c3cccb870b
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
vertico-buffer: Set line truncation correctly
---
extensions/vertico-buffer.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/extensions/vertico-buffer.el b/extensions/vertico-buffer.el
index e8b8e89..c5e6610 100644
--- a/extensions/vertico-buffer.el
+++ b/extensions/vertico-buffer.el
@@ -53,15 +53,16 @@
(with-current-buffer vertico-buffer--buffer
(erase-buffer)
(insert (propertize (concat count prompt) 'face 'minibuffer-prompt)
- content "\n" (string-join lines))
- (setq-local truncate-lines (< (point) (* 0.8 (window-width)))))
+ content "\n" (string-join lines)))
(let ((win (or (get-buffer-window vertico-buffer--buffer)
(display-buffer vertico-buffer--buffer
vertico-buffer-action))))
(overlay-put vertico--candidates-ov 'window win)
(when vertico--count-ov
(overlay-put vertico--count-ov 'window win))
(set-window-point win (max (+ 1 (length prompt) (length count))
- (+ (point) (length count)))))))
+ (+ (point) (length count))))
+ (with-current-buffer vertico-buffer--buffer
+ (setq-local truncate-lines (< (window-point win) (* 0.8 (window-width
win))))))))
(defun vertico-buffer--select (_)
"Ensure that cursor is only shown if minibuffer is selected."