From 989fa53616aae3a8b8d526f21ab14ec6c8edb7c8 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Fri, 28 Feb 2003 13:03:23 +0000 Subject: add LT WinModem support by searching ltmodem package. --- perl-install/network/modem.pm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'perl-install/network/modem.pm') diff --git a/perl-install/network/modem.pm b/perl-install/network/modem.pm index 050743794..275d28fcd 100644 --- a/perl-install/network/modem.pm +++ b/perl-install/network/modem.pm @@ -246,16 +246,16 @@ sub ppp_choose { 1; } -#- TODO: add choice between hcf/hsf +#- TODO: add choice between hcf/hsf/lt ? sub winmodemConfigure { my ($in, $netc) = @_; my $type; foreach (keys %{$netc->{autodetect}{winmodem}}) { - my $temp; - /Hcf/ and $temp = "hcf"; - /Hsf/ and $temp = "hsf"; - $temp and $in->do_pkgs->what_provides("${temp}linmodem") and $type = "${temp}linmodem"; + /Hcf/ and $type = "hcfpcimodem"; + /Hsf/ and $type = "hsflinmodem"; + /LT/ and $type = "ltmodem"; + $type && $in->do_pkgs->what_provides($type) or $type = undef; } $type || $in->ask_warn(N("Warning"), N("Your modem isn't supported by the system. -- cgit v1.2.1