[xmonad] keeping focus on window after shifting to new screen

Currently, I move my windows to the left and right screens using the following keybinding: [((m .|. modm, key), screenWorkspace sc >>= flip whenJust (windows . f)) | (key, sc) <- zip [xK_h, xK_l, xK_r] [0..] , (f, m) <- [(W.view, 0), (W.shift, shiftMask)]] But if I try to move a window from one screen to the next using mod-shift-{h,l}, it annoys me that that window loses focus. I would like it for the window to remain in focus on the new screen (i.e. the new screen should be put in focus). I really like how when you shift a window up and down the stack with shift-mod-{j,k} that the same window remains in focus at all times. Is there an easy way to maintain this behavior across screens? Thanks!