diff options
Diffstat (limited to 'perl-install/network')
| -rw-r--r-- | perl-install/network/adsl.pm | 10 | ||||
| -rw-r--r-- | perl-install/network/adsl_consts.pm | 2 | ||||
| -rw-r--r-- | perl-install/network/netconnect.pm | 4 |
3 files changed, 8 insertions, 8 deletions
diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm index 197635e5d..00354e186 100644 --- a/perl-install/network/adsl.pm +++ b/perl-install/network/adsl.pm @@ -16,9 +16,9 @@ sub get_wizard { my $netc = $wiz->{var}{netc}; my %l = ( - 'pppoe' => N("use pppoe"), - 'pptp' => N("use pptp"), - 'dhcp' => N("use dhcp"), + 'pppoe' => N("use PPPoE"), + 'pptp' => N("use PPTP"), + 'dhcp' => N("use DHCP"), 'speedtouch' => N("Alcatel Speedtouch USB") . if_($netc->{autodetect}{adsl}{speedtouch}, N(" - detected")), 'sagem' => N("Sagem (using PPPOA) USB") . if_($netc->{autodetect}{adsl}{sagem}, N(" - detected")), 'sagem_dhcp' => N("Sagem (using DHCP) USB") . if_($netc->{autodetect}{adsl}{sagem}, N(" - detected")), @@ -34,8 +34,8 @@ sub get_wizard { adsl_old => { name => N("Connect to the Internet") . "\n\n" . N("The most common way to connect with adsl is pppoe. -Some connections use pptp, a few use dhcp. -If you don't know, choose 'use pppoe'"), +Some connections use PPTP, a few use DHCP. +If you don't know, choose 'use PPPoE'"), data => [ { label => N("ADSL connection type:"), val => \$wiz->{var}{adsl}{type}, list => [ sort values %l ] }, diff --git a/perl-install/network/adsl_consts.pm b/perl-install/network/adsl_consts.pm index ee81efbf4..f4818eedd 100644 --- a/perl-install/network/adsl_consts.pm +++ b/perl-install/network/adsl_consts.pm @@ -22,7 +22,7 @@ our %adsl_data = ( # 5 RFC2364 PPPoA LLC, # 6 RFC2364 PPPoA VCmux # dns are provided for when !usepeerdns in peers config file - # method : pppoa, pppoe or static + # method : PPPoA, pppoe or static # please forward updates to http://forum.eagle-usb.org # order alphabetically by country (in English) / ISP (local language) N("Austria") . "|Any" => diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index e3ff84104..8a5fe8ae0 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -754,8 +754,8 @@ and copy the mgmt.o in /usr/share/speedtouch", 'http://prdownloads.sourceforge.n }, name => N("Connect to the Internet") . "\n\n" . N("The most common way to connect with adsl is pppoe. -Some connections use pptp, a few use dhcp. -If you don't know, choose 'use pppoe'"), +Some connections use PPTP, a few use DHCP. +If you don't know, choose 'use PPPoE'"), data => [ { text => N("ADSL connection type:"), val => \$adsl_type, type => "list", list => [ sort { $adsl_types{$a} cmp $adsl_types{$b} } keys %adsl_types ], |