[elpa] externals/frog-menu ac85040 07/12: Add posframe border option as suggested by #7

[Clemens Radermacher]

branch: externals/frog-menu
commit ac850400ad12700be8e74a9c95396ae4720ede5e
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>

    Add posframe border option as suggested by #7
---
 frog-menu.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/frog-menu.el b/frog-menu.el
index 880edfa..a8e38b6 100644
--- a/frog-menu.el
+++ b/frog-menu.el
@@ -167,6 +167,10 @@ exits through an error."
   "If non-nil use padding between avy hints and candidates."
   :type 'boolean)
 
+(defcustom frog-menu-posframe-border-width 1
+  "Border width to use for the posframe `frog-menu' creates."
+  :type 'integer)
+
 (defcustom frog-menu-posframe-parameters nil
   "Explicit frame parameters to be used by the posframe `frog-menu' creates."
   :type 'list)
@@ -465,7 +469,7 @@ Returns window of displayed buffer."
   (posframe-show buf
                  :poshandler(or display-option
                                 #'posframe-poshandler-point-bottom-left-corner)
-                 :internal-border-width 1
+                 :internal-border-width frog-menu-posframe-border-width
                  :background-color (face-attribute
                                     'frog-menu-posframe-background-face
                                     :background)