summaryrefslogtreecommitdiffhomepage
path: root/Plugins/Monitors/Net.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Plugins/Monitors/Net.hs')
-rw-r--r--Plugins/Monitors/Net.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/Plugins/Monitors/Net.hs b/Plugins/Monitors/Net.hs
index 7fed311..d08f96e 100644
--- a/Plugins/Monitors/Net.hs
+++ b/Plugins/Monitors/Net.hs
@@ -64,9 +64,7 @@ netParser =
formatNet :: Float -> Monitor (String, String)
formatNet d = do
- h <- getConfigValue high
- let dx = 8 + logBase 10 (d / fromIntegral h)
- b <- showPercentBar d $ max (dx / 10) 0
+ b <- showLogBar 0.8 d
x <- showWithColors f d
return (x, b)
where f s = showDigits 1 s ++ "Kb"