From 324fcfcb6228aeb24af8c50d548438e5f1d174b7 Mon Sep 17 00:00:00 2001
From: ManoloFLTK <41016272+ManoloFLTK@users.noreply.github.com>
Date: Wed, 8 May 2024 19:43:56 +0200
Subject: macOS: Fix scaling subwindows - cont'd #927

---
 src/Fl_cocoa.mm | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/Fl_cocoa.mm b/src/Fl_cocoa.mm
index 4b9f403ea..25f57a546 100644
--- a/src/Fl_cocoa.mm
+++ b/src/Fl_cocoa.mm
@@ -1370,8 +1370,13 @@ static FLWindowDelegate *flwindowdelegate_instance = nil;
     W = window->w();
     H = window->h();
   } else if (Fl_Cocoa_Window_Driver::driver(window)->through_resize()) {
-    X = window->x();
-    Y = window->y();
+    if (window->parent()) {
+      X = window->x();
+      Y = window->y();
+    } else {
+      // Recalculate the FLTK position from the current Cocoa position
+      CocoatoFLTK(window, X, Y);
+    }
     W = window->w();
     H = window->h();
   } else {
-- 
cgit v1.2.3