From f683d77a39e8f0962f13d0569b98f64b80397fc9 Mon Sep 17 00:00:00 2001
From: Mahesh Asolkar <mahesh@mahesha.com>
Date: Sun, 2 Feb 2025 14:35:51 -0800
Subject: [PATCH] Support for Apple MacBook Pro panel

---
 get_randr.pl | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/get_randr.pl b/get_randr.pl
index ee2568b..6159e33 100755
--- a/get_randr.pl
+++ b/get_randr.pl
@@ -87,6 +87,7 @@ sub get_display_info {
 # -----------
 sub get_wlr_line {
     my ($app) = @_;
+    my $matching_disps;
 
     my $wlr_line = "UNKNOWN";
 
@@ -98,7 +99,7 @@ sub get_wlr_line {
         # Determine setup (Custom)
         #
         #   - Den room (DELL 27" monitor on the left of laptop display)
-        my $matching_disps = has_display_with_name($app, "DELL U27");
+        $matching_disps = has_display_with_name($app, "DELL U27");
         if (scalar (@{$matching_disps}) == 1) {
             my ($h, $v) = get_display_current_dimensions($app, $matching_disps->[0]);
             my $disp_name = $matching_disps->[0]->{'name'};
@@ -121,6 +122,14 @@ sub get_wlr_line {
         show_debug("No displays?!");
     }
 
+    # Adjust scale on Apple pane. Assumes that above lines always put eDP-1 as the last display
+    $matching_disps = has_display_with_name($app, "Apple Computer");
+    if (scalar (@{$matching_disps}) == 1) {
+        show_debug("Scaling Apple MacBook Pro display");
+
+        $wlr_line .= " --scale 1.5";
+    }
+
     return $wlr_line;
 }