From f6b0e885b7359f60d6da826b3bf8ca4301bb5f8c Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Tue, 23 Mar 2010 22:33:32 +0100 Subject: Artificial bound in relative load computation removed. Ignore-this: d8577938430d9c8614c04a6bcee14dfd darcs-hash:20100323213332-1d908-c43d8793742f731c19e30afe4eb7301b02bf268f.gz --- Plugins/Monitors/Top.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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] -- cgit v1.2.3