summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2008-05-14 13:21:47 +0000
committerOlivier Blin <oblin@mandriva.com>2008-05-14 13:21:47 +0000
commit02ebd73327358617d2bb8d902a3d756641c978df (patch)
tree1c349ca1052a5657b35b76a72b1b6fde8df15ef8
parent59b3c09f140c70004a6f76ee80b40faf1088a553 (diff)
downloaddrakx-net-02ebd73327358617d2bb8d902a3d756641c978df.tar
drakx-net-02ebd73327358617d2bb8d902a3d756641c978df.tar.gz
drakx-net-02ebd73327358617d2bb8d902a3d756641c978df.tar.bz2
drakx-net-02ebd73327358617d2bb8d902a3d756641c978df.tar.xz
drakx-net-02ebd73327358617d2bb8d902a3d756641c978df.zip
use signal level if all reported qualities are 100% and if signal level is different
-rw-r--r--lib/network/monitor.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/network/monitor.pm b/lib/network/monitor.pm
index 6350cab..31bc8cc 100644
--- a/lib/network/monitor.pm
+++ b/lib/network/monitor.pm
@@ -89,9 +89,13 @@ sub list_wireless {
/Extra:wpa_ie=|IE:.*WPA/ and $has_wpa = 1;
/Authentication Suites \(\d+\) :.*\b802\.1x\b/ and $has_eap = 1;
}
+ my $incorrect_quality =
+ (every { $_->{signal_strength} == 100 } values %networks) &&
+ (any { $_->{signal_strength} != $_->{signal_level} } values %networks);
foreach (values %networks) {
my $level = delete $_->{signal_level};
$_->{signal_strength} ||= $level;
+ $_->{signal_strength} = $level if $incorrect_quality;
}
if ($current_ap && exists $networks{$current_ap}) {
foreach (`/sbin/iwconfig $o_intf 2>/dev/null`) {