[XMonad] Add goFullscreen action

This commit is contained in:
Ivan Malison 2016-11-22 00:41:55 -06:00
parent 06e5c7f5e2
commit 88e96ccf0b
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8

View File

@ -160,6 +160,8 @@ deactivateFullOr = toggleOr NBFULL False
deactivateFullAnd action = sequence_ [deactivateFull, action]
andDeactivateFull action = sequence_ [action, deactivateFull]
goFullscreen = sendMessage $ Toggle NBFULL
-- Layout setup
@ -410,7 +412,7 @@ addKeys conf@XConfig {modMask = modm} =
"systemctl --user restart taffybar.service")
, ((modm, xK_v), spawn "copyq paste")
, ((modm, xK_s), swapNextScreen)
, ((modm .|. controlMask, xK_space), sendMessage $ Toggle NBFULL)
, ((modm .|. controlMask, xK_space), goFullscreen)
, ((modm, xK_slash), sendMessage $ Toggle MIRROR)
, ((modm, xK_m), withFocused minimizeWindow)
, ((modm .|. shiftMask, xK_m), withLastMinimized maximizeWindowAndFocus)