summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/adsl.pm10
1 files changed, 8 insertions, 2 deletions
diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm
index f60deff05..3c6e7092d 100644
--- a/perl-install/network/adsl.pm
+++ b/perl-install/network/adsl.pm
@@ -137,10 +137,16 @@ user "$adsl->{login}"
['ppp-compress-24', 'ppp_deflate'],
['ppp-compress-26', 'ppp_deflate']);
$::isStandalone and modules::write_conf($prefix);
- $in->ask_warn('', _('You need the alcatel microcode.
+ my $mgmtrpm;
+ if($::isStandalone) {
+ $mgmtrpm = `grep speedtouch_mgmt /var/lib/urpmi/depslist.ordered` ? 1 : 0;
+ } else {
+ $mgmtrpm = pkgs::packageByName($in->{package}, "speedtouch_mgmt");
+ }
+ $mgmtrpm ? $in->do_pkgs->install('speedtouch_mgmt') : $in->ask_warn('', _('You need the alcatel microcode.
Download it at
http://www.alcatel.com/consumer/dsl/dvrreg_lx.htm
-and copy the mgmt.o in /usr/share/speedtouch'))
+and copy the mgmt.o in /usr/share/speedtouch'));
}
if ($adsl_type eq 'pptp') {