diff options
| -rw-r--r-- | perl-install/detect_devices.pm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index eeec05624..61192d2fc 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -475,9 +475,7 @@ sub getInputDevices() { } sub getSynapticsTouchpads() { - grep { - member($_->{description}, "|SynPS/2 Synaptics TouchPad", "|AlpsPS/2 ALPS TouchPad"); - } getInputDevices(); + grep { $_->{description} =~ m,^\|(?:SynPS/2 Synaptics TouchPad$|AlpsPS/2 ALPS), } getInputDevices(); } sub getSerialModem { |