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

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/vertico da51735c01 2/2: Set display variables in vertic


From: ELPA Syncer
Subject: [elpa] externals/vertico da51735c01 2/2: Set display variables in vertico--display-candidates
Date: Sat, 1 Jan 2022 19:57:59 -0500 (EST)

branch: externals/vertico
commit da51735c01fa38ab7ccc234ff2606fb7e272d8e2
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Set display variables in vertico--display-candidates
---
 extensions/vertico-flat.el | 3 ++-
 vertico.el                 | 9 ++++-----
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/extensions/vertico-flat.el b/extensions/vertico-flat.el
index c3fcb6f068..646f2161c0 100644
--- a/extensions/vertico-flat.el
+++ b/extensions/vertico-flat.el
@@ -65,7 +65,8 @@
 
 (defun vertico-flat--display (candidates)
   "Display CANDIDATES horizontally."
-  (setq-local truncate-lines nil)
+  (setq-local truncate-lines nil
+              resize-mini-windows t)
   (move-overlay vertico--candidates-ov (point-max) (point-max))
   (overlay-put
    vertico--candidates-ov 'after-string
diff --git a/vertico.el b/vertico.el
index 21eb040dc2..c66be521e6 100644
--- a/vertico.el
+++ b/vertico.el
@@ -555,7 +555,9 @@ The function is configured by BY, BSIZE, BINDEX, BPRED and 
PRED."
 
 (defun vertico--resize-window (height)
   "Resize active minibuffer window to HEIGHT."
-  (setq-local truncate-lines (< (point) (* 0.8 (window-width))))
+  (setq-local truncate-lines (< (point) (* 0.8 (window-width)))
+              resize-mini-windows 'grow-only
+              max-mini-window-height 1.0)
   (unless (frame-root-window-p (active-minibuffer-window))
     (unless vertico-resize
       (setq height (max height vertico-count)))
@@ -750,10 +752,7 @@ When the prefix argument is 0, the group order is reset."
         vertico--candidates-ov (make-overlay (point-max) (point-max) nil t t)
         vertico--count-ov (and vertico-count-format
                                (make-overlay (point-min) (point-min) nil t t)))
-  (setq-local resize-mini-windows 'grow-only
-              max-mini-window-height 1.0
-              truncate-lines t
-              completion-auto-help nil
+  (setq-local completion-auto-help nil
               completion-show-inline-help nil)
   (use-local-map vertico-map)
   ;; Use -90 to ensure that the exhibit hook runs early such that the



reply via email to

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