From 09a5612269302f75573678982dd2b0a4cc94b6c5 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Mon, 16 Aug 2004 05:50:58 +0000
Subject: fix pppoe with sagem (write ETH=`/usr/sbin/eaglectrl -i` instead of
 ETH=sagem)

---
 perl-install/network/adsl.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/network')

diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm
index a47fde34e..9f53e90c2 100644
--- a/perl-install/network/adsl.pm
+++ b/perl-install/network/adsl.pm
@@ -271,8 +271,9 @@ user "$adsl->{login}"
         write_secret_backend($adsl->{login}, $adsl->{passwd});
         
         if ($adsl_type eq 'pppoe') {
+            my $net_device = $modems{$adsl_device}{get_intf} ? "`$modems{$adsl_device}{get_intf}`" : $netc->{NET_DEVICE};
             substInFile {
-                s/ETH=.*\n/ETH=$netc->{NET_DEVICE}\n/;
+                s/ETH=.*\n/ETH=$net_device\n/;
                 s/USER=.*\n/USER=$adsl->{login}\n/;
                 s/DNS1=.*\n/DNS1=$netc->{dnsServer2}\n/;
                 s/DNS2=.*\n/DNS2=$netc->{dnsServer3}\n/;
-- 
cgit v1.2.1