1 files changed, 1 insertions, 1 deletions

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 6b718fb0d..f1543f46c 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -393,7 +393,7 @@ sub getSerialModem {
 }
 
 sub getModem() {
-    my @pci_modems = grep { $_->{driver} eq 'Bad:www.linmodems.org' } probeall(0);
+    my @pci_modems = grep { $_->{driver} =~ /www.linmodems.org/ } probeall(0);
     my $serial_modem = {};
     getSerialModem($serial_modem);
     $serial_modem, @pci_modems;