From af610ae6a8d0a138443ca2f67d19516ffee785aa Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Wed, 4 Jun 2008 15:43:41 +0000
Subject: fix rescaling signal levels from wpa_supplicant

---
 lib/network/monitor.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'lib/network/monitor.pm')

diff --git a/lib/network/monitor.pm b/lib/network/monitor.pm
index f6828db..abe5680 100644
--- a/lib/network/monitor.pm
+++ b/lib/network/monitor.pm
@@ -43,10 +43,11 @@ sub list_wireless {
             $networks{$ap}{flags} ||= $flags;
             $networks{$ap}{essid} ||= $essid;
         }
-        if (any { $_->{signal_strength} > 100 } %networks) {
+        if (any { $_->{signal_strength} > 100 } values %networks) {
             #- signal level is really too high in wpa_supplicant
             #- this should be standardized at some point
-            $_->{signal_strength} = int($_->{signal_strength}/3.5);
+            $_->{signal_strength} = int($_->{signal_strength}/3.5)
+              foreach values %networks;
         }
 
         #- network id / ssid / bssid / flags
-- 
cgit v1.2.1