I changed the keybinds [ (m ++ "M-" ++ [k], windows $ onCurrentScreen f i) | (i, k) <- zip (workspaces' cfg) wsKeys , (f, m) <- [(W.view, ""), (W.shift, "S-")] ] but surprisingly the "switchToWS" shortcuts are working but for the wrong screen xD