diff options
-rw-r--r-- | xmonad.hs | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -22,7 +22,7 @@ main = xmonad $ gnomeConfig , manageHook = myManageHook , layoutHook = desktopLayoutModifiers myLayoutHook , startupHook = myStartupHook - , handleEventHook = handleFullscreen + , handleEventHook = myEventHook } `additionalKeysP` [ ("M-<Left>", prevWS ) @@ -66,3 +66,8 @@ myLayoutHook = manageFullscreen $ configureBorders $ smartBorders (tiled ||| Mir -- Percent of screen to increment by when resizing panes delta = 3/100 + +myEventHook :: Event -> X All +myEventHook ev = do + handleFullscreen ev + (handleEventHook gnomeConfig) ev |