diff options
Diffstat (limited to 'Plugins/Monitors')
| -rw-r--r-- | Plugins/Monitors/Common.hs | 2 | ||||
| -rw-r--r-- | Plugins/Monitors/Mem.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/Plugins/Monitors/Common.hs b/Plugins/Monitors/Common.hs index bbc9c39..5177fb8 100644 --- a/Plugins/Monitors/Common.hs +++ b/Plugins/Monitors/Common.hs @@ -249,7 +249,7 @@ showDigits d n = floatToPercent :: Float -> String floatToPercent n = - showDigits 2 (n * 100) ++ "%" + showDigits 1 (n * 100) ++ "%" stringParser :: Pos -> B.ByteString -> String stringParser (x,y) = diff --git a/Plugins/Monitors/Mem.hs b/Plugins/Monitors/Mem.hs index 2236256..65a8e96 100644 --- a/Plugins/Monitors/Mem.hs +++ b/Plugins/Monitors/Mem.hs @@ -37,7 +37,7 @@ parseMEM = formatMem :: [Float] -> Monitor [String] formatMem x = - do let f n = showDigits 2 n + do let f n = showDigits 1 n mapM (showWithColors f) x runMem :: [String] -> Monitor String |