[Haskell-beginners] Some Code from XMonad