[elpa] externals/vertico-posframe fabcebeaa6 1/5: Add vertico-posframe--handle-minibuffer-window.

[ELPA Syncer]

branch: externals/vertico-posframe
commit fabcebeaa6c3d1408275eaff575cd261da8129cb
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>

    Add vertico-posframe--handle-minibuffer-window.
    
            * vertico-posframe.el (vertico-posframe--handle-minibuffer-window): 
New function.
            (vertico-posframe--display): Use above function.
---
 vertico-posframe.el | 22 +++++++++++++---------
 1 file changed, 13 insertions(+), 9 deletions(-)

diff --git a/vertico-posframe.el b/vertico-posframe.el
index b9ef59dc6e..8bacbee820 100644
--- a/vertico-posframe.el
+++ b/vertico-posframe.el
@@ -174,16 +174,9 @@ Optional argument FRAME ."
 
 (defun vertico-posframe--display (_lines)
   "Display LINES in posframe."
-  (let* ((show-minibuffer-p (vertico-posframe--show-minibuffer-p))
-         (minibuffer-window (active-minibuffer-window))
-         (point (point)))
+  (let ((point (point)))
     (setq vertico-posframe--buffer (current-buffer))
-    (window-resize minibuffer-window
-                   (- (window-pixel-height minibuffer-window))
-                   nil nil 'pixelwise)
-    (set-window-vscroll minibuffer-window 100)
-    (when show-minibuffer-p
-      (set-window-vscroll minibuffer-window 0))
+    (vertico-posframe--handle-minibuffer-window)
     (with-selected-window (vertico-posframe-last-window)
       (vertico-posframe--show vertico-posframe--buffer point))))
 
@@ -233,6 +226,17 @@ is called, window-point will be set to WINDOW-POINT."
            (t nil)))
    vertico-posframe-show-minibuffer-rules))
 
+(defun vertico-posframe--handle-minibuffer-window ()
+  "Handle minibuffer window."
+  (let ((show-minibuffer-p (vertico-posframe--show-minibuffer-p))
+        (minibuffer-window (active-minibuffer-window)))
+    (window-resize minibuffer-window
+                   (- (window-pixel-height minibuffer-window))
+                   nil nil 'pixelwise)
+    (set-window-vscroll minibuffer-window 100)
+    (when show-minibuffer-p
+      (set-window-vscroll minibuffer-window 0))))
+
 (defun vertico-posframe-last-window ()
   "Get the last actived window before active minibuffer."
   (let ((window (minibuffer-selected-window)))