summaryrefslogtreecommitdiffhomepage
path: root/src/Plugins/Monitors/Top.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Plugins/Monitors/Top.hs')
-rw-r--r--src/Plugins/Monitors/Top.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Plugins/Monitors/Top.hs b/src/Plugins/Monitors/Top.hs
index 6001164..6f16bdb 100644
--- a/src/Plugins/Monitors/Top.hs
+++ b/src/Plugins/Monitors/Top.hs
@@ -158,7 +158,8 @@ topProcesses tref scale = do
return (len, nts', mis')
showTimeInfo :: TimeInfo -> Monitor [String]
-showTimeInfo (n, t) = showInfo n (showDigits 0 t) t
+showTimeInfo (n, t) =
+ getConfigValue decDigits >>= \d -> showInfo n (showDigits d t) t
showTimeInfos :: [TimeInfo] -> Monitor [[String]]
showTimeInfos = mapM showTimeInfo