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

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

[elpa] externals/posframe 4673c7c 1/2: * posframe.el (posframe-run-posha


From: ELPA Syncer
Subject: [elpa] externals/posframe 4673c7c 1/2: * posframe.el (posframe-run-poshandler): Fix typo.
Date: Wed, 27 Oct 2021 02:57:40 -0400 (EDT)

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

    * posframe.el (posframe-run-poshandler): Fix typo.
---
 posframe.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/posframe.el b/posframe.el
index 60f1f0c..da67c48 100644
--- a/posframe.el
+++ b/posframe.el
@@ -1031,13 +1031,13 @@ of `posframe-show'."
         (let* ((parent-frame-width (plist-get info :parent-frame-width))
                (parent-frame-height (plist-get info :parent-frame-height))
                (posframe-width (plist-get info :posframe-width))
-               (posframe--height (plist-get info :posframe-height))
+               (posframe-height (plist-get info :posframe-height))
                (ref-x (or (car ref-position) 0))
                (ref-y (or (cdr ref-position) 0)))
           (when (< x 0)
             (setq x (- (+ x parent-frame-width) posframe-width)))
           (when (< y 0)
-            (setq y (- (+ y parent-frame-height) posframe--height)))
+            (setq y (- (+ y parent-frame-height) posframe-height)))
           (cons (+ ref-x x)
                 (+ ref-y y)))))))
 



reply via email to

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