summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/Plugins/Monitors
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2020-02-26 20:08:52 +0000
committerjao <jao@gnu.org>2020-02-26 20:08:52 +0000
commit946b73e8741fbf65f36a30df1b95aef61ca6799c (patch)
tree364b155b2af30b6bb4b9c894c87d3db9067381c8 /src/Xmobar/Plugins/Monitors
parentf4555b51b778ae5e677ce63eccdfd9376d07dd5d (diff)
downloadxmobar-946b73e8741fbf65f36a30df1b95aef61ca6799c.tar.gz
xmobar-946b73e8741fbf65f36a30df1b95aef61ca6799c.tar.bz2
hlint nit
Diffstat (limited to 'src/Xmobar/Plugins/Monitors')
-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 ""