XMonad: better window manage hook