emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ivy-posframe 26612b2 071/195: Add ivy-posframe-border f


From: Feng Shu
Subject: [elpa] externals/ivy-posframe 26612b2 071/195: Add ivy-posframe-border face and use it
Date: Sat, 3 Oct 2020 07:11:47 -0400 (EDT)

branch: externals/ivy-posframe
commit 26612b2d03f9761060ffbb50b75d7c358fac5deb
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>

    Add ivy-posframe-border face and use it
    
    Note: this feature need posframe update too.
---
 ivy-posframe.el | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/ivy-posframe.el b/ivy-posframe.el
index 6fd303e..18a31e4 100644
--- a/ivy-posframe.el
+++ b/ivy-posframe.el
@@ -158,7 +158,7 @@ When nil, Using current frame's font as fallback."
   :group 'ivy-posframe
   :type 'number)
 
-(defcustom ivy-posframe-border-width 0
+(defcustom ivy-posframe-border-width 1
   "The border width used by ivy-posframe.
 When 0, no border is showed."
   :group 'ivy-posframe
@@ -179,6 +179,11 @@ When 0, no border is showed."
   "Face used by the ivy-posframe."
   :group 'ivy-posframe)
 
+(defface ivy-posframe-border
+  '((t (:inherit default :background "gray50")))
+  "Face used by the ivy-posframe's border."
+  :group 'ivy-posframe)
+
 (defface ivy-posframe-cursor
   '((t (:inherit cursor)))
   "Face used by the ivy-posframe's fake cursor."
@@ -223,6 +228,7 @@ This variable is useful for `ivy-posframe-read-action' .")
        :min-height (or ivy-posframe-min-height 10)
        :min-width (or ivy-posframe-min-width 50)
        :internal-border-width ivy-posframe-border-width
+       :internal-border-color (face-attribute 'ivy-posframe-border :background)
        :override-parameters ivy-posframe-parameters))))
 
 (defun ivy-posframe-display (str)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]