modified xmonad.hs