From 2a11617dfbbd9ce2fc711072e1a242fc11ddef9a Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Fri, 14 Sep 2001 14:08:08 +0000
Subject: updated speedtouch handling.

---
 perl-install/network/adsl.pm | 10 ++++++++--
 1 file 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') {
-- 
cgit v1.2.1