[bluetooth_dmenu.pl]: Add prompt to dmenu

This commit is contained in:
2024-08-17 19:13:15 +01:00
parent d4e0a22214
commit 4fc2fb0b34

View File

@ -21,7 +21,7 @@ foreach my $name (sort(keys %devices)) {
$device_list .= $name . "\n";
}
my $selection = `printf "$device_list" | dmenu` or die("No selection made");
my $selection = `printf "$device_list" | dmenu -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}`;