On 27 October 2012 14:24, Brandon Allbery wrote:

One possibility is

className =? "Xfce4-panel" <&&> fmap (\t -> any (== t) ["Panel", "Add New Items", ...]) title

I wasn't so lost, I was somehow close. I'm still trying to learn lambdas.

This can probably be made prettier.

matchAny :: Eq a => Query a -> [a] -> Query Bool matchAny t ts = fmap (\s -> any (== s) ts) t

className =? "Xfce4-panel" <&&> matchAny title ["Panel", "Add New Items", ...] --> doFloat

Thanks, this looks a little better and elegant. I still have a lot to learn D:

Another possibility, depending on exactly what you're trying to do, is

className =? "Xfce4-panel" --> composeAll [title =? "Panel" --> doFloat ,title =? "Add New Items" --> doFloat ]

and then rearrange the inner composeAll in various ways.

It's a good idea because gives more control. Thanks for your suggestion. On 27 October 2012 16:59, wrote:

How about this?

floatPanel t = className =? "Xfce4-panel" <&&> title =? t --> doFloat

and then, in your manage hook,

composeAll [ floatPanel "Panel", floatPanel "Add New Items", .... ]

Of course floatPanel can be generalized or specialized in a couple million different ways, depending on exactly what you want to do. ~d

Thanks, I never thought in doing something like that, I should've been able to do it, well... there's still a lot to learn. Thanks both of you! (again :P) Regards, -- Pablo Olmos de Aguilera Corradini - @PaBLoX http://www.glatelier.org/ http://about.me/pablox/ http://www.linkedin.com/in/pablooda/ Linux User: #456971 - http://counter.li.org/