diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-03-20 19:52:33 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-03-20 19:52:33 +0000 |
| commit | b3111e7e9c262d8c71e23a6dc78d5d7a888dacc3 (patch) | |
| tree | d42205550d30ec092f9743748bcec938017f985b /lib/network/netcenter.pm | |
| parent | 683619174a6cd634655ac6a489b5a6efb1b5b3cc (diff) | |
| download | drakx-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/netcenter.pm')
| -rwxr-xr-x | lib/network/netcenter.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/network/netcenter.pm b/lib/network/netcenter.pm index 10d156d..fa65a33 100755 --- a/lib/network/netcenter.pm +++ b/lib/network/netcenter.pm @@ -51,7 +51,7 @@ sub build_cmanager_box { ($cmanager->{connection}->can('get_networks') ? ( $cmanager->{gui}{show_unique_network} ? ( $cmanager->{gui}{networks_list}, - ): ( + ) : ( gtknew('Label', text => N("Please select your network:"), alignment => [ 0, 0 ]), gtknew('ScrolledWindow', height => 160, child => $cmanager->{gui}{networks_list}) ), @@ -168,7 +168,7 @@ sub main { gtkadd($w->{window}, gtknew('VBox', spacing => 5, children => [ $::isEmbedded ? () : (0, Gtk2::Banner->new($icon, $title)), - if_($net->{PROFILE} && network::network::netprofile_count() > 0, 0, gtknew('Label', text_markup => N("You are currently using the network profile <b>%s</b>", $net->{PROFILE})) ), + if_($net->{PROFILE} && network::network::netprofile_count() > 0, 0, gtknew('Label', text_markup => N("You are currently using the network profile <b>%s</b>", $net->{PROFILE}))), 1, gtknew('ScrolledWindow', width => 600, height => $scrolled_height, shadow_type => 'none', child => $managers_box = gtknew('VBox', spacing => 5, children_tight => [ map_index { build_cmanager_box($_, $::i == 0) } @cmanagers, @@ -195,7 +195,7 @@ sub main { push @connections, $connection; push @cmanagers, $cmanager; my $box = build_cmanager_box($cmanager, @connections == 0); - $managers_box ->add($box); + $managers_box->add($box); $box->show_all; } $cmanager->{parent_box}->show; |