, ( (modMask x .|. shiftMask, xK_semicolon), withFocused toggleBorder )
]
mymouseBindings x = [
- ( (modMask x, button4), \win -> windows $ prevWorkspace x)
- , ( (modMask x, button5), \win -> windows $ nextWorkspace x)
+ ( (modMask x, button4), \win -> windows $ SS.focusDown)
+ , ( (modMask x, button5), \win -> windows $ SS.focusUp)
+ , ( (modMask x .|. mod1Mask, button4), \win -> windows $ prevWorkspace x)
+ , ( (modMask x .|. mod1Mask, button5), \win -> windows $ nextWorkspace x)
]
tiled = Tall nmaster delta ratio
nmaster = 1