summaryrefslogtreecommitdiffhomepage
path: root/Plugins
diff options
context:
space:
mode:
Diffstat (limited to 'Plugins')
-rw-r--r--Plugins/Monitors/Mem.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/Plugins/Monitors/Mem.hs b/Plugins/Monitors/Mem.hs
index f493862..4453559 100644
--- a/Plugins/Monitors/Mem.hs
+++ b/Plugins/Monitors/Mem.hs
@@ -47,8 +47,9 @@ formatMem (r:xs) =
rr = 100 * r
ub <- showPercentBar rr r
fb <- showPercentBar (100 - rr) (1 - r)
- s <- mapM (showWithColors f) (rr:xs)
- return (ub:fb:s)
+ rs <- showPercentWithColors r
+ s <- mapM (showWithColors f) xs
+ return (ub:fb:rs:s)
formatMem _ = return $ replicate 9 "N/A"
runMem :: [String] -> Monitor String