~/.xmonad: Language switch & screen lock shortcuts.

.xmonad/xmonad.hs

        handleEventHook = evHook
     } `additionalKeys` [
        ((mod4Mask, xK_b), spawnHere "chromium --allow-file-access-from-files"),
        ((mod4Mask .|. shiftMask, xK_b), spawnHere "chromium --incognito --allow-file-access-from-files")
        ((mod4Mask .|. shiftMask, xK_b), spawnHere "chromium --incognito --allow-file-access-from-files"),
        ((mod4Mask .|. shiftMask, xK_Tab), changeKbMap kbMap),
        ((mod4Mask .|. shiftMask, xK_l), spawn "slock")
     ]
  where changeKbMap kbMap = do
          kb <- readIORef kbMap