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