diff options
| author | jao <jao@gnu.org> | 2020-02-26 20:08:52 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2020-02-26 20:08:52 +0000 |
| commit | 946b73e8741fbf65f36a30df1b95aef61ca6799c (patch) | |
| tree | 364b155b2af30b6bb4b9c894c87d3db9067381c8 /src/Xmobar/Plugins/Monitors | |
| parent | f4555b51b778ae5e677ce63eccdfd9376d07dd5d (diff) | |
| download | xmobar-946b73e8741fbf65f36a30df1b95aef61ca6799c.tar.gz xmobar-946b73e8741fbf65f36a30df1b95aef61ca6799c.tar.bz2 | |
hlint nit
Diffstat (limited to 'src/Xmobar/Plugins/Monitors')
| -rw-r--r-- | src/Xmobar/Plugins/Monitors/Wireless.hs | 2 |
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 "" |