From a1af240919cd4922041b4653bb9ca8c38c729551 Mon Sep 17 00:00:00 2001 From: Matthias Schiffer Date: Sat, 13 Feb 2010 19:14:15 +0100 Subject: Add Gnome event hook for panel switcher handling --- xmonad.hs | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) 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 -- cgit v1.2.3