From 98b92acdf48f92b3fcfc38774d5e130453e7ed3a Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Fri, 22 Jul 2005 04:27:17 +0000 Subject: really use ap address for hidden ssid --- perl-install/standalone/net_applet | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/standalone/net_applet') diff --git a/perl-install/standalone/net_applet b/perl-install/standalone/net_applet index 1166d21d2..6e404188b 100644 --- a/perl-install/standalone/net_applet +++ b/perl-install/standalone/net_applet @@ -167,8 +167,8 @@ sub generate_wireless_menuitem { undef $current_state; #- force menu redraw } sub update_wireless_item { - my ($net) = @_; - $net->{ssid_label}->set_text($net->{ssid} || "[$_]"); + my ($net, $ap_address) = @_; + $net->{ssid_label}->set_text($net->{ssid} || "[$ap_address]"); $net->{keyring_image}->visible(defined $net->{flags}); my $approx_level = 20 + int(min($net->{signal_level}, 80)/20)*20; $net->{level_image}->set_from_pixbuf($pixbufs{link_level}{$approx_level}); @@ -183,7 +183,7 @@ sub checkWireless() { my $net = $wireless_networks{$_} ||= {}; put_in_hash($net, $networks->{$_}); exists $net->{menuitem} or generate_wireless_menuitem($net); - update_wireless_item($net); + update_wireless_item($net, $_); } $wireless_networks{$_}{menuitem}->visible(exists $networks->{$_}) foreach keys %wireless_networks; } -- cgit v1.2.1