From bccac3d7c588e70adf140fc289a047587231b093 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Mon, 19 Jan 2004 17:52:17 +0000
Subject: (detect) display a nice string for serial modems

---
 perl-install/network/netconnect.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 8c354ee31..acd5e57ea 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -31,7 +31,7 @@ sub detect {
                  $auto_detect->{adsl} = network::adsl::adsl_detect();
              },
              modem => sub {
-                 $auto_detect->{modem} = { map { ($_->{device} || $_->{description}) => $_ } detect_devices::getModem() };
+                 $auto_detect->{modem} = { map { ($_->{description} || "$_->{MANUFACTURER}|$_->{DESCRIPTION} ($_->{device})") => $_ } detect_devices::getModem() };
              },
             );
     $l{$_}->() foreach ($o_class || (keys %l));
-- 
cgit v1.2.1