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

[Bryan Huh]

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!