[elpa] externals/vertico c9edae99cf 2/3: vertico-buffer--unselect: Reuse

[ELPA Syncer]

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

    vertico-buffer--unselect: Reuse
---
 extensions/vertico-suspend.el | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/extensions/vertico-suspend.el b/extensions/vertico-suspend.el
index 09d5381999..a6bbc82c84 100644
--- a/extensions/vertico-suspend.el
+++ b/extensions/vertico-suspend.el
@@ -75,7 +75,7 @@ or the latest completion session is restored."
            ((buffer-local-value 'vertico--input buf)))
       (cond
        ((minibufferp)
-        (add-hook 'pre-redisplay-functions #'vertico-suspend--redisplay nil 
'local)
+        (add-hook 'pre-redisplay-functions #'vertico-suspend--unselect nil 
'local)
         (setq vertico-suspend--ov (make-overlay (point-min) (point-max) nil t 
t))
         (overlay-put vertico-suspend--ov 'invisible t)
         (overlay-put vertico-suspend--ov 'priority 1000)
@@ -85,13 +85,11 @@ or the latest completion session is restored."
         (when (bound-and-true-p vertico-buffer-mode)
           (vertico-buffer-mode -1)
           (setq vertico-buffer--restore #'ignore))
-        (unless (frame-root-window-p win)
-          (window-resize win (- (window-pixel-height win)) nil nil 'pixelwise))
-        (other-window 1))
+        (vertico-suspend--unselect))
        (t
         (select-window win)
         (set-window-parameter win 'no-other-window nil)
-        (remove-hook 'pre-redisplay-functions #'vertico-suspend--redisplay 
'local)
+        (remove-hook 'pre-redisplay-functions #'vertico-suspend--unselect 
'local)
         (when vertico-suspend--ov
           (delete-overlay vertico-suspend--ov)
           (setq vertico-suspend--ov nil))
@@ -100,7 +98,7 @@ or the latest completion session is restored."
           (vertico-buffer-mode 1))))
     (user-error "No Vertico session to suspend or resume")))
 
-(defun vertico-suspend--redisplay (_)
+(defun vertico-suspend--unselect (&rest _)
   "Ensure that suspended minibuffer is not selected."
   (let ((win (get-buffer-window)))
     (when (eq win (selected-window))