From cac63e3f3c271eb24d31d0c943378899f275733f Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Wed, 19 Sep 2007 22:31:57 +0000 Subject: group cmanagers in a list --- lib/network/netcenter.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lib') diff --git a/lib/network/netcenter.pm b/lib/network/netcenter.pm index bb1c8e1..9b0f884 100755 --- a/lib/network/netcenter.pm +++ b/lib/network/netcenter.pm @@ -49,6 +49,7 @@ sub main { @connections = uniq_ { $_->{device} } @connections; my $pixbufs = network::connection_manager::create_pixbufs(); + my @cmanagers = map { build_cmanager($in, $net, $w, $pixbufs, $_) } @connections; gtkadd($w->{window}, gtknew('VBox', spacing => 5, children => [ @@ -56,7 +57,7 @@ sub main { 1, gtknew('ScrolledWindow', width => 500, height => 300, shadow_type => 'none', child => gtknew('VBox', spacing => 5, children_tight => [ map_index { - my $cmanager = build_cmanager($in, $net, $w, $pixbufs, $_); + my $cmanager = $cmanagers[$::i]; my $icon = $_->get_status_icon; ugtk2::_find_imgfile($icon) or $icon = $_->get_type_icon; my $head = gtknew('HBox', children => [ -- cgit v1.2.1