[elpa] externals/posframe 0556302 2/2: * posframe.el (posframe-show): conside ref-position when mouse banish.

[ELPA Syncer]

branch: externals/posframe
commit 055630209ea5e1d3135aeef68855494c1b4c1746
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>

    * posframe.el (posframe-show): conside ref-position when mouse banish.
---
 posframe.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/posframe.el b/posframe.el
index da67c48..c633b2c 100644
--- a/posframe.el
+++ b/posframe.el
@@ -699,8 +699,10 @@ You can use `posframe-delete-all' to delete all posframes."
       ;; Mouse banish
       (posframe--mouse-banish
        (list :parent-frame parent-frame
-             :mouse-x (car mouse-position)
-             :mouse-y (cdr mouse-position)
+             :mouse-x (+ (or (car ref-position) 0)
+                         (car mouse-position))
+             :mouse-y (+ (or (cdr ref-position) 0)
+                         (cdr mouse-position))
              :posframe-x (car position)
              :posframe-y (cdr position)
              :posframe-width (frame-pixel-width posframe)