[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/vertico-posframe f4bcbc3 1/2: * vertico-posframe.el (ve
From: |
ELPA Syncer |
Subject: |
[elpa] externals/vertico-posframe f4bcbc3 1/2: * vertico-posframe.el (vertico-posframe--display): better handler minibuffer cover position. |
Date: |
Thu, 28 Oct 2021 14:57:34 -0400 (EDT) |
branch: externals/vertico-posframe
commit f4bcbc35018de668f321ec601136e0839820ea5c
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>
* vertico-posframe.el (vertico-posframe--display): better handler
minibuffer cover position.
---
vertico-posframe.el | 11 +++++++----
1 file changed, 7 insertions(+), 4 deletions(-)
diff --git a/vertico-posframe.el b/vertico-posframe.el
index 0b7f6fd..cc00659 100644
--- a/vertico-posframe.el
+++ b/vertico-posframe.el
@@ -186,10 +186,13 @@ Optional argument FRAME ."
;; Create a posframe to cover minibuffer.
(if input-method
(posframe-hide vertico-posframe--minibuffer-cover)
- (posframe-show vertico-posframe--minibuffer-cover
- :string (make-string 120 ? )
- :position '(0 . -1)
- :lines-truncate t))
+ (let* ((win (active-minibuffer-window))
+ (x (window-pixel-left win))
+ (y (window-pixel-top win)))
+ (posframe-show vertico-posframe--minibuffer-cover
+ :string (make-string 120 ? )
+ :position (cons x y)
+ :lines-truncate t)))
(apply #'posframe-show
vertico-posframe--buffer
:font vertico-posframe-font