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

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

[elpa] externals/vertico 86ff93b122 1/5: vertico-buffer: Get rid of unne


From: ELPA Syncer
Subject: [elpa] externals/vertico 86ff93b122 1/5: vertico-buffer: Get rid of unnecessary overlay
Date: Tue, 28 Dec 2021 06:57:49 -0500 (EST)

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

    vertico-buffer: Get rid of unnecessary overlay
---
 extensions/vertico-buffer.el | 8 ++------
 extensions/vertico-flat.el   | 2 +-
 extensions/vertico-grid.el   | 2 +-
 3 files changed, 4 insertions(+), 8 deletions(-)

diff --git a/extensions/vertico-buffer.el b/extensions/vertico-buffer.el
index b94f8ed058..309a52ca8b 100644
--- a/extensions/vertico-buffer.el
+++ b/extensions/vertico-buffer.el
@@ -34,7 +34,6 @@
 
 (require 'vertico)
 
-(defvar-local vertico-buffer--overlay nil)
 (defvar-local vertico-buffer--window nil)
 
 (defcustom vertico-buffer-hide-prompt t
@@ -87,6 +86,7 @@
                                       (* 0.8 (window-width 
vertico-buffer--window))))
         (set-window-point vertico-buffer--window (point))
         (when vertico-buffer-hide-prompt
+          (window-resize mbwin (- (window-pixel-height mbwin)) nil nil 
'pixelwise)
           (set-window-vscroll mbwin 100))))))
 
 (defun vertico-buffer--setup ()
@@ -118,11 +118,7 @@
     (when vertico-buffer-hide-prompt
       (overlay-put vertico--candidates-ov 'window vertico-buffer--window)
       (when vertico--count-ov
-        (overlay-put vertico--count-ov 'window vertico-buffer--window))
-      (setq vertico-buffer--overlay (make-overlay (point-max) (point-max) nil 
t t))
-      (overlay-put vertico-buffer--overlay 'window (selected-window))
-      (overlay-put vertico-buffer--overlay 'priority 1000)
-      (overlay-put vertico-buffer--overlay 'before-string "\n\n"))
+        (overlay-put vertico--count-ov 'window vertico-buffer--window)))
     (setq-local show-trailing-whitespace nil
                 truncate-lines t
                 mode-line-format
diff --git a/extensions/vertico-flat.el b/extensions/vertico-flat.el
index 4266710e6e..a16a785c5b 100644
--- a/extensions/vertico-flat.el
+++ b/extensions/vertico-flat.el
@@ -111,7 +111,7 @@
       (vertico-grid-mode -1))
     ;; Shrink current minibuffer window
     (when-let (win (active-minibuffer-window))
-      (window-resize win (- (window-pixel-height)) nil nil 'pixelwise))
+      (window-resize win (- (window-pixel-height win)) nil nil 'pixelwise))
     (advice-add #'vertico--arrange-candidates :override 
#'vertico-flat--arrange-candidates)
     (advice-add #'vertico--display-candidates :override 
#'vertico-flat--display))
    (t
diff --git a/extensions/vertico-grid.el b/extensions/vertico-grid.el
index a7729269e3..ac26463107 100644
--- a/extensions/vertico-grid.el
+++ b/extensions/vertico-grid.el
@@ -141,7 +141,7 @@ When scrolling beyond this limit, candidates may be 
truncated."
       (vertico-flat-mode -1))
     ;; Shrink current minibuffer window
     (when-let (win (active-minibuffer-window))
-      (window-resize win (- (window-pixel-height)) nil nil 'pixelwise))
+      (window-resize win (- (window-pixel-height win)) nil nil 'pixelwise))
     (define-key vertico-map [remap left-char] #'vertico-grid-left)
     (define-key vertico-map [remap right-char] #'vertico-grid-right)
     (advice-add #'vertico--arrange-candidates :override 
#'vertico-grid--arrange-candidates))



reply via email to

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