diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/network/adsl.pm | 10 |
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') { |