[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/vertico-posframe 144330e66a: * vertico-posframe.el (ver
From: |
ELPA Syncer |
Subject: |
[elpa] externals/vertico-posframe 144330e66a: * vertico-posframe.el (vertico-posframe--show): different minibuffer depth use different color border. |
Date: |
Sat, 8 Jan 2022 03:58:09 -0500 (EST) |
branch: externals/vertico-posframe
commit 144330e66ae2d7e61a499d89a66037407e070935
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>
* vertico-posframe.el (vertico-posframe--show): different minibuffer depth
use different color border.
---
vertico-posframe.el | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/vertico-posframe.el b/vertico-posframe.el
index eab5d2a4db..a83fb8a931 100644
--- a/vertico-posframe.el
+++ b/vertico-posframe.el
@@ -203,7 +203,11 @@ is called, window-point will be set to WINDOW-POINT."
:background-color (face-attribute 'vertico-posframe
:background nil t)
:foreground-color (face-attribute 'vertico-posframe
:foreground nil t)
:border-width vertico-posframe-border-width
- :border-color (face-attribute
'vertico-posframe-border :background nil t)
+ :border-color
+ (let ((color (face-attribute 'vertico-posframe-border
:background nil t)))
+ (or (nth (- (minibuffer-depth) 1)
+ (list color "red" "yellow" "green" "blue"
"purple"))
+ color))
:override-parameters vertico-posframe-parameters
:refposhandler vertico-posframe-refposhandler
:hidehandler #'vertico-posframe-hidehandler
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/vertico-posframe 144330e66a: * vertico-posframe.el (vertico-posframe--show): different minibuffer depth use different color border.,
ELPA Syncer <=