diff options
author | Eric Mrak <mail@ericmrak.info> | 2014-03-15 14:29:30 -0700 |
---|---|---|
committer | Eric Mrak <mail@ericmrak.info> | 2014-03-15 14:29:30 -0700 |
commit | b1c1b938123b585ccdb66c69e1e7a2903a8e97ad (patch) | |
tree | 8c6eafbd15829df3e527509a6737ffb59c5b24c3 /src/Plugins/Monitors/MultiCpu.hs | |
parent | 48167e6f50f61453a269b321c8d3c8dad7a347b4 (diff) | |
download | xmobar-b1c1b938123b585ccdb66c69e1e7a2903a8e97ad.tar.gz xmobar-b1c1b938123b585ccdb66c69e1e7a2903a8e97ad.tar.bz2 |
showVerticalBar now takes the same arguments as showPercentBar
Diffstat (limited to 'src/Plugins/Monitors/MultiCpu.hs')
-rw-r--r-- | src/Plugins/Monitors/MultiCpu.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Plugins/Monitors/MultiCpu.hs b/src/Plugins/Monitors/MultiCpu.hs index 2089fca..429c38a 100644 --- a/src/Plugins/Monitors/MultiCpu.hs +++ b/src/Plugins/Monitors/MultiCpu.hs @@ -63,7 +63,7 @@ formatCpu xs | length xs < 4 = showPercentsWithColors $ replicate vNum 0.0 | otherwise = let t = foldr (+) 0 $ take 3 xs in do b <- showPercentBar (100 * t) t - h <- showVerticalBar (100 * t) + h <- showVerticalBar (100 * t) t ps <- showPercentsWithColors (t:xs) return (b:h:ps) |