diff --git a/xmonad.hs b/xmonad.hs index 62965d1..7dd1d14 100644 --- a/xmonad.hs +++ b/xmonad.hs @@ -22,7 +22,7 @@ main = xmonad $ gnomeConfig , manageHook = myManageHook , layoutHook = desktopLayoutModifiers myLayoutHook , startupHook = myStartupHook - , handleEventHook = handleFullscreen + , handleEventHook = myEventHook } `additionalKeysP` [ ("M-", 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