diff --git a/bin/find-device-port-linux-udev b/bin/find-device-port-linux-udev index 3be11b4d..68d7edd4 100644 --- a/bin/find-device-port-linux-udev +++ b/bin/find-device-port-linux-udev @@ -9,22 +9,22 @@ my @paths= `ls $prefix`; my %devices; for my $path (@paths) { - chomp($path); - next unless -l $prefix. $path; - my @data = `udevadm info -q property --name=${prefix}${path}`; - for my $line (@data) { + chomp($path); + next unless -l $prefix. $path; + my @data = `udevadm info -q property --name=${prefix}${path}`; + for my $line (@data) { chomp ($line); my ($key,$val) = split(/=/,$line,2); - $devices{$path}{$key} = $val; - } - if (($devices{$path}{'ID_VENDOR_ID'} == $vid) && - ($devices{$path}{'ID_MODEL_ID'} == $pid) ) { + $devices{$path}{$key} = $val; + } + if (($devices{$path}{'ID_VENDOR_ID'} == $vid) && + ($devices{$path}{'ID_MODEL_ID'} == $pid) ) { - if ($devices{$path}{'ID_MM_CANDIDATE'}) { - warn "Yikes. ModemManager wants to pwn your keyboard"; - } + if ($devices{$path}{'ID_MM_CANDIDATE'}) { + warn "Yikes. ModemManager wants to pwn your keyboard"; + } - print $devices{$path}{DEVNAME}; - exit(0); - } + print $devices{$path}{DEVNAME}; + exit(0); + } }