summaryrefslogtreecommitdiffstats
path: root/perl-install/network/adsl.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-01-29 10:04:04 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-01-29 10:04:04 +0000
commit40aa4ffbec525f85bda0ca3b1992534aa06270b7 (patch)
tree5aef59e9037e01fdf92658f2bc873dbd70d60f7c /perl-install/network/adsl.pm
parentc20ed65effed349d743cc486024daa927d9a7fbb (diff)
downloaddrakx-40aa4ffbec525f85bda0ca3b1992534aa06270b7.tar
drakx-40aa4ffbec525f85bda0ca3b1992534aa06270b7.tar.gz
drakx-40aa4ffbec525f85bda0ca3b1992534aa06270b7.tar.bz2
drakx-40aa4ffbec525f85bda0ca3b1992534aa06270b7.tar.xz
drakx-40aa4ffbec525f85bda0ca3b1992534aa06270b7.zip
fix encapsulation parameter
Diffstat (limited to 'perl-install/network/adsl.pm')
-rw-r--r--perl-install/network/adsl.pm4
1 files changed, 2 insertions, 2 deletions
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: