[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/vertico-posframe aa1b013 2/5: * vertico-posframe.el (ve
From: |
ELPA Syncer |
Subject: |
[elpa] externals/vertico-posframe aa1b013 2/5: * vertico-posframe.el (vertico-posframe--create-minibuffer-cover): Add background/foreground color. |
Date: |
Fri, 29 Oct 2021 20:57:30 -0400 (EDT) |
branch: externals/vertico-posframe
commit aa1b013a5da180e6c2f17a4bb5564b3bb6a252a2
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>
* vertico-posframe.el (vertico-posframe--create-minibuffer-cover): Add
background/foreground color.
---
vertico-posframe.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/vertico-posframe.el b/vertico-posframe.el
index aff3bee..8cd40c3 100644
--- a/vertico-posframe.el
+++ b/vertico-posframe.el
@@ -208,12 +208,15 @@ Show STRING when it is a string."
(defun vertico-posframe--create-minibuffer-cover ()
"Create minibuffer cover."
- (let* ((win (active-minibuffer-window))
+ (let* ((color (face-background 'default nil))
+ (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)
+ :background-color color
+ :foreground-color color
:lines-truncate t
:timeout 3)))