From 40aa4ffbec525f85bda0ca3b1992534aa06270b7 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 29 Jan 2004 10:04:04 +0000 Subject: fix encapsulation parameter --- perl-install/network/adsl.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install') diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm index 5a70dd5fe..d9695f28c 100644 --- a/perl-install/network/adsl.pm +++ b/perl-install/network/adsl.pm @@ -260,12 +260,12 @@ INTERFACE=`$modems{$adsl_device}{get_intf}` # sagem specific stuff if ($adsl_device eq 'sagem') { - my %l = map { $_ => sprintf("%08s", $netc->{$_}) } qw(vci vpi); + my %l = map { $_ => sprintf("%08s", $netc->{$_}) } qw(vci vpi Encapsulation); # set vpi and vci parameters for sagem substInFile { s/VCI=.*\n/VCI=$l{vci}\n/; s/VPI=.*\n/VPI=$l{vpi}\n/; - s/Encapsulation=.*\n/Encapsulation=$l{vpi}\n/; + s/Encapsulation=.*\n/Encapsulation=$l{Encapsulation}\n/; } "$::prefix/etc/analog/adiusbadsl.conf"; } elsif ($adsl_device eq 'speedtouch') { # speedtouch really is used only with pppoa, let its own script handle firmware upload and the like: -- cgit v1.2.1