summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/Plugins/Monitors/Wireless.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Xmobar/Plugins/Monitors/Wireless.hs')
-rw-r--r--src/Xmobar/Plugins/Monitors/Wireless.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xmobar/Plugins/Monitors/Wireless.hs b/src/Xmobar/Plugins/Monitors/Wireless.hs
index 28aba50..1237aa9 100644
--- a/src/Xmobar/Plugins/Monitors/Wireless.hs
+++ b/src/Xmobar/Plugins/Monitors/Wireless.hs
@@ -111,7 +111,7 @@ runWireless iface args = do
#else
let s = if qlty >= 0 then Just (qlty * 0.7 - 110) else Nothing
#endif
- sp <- showWithPadding $ fromMaybe "" (show <$> s)
+ sp <- showWithPadding $ maybe "" show s
q <- if qlty >= 0
then showPercentWithColors (qlty / 100)
else showWithPadding ""