summaryrefslogtreecommitdiffstats
path: root/lib/network/netconnect.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-03-20 19:52:33 +0000
committerThierry Vignaud <tv@mageia.org>2012-03-20 19:52:33 +0000
commitb3111e7e9c262d8c71e23a6dc78d5d7a888dacc3 (patch)
treed42205550d30ec092f9743748bcec938017f985b /lib/network/netconnect.pm
parent683619174a6cd634655ac6a489b5a6efb1b5b3cc (diff)
downloaddrakx-net-b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3.tar
drakx-net-b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3.tar.gz
drakx-net-b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3.tar.bz2
drakx-net-b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3.tar.xz
drakx-net-b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3.zip
perl_checker cleanups
Diffstat (limited to 'lib/network/netconnect.pm')
-rw-r--r--lib/network/netconnect.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/network/netconnect.pm b/lib/network/netconnect.pm
index abe94c7..adb048a 100644
--- a/lib/network/netconnect.pm
+++ b/lib/network/netconnect.pm
@@ -124,7 +124,7 @@ sub real_main {
welcome => {
pre => sub { undef $net->{type} },
if_(!$::isInstall, no_back => 1),
- name => N("Choose the connection you want to configure") . if_($net->{PROFILE} && network::network::netprofile_count() > 0, "\n".N("Those settings will be saved for the network profile <b>%s</b>", $net->{PROFILE}) ),
+ name => N("Choose the connection you want to configure") . if_($net->{PROFILE} && network::network::netprofile_count() > 0, "\n" . N("Those settings will be saved for the network profile <b>%s</b>", $net->{PROFILE})),
if_(!$::isInstall, interactive_help_id => 'configureNetwork'),
data => [ { list => [ network::connection::get_types ],
type => 'list', val => \$net->{type}, format => sub { $_[0] && $_[0]->get_type_description },
@@ -148,7 +148,7 @@ sub real_main {
select_connection => {
name => sub { $net->{type}->get_type_name . "\n\n" . N("Select the network interface to configure:") },
data => [ { val => \$connection, type => 'list', list => \@connections_list,
- format => sub { $_[0] && N("%s: %s", $_[0]->get_interface, $_[0]->get_description) }, allow_empty_list => !text2bool($global_settings{AUTOMATIC_IFACE_CHOICE})} ],
+ format => sub { $_[0] && N("%s: %s", $_[0]->get_interface, $_[0]->get_description) }, allow_empty_list => !text2bool($global_settings{AUTOMATIC_IFACE_CHOICE}) } ],
complete => sub {
$connection->setup_thirdparty($in) or return 1;
$connection->prepare_device;
@@ -322,7 +322,7 @@ If you do not know it, keep the preselected protocol.") },
sleep 1;
}
}
- $success = $connection->get_status();
+ $success = $connection->get_status;
# try to resolve the network address for some time
my $timeout = 3;
while ($timeout--) {