Thanks guys, that's even more solutions than I need.
Excerpts from Henri Ducrocq's message of Mon Feb 09 06:41:41 -0700 2009:
> For examplecan become:
> className =? "Google Mail" --> doShift "1"
> className =? "Google Calendar" --> doShift "1"
import Data.List
-- skipped
fmap ("Google" `isPrefixOf`) className --> doShift "1"
Also from Data.List are isSuffixOf and isInfixOf if you need those.
> "bc" `isInfixOf` "abcdef"
True
> "bc" `isInfixOf` "bcdef" && "bc" `isInfixOf` "abc"
True
--
wmw
_______________________________________________
xmonad mailing list
xmonad@haskell.org
http://www.haskell.org/mailman/listinfo/xmonad