[xmonad] ppVisible with 3 screens

[Norbert Zeh]

Felix Blanke [2010.10.03 2305 +0200]:
> Hi Norbert,
> 
> thanks a lot for your reply. There are some nice information in it.
> 
> The last time I used haskell is a long time ago :) It will took me some time to
> understand what is going on in those functions.
> If you are some kind of haskel hacker and it takes you only one minute to change the
> function it would be great. Otherwise I'll post my result here if I did it.

I'm not quite sure what you mean.  Which function do you want to change?

> Those pp-variables works like they should! Thanks again for that great help. One last
> question about that: If I do it like you wrote the color of the "|"-seperator after the first
> three workspaces is the same as the color of ppVisible or ppCurrent
> 
>     ppVisible = xmobarColor "#EE9A00" "" . (++ " |") . wrap "[" "]"
>     ppCurrent = xmobarColor "#CC0000" "" . (++ " |") . wrap "[" "]"

ppVisible = \s -> (xmobarColor "#EE9A00" "" $ wrap "[" "]" s) ++ (xmobarColor "whatever" "" " |")
ppCurrent = dto.

Cheers,
Norbert