[elpa] externals/ivy-posframe 990b9b4 007/195: Update

[Feng Shu]

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

    Update
---
 ivy-posframe.el | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

diff --git a/ivy-posframe.el b/ivy-posframe.el
index f69d1ce..d0c2f69 100644
--- a/ivy-posframe.el
+++ b/ivy-posframe.el
@@ -46,10 +46,18 @@
   :prefix "ivy-posframe")
 
 (defcustom ivy-posframe-font nil
-  "The font used by ivy-posframe's frame.
+  "The font used by ivy-posframe.
 Using current frame's font if it it nil."
   :group 'ivy-posframe)
 
+(defcustom ivy-posframe-poshandler nil
+  "The posframe poshandler used by ivy-posframe.
+When nil, use `posframe-poshandler-window-bottom-left-corner'
+as fallback.
+
+More details can be found in docstring of `posframe-show'."
+  :group 'ivy-posframe)
+
 (defface ivy-posframe
   '((t (:inherit default :background "#333333" :foreground "#dcdccc")))
   "Face used for the ivy-posframe."
@@ -63,8 +71,10 @@ Using current frame's font if it it nil."
   (with-selected-window (ivy--get-window ivy-last)
     (posframe-show
      ivy-posframe-buffer
+     :font ivy-posframe-font
      :string (concat ivy--prompt ivy-text str)
-     :poshandler #'posframe-poshandler-window-bottom-left-corner
+     :poshandler (or ivy-posframe-poshandler
+                     #'posframe-poshandler-window-bottom-left-corner)
      :background-color (face-attribute 'ivy-posframe :background)
      :foreground-color (face-attribute 'ivy-posframe :foreground)
      :height ivy-height