diff options
| -rw-r--r-- | Plugins/Monitors/Top.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Plugins/Monitors/Top.hs b/Plugins/Monitors/Top.hs index 9885d55..779cfbe 100644 --- a/Plugins/Monitors/Top.hs +++ b/Plugins/Monitors/Top.hs @@ -153,7 +153,7 @@ topTimeProcesses n tref scale = do !sts = take n $ sortBy (flip (comparing snd)) ts !nts = map norm sts !scx = (fromRational . toRational $! diffUTCTime c1 c0) * scale / 100 - norm (nm, t) = (nm, min 100 $ t / scx) + norm (nm, t) = (nm, t / scx) return nts showTimeInfo :: TimeInfo -> Monitor [String] |