diff options
Diffstat (limited to 'lib/network/netcenter.pm')
| -rwxr-xr-x | lib/network/netcenter.pm | 21 |
1 files changed, 15 insertions, 6 deletions
diff --git a/lib/network/netcenter.pm b/lib/network/netcenter.pm index 28c54bd..ca04085 100755 --- a/lib/network/netcenter.pm +++ b/lib/network/netcenter.pm @@ -102,16 +102,25 @@ sub main { ]); my $expander = gtknew('Expander'); - my $toggle_expand = sub { $expander->get_expanded ? $content->hide : $content->show_all }; + my $on_expand = sub { + my ($expanded) = @_; + if ($expanded && $cmanager->{connection}->can('get_networks') && + !$cmanager->{connection}{probed_networks} && $expanded) { + gtkflush(); + $cmanager->update_networks; + } + }; + my $toggle_expand = sub { + my $was_expanded = $expander->get_expanded; + $was_expanded ? $content->hide : $content->show_all; + $on_expand->(!$was_expanded); + }; $expander->signal_connect(activate => $toggle_expand); my $eventbox = gtksignal_connect(Gtk2::EventBox->new, button_press_event => sub { $_[1]->button == 1 or return; $toggle_expand->(); - my $expanded = !$expander->get_expanded; - $expander->set_expanded($expanded); - gtkflush(); - $cmanager->update_networks if - $cmanager->{connection}->can('get_networks') && !$cmanager->{connection}{probed_networks} && $expanded; + my $was_expanded = $expander->get_expanded; + $expander->set_expanded(!$was_expanded); }); my $box = gtknew('VBox', spacing => 5, children_tight => [ gtknew('HBox', children => [ |