From 3ee934eba2b015f7aaddf5856651e58baca1b33b Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Fri, 3 Sep 2004 05:06:52 +0000 Subject: (get_interface_type) enhance detection for adsl devices --- perl-install/network/tools.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/network/tools.pm') diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm index 338cbf4c8..8fd8fbd2c 100644 --- a/perl-install/network/tools.pm +++ b/perl-install/network/tools.pm @@ -297,7 +297,8 @@ sub get_interface_type { my ($interface) = @_; $interface->{DEVICE} =~ /^(eth|ath|wlan)/ && "ethernet" || $interface->{DEVICE} =~ /^ippp/ && "isdn" || - $interface->{DEVICE} =~ /^ppp/ && (member($interface->{TYPE}, "xDSL", "ADSL") ? "adsl" : "modem") || + member($interface->{TYPE}, "xDSL", "ADSL") && "adsl" || + $interface->{DEVICE} =~ /^ppp/ && "modem" || "unknown"; } -- cgit v1.2.1