From d30e4aa0af9d21f8b58ccd04f63f529ffcaf6add Mon Sep 17 00:00:00 2001
From: ManoloFLTK <41016272+ManoloFLTK@users.noreply.github.com>
Date: Tue, 12 Mar 2024 17:29:29 +0100
Subject: Fix use of FLTK_SCALING_FACTOR under macOS

---
 src/Fl_Screen_Driver.cxx | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/Fl_Screen_Driver.cxx b/src/Fl_Screen_Driver.cxx
index f975195ba..2956b7b3a 100644
--- a/src/Fl_Screen_Driver.cxx
+++ b/src/Fl_Screen_Driver.cxx
@@ -564,7 +564,12 @@ void Fl_Screen_Driver::use_startup_scale_factor()
   if ((p = fl_getenv("FLTK_SCALING_FACTOR"))) {
     float factor = 1;
     sscanf(p, "%f", &factor);
-    for (int i = 0; i < s_count; i++)  scale(i, factor * scale(i));
+    if (rescalable() == SYSTEMWIDE_APP_SCALING) {
+      float new_val = factor * scale(0);
+      for (int i = 0; i < s_count; i++)  scale(i, new_val);
+    } else {
+      for (int i = 0; i < s_count; i++)  scale(i, factor * scale(i));
+    }
   }
 }
 
-- 
cgit v1.2.3