From 06c7e71a525e693f8cd1c9baff2d6d361ad1f034 Mon Sep 17 00:00:00 2001
From: Andrew <andreasohaodha@proton.me>
Date: Fri, 20 Sep 2024 20:19:50 +0100
Subject: [PATCH] [bluetooth_dmenu.pl]: Make dmenu match case insensitively

---
 bluetooth_dmenu.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bluetooth_dmenu.pl b/bluetooth_dmenu.pl
index 5b930ef..5803444 100755
--- a/bluetooth_dmenu.pl
+++ b/bluetooth_dmenu.pl
@@ -21,7 +21,7 @@ foreach my $name (sort(keys %devices)) {
     $device_list .= $name . "\n";
 }
 
-my $selection = `printf "$device_list" | dmenu -p "Connect Bluetooth device:"` or die("No selection made");
+my $selection = `printf "$device_list" | dmenu -i -p "Connect Bluetooth device:"` or die("No selection made");
 chomp($selection);
 `notify-send "$script_name" "Attempting to connect to $selection ($devices{$selection})"`;
 `bluetoothctl connect $devices{$selection}`;