emacs-elpa-diffs
[Top][All Lists]
Advanced

[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."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]