branch: externals/posframe
commit 6ac22a6419f964032b734133c6aa19c5c124720c
Author: Dmitry Gutov <[email protected]>
Commit: Dmitry Gutov <[email protected]>

    If frame position is already correct, don't call set-frame-position
    
    That creates unnecessary work/refresh too.
---
 posframe.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/posframe.el b/posframe.el
index 0f35fb321a..5c9e3d3458 100644
--- a/posframe.el
+++ b/posframe.el
@@ -961,7 +961,8 @@ This need PARENT-FRAME-WIDTH and PARENT-FRAME-HEIGHT"
                (equal posframe--last-posframe-displayed-size
                       (cons (frame-pixel-width posframe)
                             (frame-pixel-height posframe))))
-    (set-frame-position posframe (car position) (cdr position))
+    (unless (equal (frame-position posframe) position)
+      (set-frame-position posframe (car position) (cdr position)))
     (setq-local posframe--last-posframe-pixel-position position)
     (setq-local posframe--last-parent-frame-size
                 (cons parent-frame-width parent-frame-height))

Reply via email to