summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-01-22 16:14:44 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-01-22 16:14:44 +0000
commit00aad6c5c679575907da258659cc4095d8689f03 (patch)
tree277fad2a5fbde90dbeeb9b01b548ee2ac276ee2a /perl-install
parent341125c9f53352b178e9ca127e9dcc55ef89bf31 (diff)
downloaddrakx-00aad6c5c679575907da258659cc4095d8689f03.tar
drakx-00aad6c5c679575907da258659cc4095d8689f03.tar.gz
drakx-00aad6c5c679575907da258659cc4095d8689f03.tar.bz2
drakx-00aad6c5c679575907da258659cc4095d8689f03.tar.xz
drakx-00aad6c5c679575907da258659cc4095d8689f03.zip
(adsl_conf_backend) kill interactive code (was merged into adsl wizard)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/adsl.pm25
1 files changed, 0 insertions, 25 deletions
diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm
index 36c19ed5f..32deeacfe 100644
--- a/perl-install/network/adsl.pm
+++ b/perl-install/network/adsl.pm
@@ -203,31 +203,6 @@ user "$adsl->{login}"
['ppp-compress-24', 'ppp_deflate'],
['ppp-compress-26', 'ppp_deflate'];
$::isStandalone and modules::write_conf();
- $in->do_pkgs->what_provides("speedtouch_mgmt") and $in->do_pkgs->ensure_is_installed('speedtouch_mgmt', '/usr/share/speedtouch/mgmt.o', 'auto');
- -e "$prefix/usr/share/speedtouch/mgmt.o" and goto end_firmware;
-
- firmware:
-
- my $l = [ N_("Use a floppy"),
- N_("Use my Windows partition"),
- N_("Do it later"),
- ];
-
- my $answer = $in->ask_from_list_(N("Firmware needed"),
- N("You need the Alcatel microcode.
-You can provide it now via a floppy or your windows partition,
-or skip and do it later."), $l) or return;
-
- my $destination = "$prefix/usr/share/speedtouch/";
- $answer eq 'Use a floppy' && network::tools::copy_firmware('floppy', $destination, 'mgmt.o') || goto firmware;
- $answer eq 'Use my Windows partition' && network::tools::copy_firmware('windows', $destination, 'alcaudsl.sys') || goto firmware;
- $answer eq 'Do it later' and $in->ask_warn('', N("You need the Alcatel microcode.
-Download it at:
-%s
-and copy the mgmt.o in /usr/share/speedtouch", 'http://prdownloads.sourceforge.net/speedtouch/speedtouch-20011007.tar.bz2'));
-
- -e "$destination/alcaudsl.sys" and rename "$destination/alcaudsl.sys", "$destination/mgmt.o";
- end_firmware:
}
if ($adsl_type eq 'eci') {