branch: externals/posframe
commit 455bf826327d9527172bfad4bc8a1cbfd6b5f35f
Author: Feng Shu <tuma...@163.com>
Commit: Feng Shu <tuma...@163.com>
* posframe.el (posframe-show): Fix error when position is a (X . Y)
---
posframe.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/posframe.el b/posframe.el
index eec0adc..bb0539d 100644
--- a/posframe.el
+++ b/posframe.el
@@ -463,7 +463,10 @@ you can use `posframe-delete-all' to delete all posframes."
(parent-window-left (window-pixel-left parent-window))
(parent-window-width (window-pixel-width parent-window))
(parent-window-height (window-pixel-height parent-window))
- (position-info (posn-at-point position parent-window))
+ (position-info
+ (if (integerp position)
+ (posn-at-point position parent-window)
+ position))
(parent-frame (window-frame parent-window))
(parent-frame-width (frame-pixel-width parent-frame))
(parent-frame-height (frame-pixel-height parent-frame))
