Improved XMonad.Actions.FindEmptyWorkspace