From a3e6a4dd6ce4b624b4fad7a3a16a4c985db7b398 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Sun, 21 Aug 2011 21:08:54 +0200 Subject: Wireless: treat as a %, and honor -p (fixes #48) --- NEWS | 4 +++- src/Plugins/Monitors/Wireless.hs | 7 +++---- 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/NEWS b/NEWS index b01ada9..60d343a 100644 --- a/NEWS +++ b/NEWS @@ -10,13 +10,15 @@ _New features_ _Bug fixes_ + - [issue 48]: The field of Wireless behaves like a percentage. - [issue 50]: `MPD` monitor now works with libmpd 0.6. - Template sections without fields are now correctly displayed. - Catch errors when reading battery status (Ben Boeckel). - Compilation issues with ghc 7.x (Sergei Trofimovich). - Fixes for CoreTemp monitor in new kernels (Norbert Zeh). -[issue 50]: http://code.google.com/p/xmobar/issues/detail?id=14 +[issue 48]: http://code.google.com/p/xmobar/issues/detail?id=48 +[issue 50]: http://code.google.com/p/xmobar/issues/detail?id=50 ## Version 0.13 (March 28, 2011) diff --git a/src/Plugins/Monitors/Wireless.hs b/src/Plugins/Monitors/Wireless.hs index 4ac0c10..1b7e890 100644 --- a/src/Plugins/Monitors/Wireless.hs +++ b/src/Plugins/Monitors/Wireless.hs @@ -25,10 +25,9 @@ runWireless :: [String] -> Monitor String runWireless (iface:_) = do wi <- io $ getWirelessInfo iface let essid = wiEssid wi - qlty = wiQuality wi - fqlty = fromIntegral qlty + qlty = fromIntegral $ wiQuality wi e = if essid == "" then "N/A" else essid - q <- if qlty >= 0 then showWithColors show qlty else showWithPadding "" - qb <- showPercentBar fqlty (fqlty / 100) + q <- if qlty >= 0 then showPercentWithColors (qlty/100) else showWithPadding "" + qb <- showPercentBar qlty (qlty / 100) parseTemplate [e, q, qb] runWireless _ = return "" \ No newline at end of file -- cgit v1.2.3