summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-03-23 22:33:32 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-03-23 22:33:32 +0100
commitf6b0e885b7359f60d6da826b3bf8ca4301bb5f8c (patch)
treec9be1df6532944374b4630c81ac57697f17ed8e9
parent070cab23829a45aa786f7d765a937cc003468f6b (diff)
downloadxmobar-f6b0e885b7359f60d6da826b3bf8ca4301bb5f8c.tar.gz
xmobar-f6b0e885b7359f60d6da826b3bf8ca4301bb5f8c.tar.bz2
Artificial bound in relative load computation removed.
Ignore-this: d8577938430d9c8614c04a6bcee14dfd darcs-hash:20100323213332-1d908-c43d8793742f731c19e30afe4eb7301b02bf268f.gz
-rw-r--r--Plugins/Monitors/Top.hs2
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]