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

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

[elpa] externals/posframe 455bf82 12/13: * posframe.el (posframe-show):


From: Feng Shu
Subject: [elpa] externals/posframe 455bf82 12/13: * posframe.el (posframe-show): Fix error when position is a (X . Y)
Date: Sat, 8 Jun 2019 19:42:29 -0400 (EDT)

branch: externals/posframe
commit 455bf826327d9527172bfad4bc8a1cbfd6b5f35f
Author: Feng Shu <address@hidden>
Commit: Feng Shu <address@hidden>

    * 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))



reply via email to

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