diff options
author | Andrea Rossato <andrea.rossato@ing.unitn.it> | 2007-07-23 13:49:36 +0200 |
---|---|---|
committer | Andrea Rossato <andrea.rossato@ing.unitn.it> | 2007-07-23 13:49:36 +0200 |
commit | fa25608473c717940f54bb529f4fe6dda8a87ff4 (patch) | |
tree | a4c77ed9568133a8ee790c7263536f2876bc53b4 /Plugins/Monitors/Common.hs | |
parent | 16f199b381d9be2996318a8dd1c474006a008957 (diff) | |
download | xmobar-fa25608473c717940f54bb529f4fe6dda8a87ff4.tar.gz xmobar-fa25608473c717940f54bb529f4fe6dda8a87ff4.tar.bz2 |
the normal color is set when normal > low
darcs-hash:20070723114936-d6583-1ade1b12fa6aed40aab2a07f51f1949fb298778b.gz
Diffstat (limited to 'Plugins/Monitors/Common.hs')
-rw-r--r-- | Plugins/Monitors/Common.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Plugins/Monitors/Common.hs b/Plugins/Monitors/Common.hs index 1c92fb8..d2ae8c3 100644 --- a/Plugins/Monitors/Common.hs +++ b/Plugins/Monitors/Common.hs @@ -270,7 +270,7 @@ showWithColors f x = let col = setColor $ f x [ll,hh] = map fromIntegral $ sort [l, h] -- consider high < low head $ [col highColor | x > hh ] ++ - [col normalColor | x < ll ] ++ + [col normalColor | x > ll ] ++ [col lowColor | True] -- $threads |