diff options
| author | Olivier Blin <oblin@mandriva.org> | 2005-09-15 04:59:05 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.org> | 2005-09-15 04:59:05 +0000 |
| commit | afc6ef20d436974dcdea81745d514be519a1abf5 (patch) | |
| tree | 45b6daee200e61b5aa478a7fa9fc61596c70631c /perl-install/standalone | |
| parent | 21042c796dc96b60762edc3eaa323a36fb295550 (diff) | |
| download | drakx-afc6ef20d436974dcdea81745d514be519a1abf5.tar drakx-afc6ef20d436974dcdea81745d514be519a1abf5.tar.gz drakx-afc6ef20d436974dcdea81745d514be519a1abf5.tar.bz2 drakx-afc6ef20d436974dcdea81745d514be519a1abf5.tar.xz drakx-afc6ef20d436974dcdea81745d514be519a1abf5.zip | |
show refresh icon if network isn't connected
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/drakroam | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/standalone/drakroam b/perl-install/standalone/drakroam index 97890d73b..2ae88bf2d 100755 --- a/perl-install/standalone/drakroam +++ b/perl-install/standalone/drakroam @@ -60,7 +60,7 @@ my $has_roaming; my %pixbufs = ( - state => { map { $_ => gtkcreate_pixbuf($_) } qw(connected disconnected) }, + state => { map { $_ => gtkcreate_pixbuf($_)->scale_simple(24, 24, 'hyper') } qw(connected refresh disconnected) }, link_level => { map { $_ => gtkcreate_pixbuf('wifi-' . sprintf('%03d', $_) . '.png')->scale_simple(24, 24, 'hyper'); } qw(20 40 60 80 100) }, @@ -71,10 +71,13 @@ sub update_networks() { ($wireless_networks, $has_roaming) = network::monitor::list_wireless($monitor, $wireless_device); @{$wireless_list->{data}} = (); + my $routes = network::tools::get_routes(); + my $connected = exists $routes->{$wireless_device}{network}; + while (my ($ap, $network) = each(%$wireless_networks)) { push @{$wireless_list->{data}}, [ $ap, - $network->{current} ? $pixbufs{state}{connected} : undef, + $network->{current} ? $connected ? $pixbufs{state}{connected} : $pixbufs{state}{refresh} : undef, $network->{essid} || $net->{wireless}{$ap}{WIRELESS_ESSID} || $ap, $pixbufs{link_level}{$network->{approx_level}}, $network->{flags} ? $pixbufs{keyring} : undef, |