summaryrefslogtreecommitdiffstats
path: root/perl-install/network/tools.pm
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-09-06 14:49:05 +0000
committerdamien <damien@mandriva.com>2001-09-06 14:49:05 +0000
commit1b769c0ffdb5cb69a3e665e6df43c8633b92a6f4 (patch)
treeafd2f9ceceba2f86cac8291a313632fec56018ed /perl-install/network/tools.pm
parentf607542b5e59f49757657ee960ad65eba4c7433c (diff)
downloaddrakx-backup-do-not-use-1b769c0ffdb5cb69a3e665e6df43c8633b92a6f4.tar
drakx-backup-do-not-use-1b769c0ffdb5cb69a3e665e6df43c8633b92a6f4.tar.gz
drakx-backup-do-not-use-1b769c0ffdb5cb69a3e665e6df43c8633b92a6f4.tar.bz2
drakx-backup-do-not-use-1b769c0ffdb5cb69a3e665e6df43c8633b92a6f4.tar.xz
drakx-backup-do-not-use-1b769c0ffdb5cb69a3e665e6df43c8633b92a6f4.zip
corrected speedtouch
Diffstat (limited to 'perl-install/network/tools.pm')
-rw-r--r--perl-install/network/tools.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm
index efb7f1bed..9fede9a88 100644
--- a/perl-install/network/tools.pm
+++ b/perl-install/network/tools.pm
@@ -90,8 +90,8 @@ sub ask_info2 {
]
) or return;
if ($netc->{vpivci}) {
- foreach (['Netherlands', 8.48], ['France', 8.35], ['Belgium', 8.35], ['Italy', 8.35], ['UK', 0.38]) {
- $netc->{vpivci} eq $_->[0] and $netc->{vpivci} = $_->[1] ;
+ foreach (['Netherlands', '8_48'], ['France', '8_35'], ['Belgium', '8_35'], ['Italy', '8_35'], ['UK', '0_38']) {
+ $netc->{vpivci} eq $_->[0] and $netc->{vpivci} = $_->[1];
}
}
1;